calculation in text box

Question

  let me know by anyone if i have three text boxes Text Box 1,2 and 3.
The First Text Box pick the gross salary from data base on the bases of  selection from the combo box.
i want that the 2nd box calculate salary per day ( Gross Salary / 30). And the 3rd text box  calculate salary per hour {(Gross salary/30)/8}.
I have try this code but it is not working.


Public Class Form1

   

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim grsalry As Integer
        Dim ratprday As Integer
        grsalry = Val(TextBox1.Text)
        ratprday = grsalry / 30

        TextBox2.Text = ratprday





    End Sub
End Class









Thanks