Example:

  1. Sub main ()

    1. Dim msg

      a = -1

      msgBox "Num = " & Str(a)

      MsgBox "Abs(Num) =" & Str(Abs(a))

    End Sub