Konverter text til værdi i VBA

Hvordan får jeg konverteret "idn" til en værdi?,

værdien fra instrument.ReadString() er:
10.000,000,00 MHz<CR> og denne skal gerne konverterse til
10,00000000


Private Sub Start_Click()
    Dim ioMgr As VisaComLib.ResourceManager
    Dim instrument As VisaComLib.FormattedIO488
    Dim idn As String
    Dim i As Integer
    Set ioMgr = New VisaComLib.ResourceManager
    Set instrument = New VisaComLib.FormattedIO488
    Set instrument.IO = ioMgr.Open("ASRL3::INSTR")
    i = 1
    Do While i < 10
    idn = instrument.ReadString()
    ActiveSheet.Cells(i, 1) = idn
    i = i + 1
    Loop
End Sub


mvh
Søren