Example - CVar Function

Sub Main()
    Dim MyInt As Integer
    Dim MyVar as Variant
    MyInt = 4534
    MsgBox MyInt
    MyVar = CVar(MyInt & "0.23") 'makes MyInt a Variant + 0.32
    MsgBox MyVar
End Sub