Example:

  1. Sub Main ()

    1. Dim Msg As String, x%

      x% = 10

      Msg =Str( x%) &" decimal is "

      Msg = Msg & Hex(x%) & " in hex "

      MsgBox Msg

    End Sub