In the PROMOTIC system it is better to use the PmExpr object.
expression | (String) string containing any expression in VBScript language syntax |
---|
Dim RndNum, Guess
RndNum = Int(100 * Rnd(1) + 1)
Guess = CInt(InputBox("Enter your guess:", "", 0))
If Eval("Guess = RndNum") Then
MsgBox "Congratulations! You guessed it!"
Else
Guess = CInt(InputBox("Sorry! Try again.", "", 0))
End If