um...here\'s what I did today...just wanna share for those who care...
Private Sub cmdabs_Click()
num = txtinput.Text
txtabs.Text = Abs(num)
End Sub
Private Sub cmdsqrt_Click()
num = txtinput.Text
txtsqrt.Text = Sqr(num)
End Sub
Private Sub cmdsquare_Click()
num = txtinput.Text
txtsquare.Text = num * num
End Sub
Private Sub txtinput_Change()
End Sub
3 buttons, 1 label, and 4 textboxes