UC知道请教一个VB的问题
来源：百度知道 编辑：UC知道 时间：2024/05/17 22:23:33
定义API函数
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
生成exe文件时，第二行【(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
生成exe文件时，第二行【(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
'老兄，你多了个()啊……
要么写在一行里，要么加换行符，像这样：
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
把第一行的()去掉，换成“ _”符号，_ 符号前加个空格才能换行继续写