User talk:Shine1894

Hi..guyz...mwaaah..luv u ol...> Private Sub Label3_Click

End Sub

Private Sub CmdEnter_Click Dim num1 As Integer, num2 As Integer num1 = InputBox("Enter 1st Integer", "Input") num2 = InputBox("Enter 2nd Integer", "Input") If num1 = num2 Then lblDisplay1.Caption = num1 & " " & "is equal to" & " " & num2 End If If num <> num2 Then lblDisplay1.Caption = num1 & " " & " is not equal to" & " " & num2 End If If num > num2 Then lblDisplay2.Caption = num1 & " " & "is greater than" & " " & num2 End If If num < num2 Then lblDisplay2.Caption = num1 & " " & "is less than" & " " & num2 End If If num1 >= num2 Then lblDisplay3.Caption = num1 & " " & "is greater than or equal to" & " " & num2 End If If num1 <= num2 Then LblDisplay4.Caption = num1 & " " & "is less than or equal to" & " " & num2 End If End Sub

Private Sub CmdExit_Click End End Sub