Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Calculates and display gallons of water used and  total charged

Posted on 2011-03-21
5
Medium Priority
?
190 Views
Last Modified: 2014-10-24
Code an application so that it calculates and displays the number of gallons of water used and the total charge for water. the charge for the water is $1.75 per 1000 gallons or .00175 per gallon. Make the calculations  only when the current meter reading is greater than or equal to the previous meter reading; other wise diplay an approiate message.Displya total charge with a dollar sign and two decimals. the text boxes should only accept numbers and th backspace key.Clear number of gallons used and the total charge when a change is made to contents. when a text box receives focus, select its exsisiting text.


I have attached the zip file of what I have so far  
Allenton-Solution.sln
0
Comment
Question by:sweety53216
  • 2
5 Comments
 
LVL 61

Expert Comment

by:HainKurt
ID: 35181886
your attached file is not showing any code... you posted solution file by mistake instead of code file...
0
 

Author Comment

by:sweety53216
ID: 35181982
ublic Class Form1

    Private Sub TextBox5_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
        Me.Close()

This is what I have so far

    End Sub

    Private Sub bntCalc_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles bntCalc.Click
        'calculates total gallons and total charge

        lbltotalgallons.Text = Val(TxtCurrent.Text) - Val(Txtprevious.Text)
        lbltotalcharge.Text = Val(lbltotalgallons.Text) * 0.00175
        lbltotalcharge.Text = Format(lbltotalcharge.Text, "currency")
0
 
LVL 61

Accepted Solution

by:
HainKurt earned 2000 total points
ID: 35182160
use Convert.ToInt32

dim pRead as int = Convert.ToInt32(Txtprevious.Text)
dim cRead as int = Convert.ToInt32(TxtCurrent.Text)
dim totalCharge as double

if (pRead<cRead) then
  totalCharge  = (cRead-pRead) * 0.00175
  lbltotalcharge.Text = totalCharge.ToString("#,000.00")
end if

check here for more formatting options:

http://msdn.microsoft.com/en-us/library/kfsatb94.aspx
0

Featured Post

Ask an Anonymous Question!

Don't feel intimidated by what you don't know. Ask your question anonymously. It's easy! Learn more and upgrade.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Now that Expression Web 4.0 (http://www.microsoft.com/expression/products/Upgrade.aspx) is free if you buy or have the full version of Expression Web 3.0, now is the best time to  migrate from FrontPage to Expression Web (http://www.frontpage-to-exp…
Originally, this post was published on Monitis Blog, you can check it here . It goes without saying that technology has transformed society and the very nature of how we live, work, and communicate in ways that would’ve been incomprehensible 5 ye…
The purpose of this video is to demonstrate how to add AdSense Ads to a WordPress Website, and how to set up WordPress to automatically place Ads in Sidebars. This will be demonstrated using a Windows 8 PC. Log into your AdSense account. : Cli…
The purpose of this video is to demonstrate how to set up basic WordPress SEO. This will be demonstrated using a Windows 8 PC. The plugin used will be WordPress SEO by Yoast. Go to your WordPress login page. This will look like the following: myw…

971 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question