IE test 2 cheet sheet

IE test 2 cheet sheet - on name e.txt" ) ration keyword or...

Info iconThis preview shows pages 1–2. Sign up to view the full content.

View Full Document Right Arrow Icon
Private Sub Button1_Click( ByVal sender As Object , ByVal e As System. EventArgs ) Handles Button1.Click Dim firstname As String = "" Dim lastname As String = "" Dim salary, newsalary As Double inputdata(firstname, lastname, salary) newsalary = raisedsalary(salary) displayoutput(firstname, lastname, newsalary) End Sub Sub inputdata( ByRef firstname As String , ByRef lastname As String , ByRef salary As Double ) firstname = TextBox1.Text lastname = TextBox2.Text salary = CDbl (TextBox3.Text) End Sub Function raisedsalary( ByVal salary As Double ) As Double If salary <= 40000 Then Return 1.05 * salary Else Return salary + 2000 + 0.02 * (salary - 40000) End If End Function Sub displayoutput( ByVal firstname As String , ByVal lastname As String , ByVal newsalary As Double ) TextBox4.Text = "new salary for " & firstname & " " & lastname & " is " & FormatCurrency(newsalary) & End Sub End Class or T = T or F = T or T = T or F = F ot(T)= F ot(F)= T hen maxVal=x(i) n minVal=x(i) eger, byval B as single) as Single
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
Image of page 2
This is the end of the preview. Sign up to access the rest of the document.

This note was uploaded on 08/16/2011 for the course IE 148 taught by Professor Davesly during the Spring '11 term at Iowa State.

Page1 / 2

IE test 2 cheet sheet - on name e.txt" ) ration keyword or...

This preview shows document pages 1 - 2. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online