Как можно перевести данные из текстового типа в числовой? - VB

Формулировка задачи:

Доброго времени!!! Опять возникла проблема, есть задание, где надо вычислить формулу, которая составлена программно (в цикле). Формула, в процессе составления имеет текстовый тип, но потом для вычисления надо присвоить это выражение переменной типа Single!!! При запуске проги, выдаётся ошибка типов!!! Подскажите пожалуйста, как можно перевести данные из текстового типа в числовой??? За ранее благодарен, Wit!

Решение задачи: «Как можно перевести данные из текстового типа в числовой?»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Dim FlagSymb As Boolean
Dim n As Integer
Dim a As Single
Dim PrimN As String
 
Private Sub Command1_Click()
    If Text1.Text = '' Then
        MsgBox 'Г‚ГўГҐГ¤ГЁГІГҐ Г§Г*Г*Г·ГҐГ*ГЁГҐ ГЇГҐГ°ГҐГ¬ГҐГ*Г*Г®Г© n!!!', vbExclamation, 'Г‡Г*Г¤Г*Г·Г* В№3'
        GoTo l1
    End If
    n = Text1.Text
    Prim = 'sqr(2'
    If n = 1 Then
        a = Sqr(2)
        Label2.Caption = a
        GoTo l1
    Else:
        
 
        PrimN = Prim
        For i = 2 To n
            PrimN = PrimN & '+' & Prim
        Next
        For i = 1 To n
            PrimN = PrimN & ')'
        Next
        a = CSng(PrimN)
        Label2.Caption = a
    
 
End If
l1:
End Sub
 
Private Sub Command2_Click()
    Form0.Enabled = True
    Form0.Option2.Value = False
    Unload Me
End Sub
 
Private Sub Command3_Click()
    Text1.Text = ''
End Sub
 
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
End Sub