Visual Basic Answers

write a program to enter 3 numbers then find the biggest one???

Hello Dear Sir, I am using visual Basic 2010 Express, I want to make a little application for my own works. I have set 8 combo boxes in one columns and 6 combos in one row. and one save button for saving the data of all combos and to load. but i still could not find the source code to save the data value of combos. please kindly help me. by sending me source code for saving and loading data value of all combo boxes.

Source code on how to make payroll system in visual basic 6.0 ..

I can get everything but the 40% working what am I doing wrong?

Protected Sub Button3_Click(sender As Object, e As System.EventArgs) Handles Button3.Click

Dim Customertype As Char = "R"
Dim Customertypetwo As Char = "C"
Dim Customertypethree As Char
Dim Customertypeone As Char = (TextBox1.Text)

Dim decSubtotalone As Decimal = 100D - 249.99D

Dim Subtotal As Decimal

Dim decDiscount As Decimal = 0.1D
Dim decDiscountTwo As Decimal = 0.2D
Dim decDiscountThree As Decimal = 0.25D
Dim decDiscountFour As Decimal = 0.4D
Dim decDiscountFive As Decimal = 0.3D

Dim decDiscountAmount As Decimal


Dim InputError As Boolean = False



Try
Customertypethree = Convert.ToChar(Me.TextBox1.Text)
Catch ex As Exception

MsgBox("Please enter Customer Type")
End Try

Try
Subtotal = Convert.ToDecimal(Me.TextBox2.Text)
Catch ex As FormatException

MsgBox("Please enter Subtotal")


End Try




If Customertype = Me.TextBox1.Text Then


If Subtotal < 249.99 Then




decDiscountAmount = Subtotal * decDiscount




Me.Label1.Text = "10%"
Me.Label2.Text = decDiscountAmount.ToString("C")
Me.Label3.Text = "$" & Subtotal - decDiscountAmount.ToString("C")
End If

'If Customertype = Me.TextBox1.Text Then

If Subtotal > 249.99 Then

decDiscountAmount = Subtotal * decDiscountThree


Me.Label1.Text = "25%"
Me.Label2.Text = decDiscountAmount.ToString("C")
Me.Label3.Text = "$" & Subtotal - decDiscountAmount.ToString("C")

End If

'If Customertype = Me.TextBox1.Text Then

If Subtotal < 100 Then




MsgBox("Subtototal must be over 100.00 to receive discount", , "Input Error")


Me.TextBox2.Focus()
Me.Label1.Text = ""
Me.Label2.Text = ""
Me.Label3.Text = ""
Me.TextBox2.Text = ""

InputError = True


End If



Else


If Customertypetwo = Me.TextBox1.Text Then


If Subtotal < 249.99 Then






decDiscountAmount = Subtotal * decDiscountTwo


Me.Label1.Text = "20%"
Me.Label2.Text = decDiscountAmount.ToString("C")
Me.Label3.Text = "$" & Subtotal - decDiscountAmount.ToString("C")


End If


If Customertypetwo = Me.TextBox1.Text Then

If Subtotal > 250.0 Then




decDiscountAmount = Subtotal * decDiscountFive

Me.Label1.Text = "30%"
Me.Label2.Text = decDiscountAmount.ToString("C")
Me.Label3.Text = "$" & Subtotal - decDiscountAmount.ToString("C")
End If



ElseIf Customertypeone = Me.TextBox1.Text Then

ElseIf Subtotal > 0.0 Then


decDiscountAmount = Subtotal * decDiscountFour

Me.Label1.Text = "40%"
Me.Label2.Text = decDiscountAmount.ToString("C")
Me.Label3.Text = "$" & Subtotal - decDiscountAmount.ToString("C")



End If
End If
End If

A furniture manufacturer makes two types of furniture—chairs and sofas. The cost per chair is $350, the cost per sofa is $925, and the sales tax rate is 5%.

Write a Visual Basic program to create an invoice form for an order (see the diagram below). After the data on the left side of the form are entered, the user can display an invoice in a list box by pressing the Process Order button.

The user can click on the Clear Order Form button to clear all text boxes and the list box, and can click on the Quit button to exit the program. The invoice number consists of the capitalized first two letters of the customer’s last name, followed by the last four digits of the zip code.

The customer name is input with the last name first, followed by a comma, a space, and the first name. However, the name is displayed in the invoice in the proper order. The generation of the invoice number and the reordering of the first and last names should be carried out by Function procedures.

Using Visual Basic Express 2010, would you happen to know the code to use for wanting to insert a windows account photo into a picture box? I think it might be something like PictureBox1.Image = ?????