主题：求助，运行报错

没有注册类 (Exception from HRESULT: 0x80040154 (REGDB_E_CLASSNOTREG))

运行以下代码报错

======================

If Forms("出库").controls("ldjy").checked=False Then
    If r("每日剂量").length>0 Then
        speaker.rate = Forms("出库").controls("ldys").value
        speaker.Speak(r("名称").replace("(","").replace(")","").replace("-","") & "用法 " & r("每日剂量").replace("-"," 至 ").replace("ml","毫升").replace("ksm","详见说明"), DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
    Else
        speaker.rate = Forms("出库").controls("ldys").value
        speaker.Speak(r("名称").replace("(","").replace(")","").replace("-","") & "用法详见说明", DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
    End If
End If