Et simpelt higher / lower program

Du er nødt til at konvertere dine tekststrenge til tal:

Private Sub Command1_Click()
If CInt(Text1.Text) = CInt(number.text) then
  Label1.Caption = "Weee"
  MsgBox "Right!!!", vbCritical, "U Got it!"
ElseIf Cint(Text1.Text) < cint(number.Text) Then
  Label1.Caption = "Higher!"
ElseIf cint(text1.text) > cint(number.text) Then
  Label1.Caption = "Lower!"
End If
End Sub

Hej.

I VB5 som jeg anvender kan man ikke bruge tegnene plus og minus på strenge.

For at lægge strenge i forlængeelse bruges &
For at formindske en streng med sidste tegn

  left$(number.text, len(number.text)-1)

M.v.h.  Jørn

Virkelig mangetak for begge svar,, Det var dog driis's jeg brugte, men tak begge to!

du kan også bruge val-funktionen...
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbenlr98/html/vafctval.asp