要么写在一行里,要么加换行符,像这样:
Private Declare Function CDdoor Lib "winmm.dll" Alias "mciSendStringA" () _
(Byval lpstrCommand as String,byval lpstrReturnString as String,byval uReturnlength as long,Byval hwndCallback as Long) As Long
把第一行的()去掉,换成“ _”符号,_ 符号前加个空格才能换行继续写
Private Declare Function CDdoor Lib "winmm.dll" Alias "mciSendStringA" _
(ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnlength As Long, ByVal hwndCallback As Long) As Long
'老兄,你多了个()啊……