Example - CVar Function

1. Sub Main()

    

   1. Dim MyInt As Integer

      MyInt = 4534

      Print MyInt

      MyVar = CVar(MyInt & "0.23") 'makes MyInt a Variant + 0.32

      Print MyVar

   End Sub