Get input using inputbox, and then check it is positive or negative or zero in vb6,print using msgbox (visual basic)
Private Sub Form_Load()
Dim a As Integer
a = Int(InputBox("enter a number"))
If a = 0 Then
MsgBox (a & "is zero")
ElseIf a > 0 Then
MsgBox (a & "is positive")
Else
MsgBox (a & "is nagetive")
End If
No comments:
Post a Comment