Parse string to single

Hej

Jeg er ved at lave et lille program hvor brugeren kan indtaste sin højde og vægt (til at beregne BMI). Det der bliver indtastet, gemmer jeg som string for at kan checke nogle ting ved den.
Mit problem er så at få den string, fx "22.2" omdannet til single datatype eller andet der kan holde en decimal
Et udklip:
' Dim variables
    Dim Weight As Single
    Dim Height As Single
    Dim inputWeight As String
    Dim inputHeight As String
    Dim BMI As Single
    Dim Respons(3) As String
    ' Make respons array
    Respons(0) = "undervægtig"
    Respons(1) = "normalvægtig"
    Respons(2) = "overvægtig"
    Respons(3) = "meget overvægtig"
   
    ' Get input
    inputWeight = TextWeight.Value
    inputHeight = TextHeight.Value
    ' Check if input if empty
    If inputWeight = "" Or inputHeight = "" Then
        MsgBox "Du skal udfylde både vægt og højde", vbApplicationModal, "Indtastnings fejl"
    Else
        ' erstart "," med "."
        inputWeight = Replace(inputWeight, ",", ".")
        inputHeight = Replace(inputHeight, ",", ".")
        ' lav til single
        Weight = inputWeight
        Height = inputHeight