Microsoft访问 Visual Basics "Expected: list separator or)"时出现编译错误

Question

我刚开始使用Microsoft Visual Basics，经过搜索，我似乎仍然找不到如何解决这个编译错误

Private Sub Form_Open(Cancel As Integer)
PlaySound (N:ComputingISDDChime.wav)
End Sub

它产生一个编译错误消息"；应为：列表分隔符或("；并突出显示代码第2行中的冒号。抱歉，如果这是一件容易解决的事情，我只是不明白问题在哪里，任何帮助都将不胜感激

Answer 1

定义模块中的API调用(apisndPlaySoundAPI调用(和包装器函数PlaySound，如下所示：

Declare Function apisndPlaySound Lib "winmm" Alias "sndPlaySoundA" _
(ByVal filename As String, ByVal snd_async As Long) As Long
Public Function PlaySound(ByVal sWav As String)
apisndPlaySound sWav, 1
End Function

然后在你的OnOpen活动中，你称之为：

PlaySound "N:..." 

如果没有括号，否则它将尝试返回一个值。还有双引号。

Answer 2

试试这个：

Private Sub Form_Open(Cancel As Integer)
PlaySound "N:ComputingISDDChime.wav"
End Sub

值中缺少两个双引号。