I have a class assignment where i have to calculate the total cost of a parking garage from hours but i have to do it with a method function. So this might be a stupid question but can you read the user input values from a textbox in the function itself or do they have to be read in and recalled from the Private Sub Button1_Click section?
View 8 RepliesI am using Microsoft VB 2010. I am to calculate the charges for a parking garage. I was to use to a method to do the calculations and output the parking charges. My problem is that everything displays except for the charge... What am I doing wrong? Here is my code:
[Code]...
How do I code the total cost to give me a pound sign with the total cost at the moment when the total comes up for an example it gives me 3.6 when I need it to show £3.60 here is the code I have so far. [code]
View 2 RepliesI'm trying to calculate the total cost for gas for a Chevy and a Buick on a form. The total miles is 21 for city and 33 for freeway. I'm also putting in the mpg for each, for city and freeway. How would I set up the labels to display the right amount? Do I use If Then statements?
View 9 RepliesThis is my project for class and this is what i have so far but my teacher gave me no credit. What am i doing wrong? i tried rearranging it but no success.
A fast-food vendor sells pizza slices at $1.25 each, fries at $1.00, and soft drinks at $0.75. Write a program to computer a customers bill. The program should use 4 subprocedures that do the following:
1. read in the amount of each item ordered
2. calculate the total cost
3. display an itemized bill
4. read in the users full name from a textbox, and display a sentence, addressing the user by first name only and in upper case characters, informing the user of their bill
Here is an example itemized bill:
Item Quantity Price
Pizza slices 3 $1.25
Fries 4 $1
Soft drinks 5 $0.75
Total $11.50
Example sentence for point 4: if the user name was entered as John Smith, you would display the sentence JOHN, your bill is $11.50.
MY
Public Class Form1
Sub pizza(ByVal pizzap As Double, ByVal pizzanum As Double)
lstoutput.Items.Add("Pizza Slices" & pizzap & "and" & pizzanum & "is" & (pizzap * pizzanum) & ".")
[CODE]....
I'm have successfully did a shortcut "+" and "-" button to increase and decrease the qty ordered. But by doing so, i now have problem tabulating the cost for each item. Below is the print screen for my application. You will realised that the Lamb tandoori which is going for $3 cost only $21 after increasing the quantity ordered using the "+" button.In addition, i have created different list boxes for different food categories.Each category's food items is selling at the same price.
<img src "http://img521.imageshack.us/img521/6144/prob.png" />
When i run the program and click the cost button, it only returns a value of £0.00 for insurance cost and total cost.
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCost.Click
Dim Cost As Double
[Code]......
The pay rates for the project are:
a. Level 1 - $10.00
b. Level 2 - $12.00
c. Level 3 - $14.00
d. Level 4 - $16.00
e. Benefit Deduction Rate - 0.10
f. Overtime Factor - 1.5
For ease of program maintenance, all of the above rates and factors must be stored in module level constants. All references to pay rates in the program must refer to the module level constants.
When the Calculate button is clicked:
a. The value in the Hours text box must be validated to insure that it is numeric value greater than zero.
1. If the value is not valid, a message box must appear as shown below and the user must be offered the option to continue processing or quit the program.
2. If the user chooses to continue processing, the focus must be set to the Hours text box.
3. If the user chooses to quit, the program must close immediately.
b. If the value is valid, the program must calculate and display the total pay in the Total Pay label.
1. The pay rate is determined by which Job Grade radio button is checked.
2. For hours less than or equal to 40, the total pay is the hours times the pay rate.
3. For hours greater than 40, the total pay is 40 hours times the pay rate plus the hours in excess of 40 hours times the pay rate times the Overtime Factor.
4. If the Full Time radio button is selected, the total pay must be reduced by the Benefit Deduction Rate.
5. The value displayed in the Total Pay label must be formatted with a dollar sign and with two decimal
places.
6. The focus must be set to the Hours text box.
Why i get an error when i try to run this code
Code:
Also the message box, both yes and no close the program.....
I have a assignment and I have got to do the total cost and put the total in a label, here is the code. Select Case pizza1
[Code]...
Create an application that calculates the total cost of a stay in a hotel in the North Carolina mountains. The application should accept the following in terms of input:Month of Check in Length of Stay (in Nights) Number of Persons Room Service Charges Phone Charges Other Charges If the check in occurs in November-March the rate is $89/night. April-August is $99/night and September-October is $109/night. $10/night should be added if more than 2 people are in the room. More than 4 people are not allowed in the room, and a traveler can only request 1 room. A 15% tax should be added to the room rate and 10% tax added to all room service and other charges. No tax will be added for phone charges.
The program should use a function to calculate the total charges for the visitor's stay and output it to a label. There should be buttons or menus to calculate the total, clear the form, and exit the application.At least one of the button should call a sub procedure which performs its function. I don't understand how to set this program up and I'm not sure what it means.
I am using visual basic 2008 amd creatomg a datagrodview format like below [code] Now I wnat to get total balance in total column after less discount in percentage with ENTER EVENT proceedure and get the whole total column balance in a textbox i.e Net BalanceTextBox. Please tell me how to calculate discount in percent % and get total in total column and also tell me how to move cursor in next cell instead of bottom row in datagridview.
View 2 RepliesHow to update the total cost after every item is selected and the user clicks enter...
Private Sub calcbutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles calcbutton.Click
Dim amount As Double
Double.TryParse(amounttextbox.Text, amount)
Dim total As Double
[Code] .....
I have a class project that I have been working on for a while, and I can't figure out how to add each cost from lstCosts together to show a total cost of the selected workshops in lblTotalCost. Using the current loop that I have, it only adds the last cost in lstCosts. Is there a way to add the indexes together?
Code:
Public Class Form1
' The registration fee for each workshop
Const intSTRESS As Integer = 595 ' handling stress
Const intMANAGEMENT As Integer = 695 ' time management
Const intSKILLS As Integer = 995 ' supervision skills
[Code] .....
Create an application that calculates the total cost of a stay in a hotel If the check in occurs in November-March the rate is $89/night. April-August is $99/night and September-October is $109/night. $10/night should be added if more than 2 people are in the room. More than 4 people are not allowed in the room, and a traveler can only request 1 room. A 15% tax should be added to the room rate and 10% tax added to all room service and other charges. No tax will be added for phone charges.
The program should use a function to calculate the total charges for the visitor's stay and output it to a label. There should be buttons or menus to calculate the total, clear the form, and exit the application. At least one of the button should call a sub procedure which performs its function. [Code]
How would i get this to work on a listview to count the total in the header colums called Cost.
This is a code for DataGridView how do i get it to work in listview?.
code
Dim index As Integer = 1 'column index
Dim total As Single = 0.0F
[Code].....
I am trying to calculate a total cost from an elapsed time. Dependant on how long the time is, this will calculate the total cost. It has to be 3 to every hour. The elapsed time is displayed in label6 in "hh:MM:ss" format and the total cost needs to be displayed in label8.
View 4 RepliesI certainly hope I don't aggravate you with what is certainly a very simple code problem. I have never programmed before, but I do have a background in tech support, etc. I have an assignment to do and it's frustrating to wade through the information out there to find exactly what I need and nothing more.The assignment has 3 parts, one of which i've done. We are to do the same function in both javascript and VB. I was able to take a sample we did in class that caluclates a 10% discount and modify it so it calculates the total. Now, I have to modify that into a VB sln file. then write about the differences but that part will be cake.
I am working in Visual Studio 2008 - that program is new to me as well. When I created my login and it asked what VB I'm using, I did not know but under theu of VS, it says VB 2008.hat I attempted to do was to take the instructor's sample discount code and modify it for the new purpose, but an error was generated. This is the sample code I started with:
'Programmer: Dan Dougherty
'Date: Feb 2010
'
[code].....
I am running into trouble with some code I am doing for an assignment. The section within the apostrophes (If Then Else) is the section that I am having trouble with. When the user selects a seat type and then clicks the compute button, the wrong cost is displayed instead of an accurate cost.
Option Strict On
Public Class frmTickets
Private Sub btnComputeCost_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnComputeCost.Click
Dim intNumberOfTickets As Integer
[CODE]....................
I have a program where I have to calculate straight-line depreciation (cost * 1/n) n being the number of years to depreciate, and Double-Declining depreciation (cost * 2/n) using user input for year of purchase, cost, and years of depreciation. The output needs to be put into 4 columns in a list box. Year, Value at beginning of year, Amount of depreciation during the year and Total depreciation to the end of the year.
The problem I am having is with my loop. It is not properly calculating. I'm sure I am doing something wrong that is simple, but I can't see it.
Here is my code; the problem areas are bold:
Public Class frmDepreciation
Dim Cost, Life, Year, Depreciation, BegValue, EndValue, Total, Counter As Double
Dim fmtStr As String = "{0,-10}{1,10}{2,17}{3,5}{4,-15}"
Dim fmtStr2 As String = "{0,-10}{1,10}{2,17}{3,15}"
[CODE]....
I have many time result in my hand... like
10.10.23 (hours,minute,seconds)
01.14.15
How can i calculate total time?
I have a sql SELECT statement in vb.net. I have this line of code to calculate a specific percentage of the Net Total:ROUND(Invoices.NetT*'" + txtOnGoing.Text + "'/100,2) As Commission 'txtOnGoing is a text box which pre populates a certain number e.g '10'... this means 10% of the NetT column..The above code works fine, now I want to add the "Commission" Column and display the Total in a text box. Does anyone know how to do this? I know I can use the SUM operator but because the Commission column isnt a column that actually exists in the table I dont know how I could do this.
View 3 RepliesI'm having some trouble firstly trying to calculate the total of a column in the database connected to my vb.net project. Then I want to divide that total by the number of items in a listbox. This is my code so far:
Private Sub btnavresult_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnavresult.Click
Dim sqlx As OleDbCommand = New OleDbCommand
[Code]......
I get an error saying "No value given for one or more required parameters." when I try to run my program on this line "Dim rdr As OleDbDataReader = sqlx.ExecuteReader()"
I have two textboxs are formated to decimal type. i want create thirth textbox and get total of above two textboxs. how can i do that.
[Code]...
How to get the total sum of my fields that are not duplicated? The highlighted are examples of my duplicated fields (both lec and lab) but they don't have the same time.
View 1 RepliesThis is the code that I have so far, the program works, etc.. How to delete the "Calculate Total Due" button and write the code so that the total due changes when any of the three options is changed/selected.
Option Explicit On
Option Strict On
Option Infer Off
Public Class MainForm
Private Function CalcResidentialTotalDue(ByVal premiumChannels As Integer) As Decimal
[Code] .....
This should calculate and display the total amount due. There are 3 radio buttons, A, B, C. Nonprofit should get a 20% discount from final charges.
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles radA.CheckedChanged
[Code] .....
The program is for calculating an amount of fruit. I have a label saying the name of the fruit, a textbox to enter a value of 0-99 and another textbox with ReadOnly which will show the price.
A little picture here:[URL]
As you can see, the Fruit1 Etc... Is only the fruit name.
The Text box wich indicate 1-99 means the number of fruit.
The Textbox with Cash on it, means the total price.
The Calculate button, when I will push it, all the total price from all the fruit will be added together to form a total price which will be indicated in the total price textbox under the Calculate button.
When I will enter the number of fruit, if I enter 99, it give me a price.
When I will enter 60, I want that the 60 are multiplied by (let say) 0,10$
I just like to know how I can do this... Its really bothering e and I don't want to calculate all the things and make 99 line for 1 fruit cause it will be long.
The code I was using was:
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
If TextBox1.Text = "99" Then
TextBox2.text = "10.00$"
Elseif TextBox1.Text = "98" Then
TextBox2.Text = "9,90$"
EndIf
End Sub
Until the the number of the fruit in the code reach 0. So its very long.
I have successfully written this interest calculation, although it is based on the ppmt function and adding up the interest from each payment. This is quite a long looping process.. And it is not accurate because of the rounding of each payment. I was wondering if someone knows if there is a formula I can use, or if the pmt function is capable of this? (e.g. Mortgage payment - total interest payable over 30 years at 5% ( principle and interest repayments))?
View 1 RepliesIn my form I have Gross Earnings Calculated. Then that goes to a label. I then click a button to Clear Current Employee. Then I can input another employees info to get that employees Gross Earnings. Well when I click View Summary I want to display a Total Gross Earnings. The Total Gross Earnings should be a Total of all Employees Gross Earnings.
View 4 Repliestell me what is wrong with this calculation. I am fairly new to vb.net so i'm not particularly clued up! I am using it to calculate the total fare of taxi journeys.
[Code]...