📄 1434.html
字号:
<html> <head> <title>为何呼叫DLL时,出现"Constants,Fixed-lenght strings,and arrays not allowed as Pubilc members of class module."??</title> </head> <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="blue" VLINK="#808080" ALINK="red"> <center> <h1>为何呼叫DLL时,出现"Constants,Fixed-lenght strings,and arrays not allowed as Pubilc members of class module."??</h1> </center><HR><p>Posted by <a href="mailto:william@huge.net.hk">小伟</a> on December 02, 1997 at 02:42:21:<p>我在Form1中的general写入<br>Option Explicit<br>Declare Function mciSendString Lib "MMSYSTEM.dll" (ByVal ACommand As String, ByVal AReturnString As integer, ByVal AReturnLength As integer ,ByVal ACallBack As integer) As Long<br>在Run时出现了"Constants,Fixed-lenght strings,and arrays not allowed as Pubilc members of class module."<br>我又不是在class module中写的<br>请问错在哪里??<br>但当我在Declare前加入Private,即改写成<br>Private Declare Function mciSendString Lib "mmsystem.dll" ...就没<br>这个问题发生.<br>但在Form_load中又出现问题<br>Private Sub Form_Load()<br>Dim result As Long<br>result = mciSendString("open c:\3ds4\temp\dosokai\dsk_01.mid type sequencer alias dsk_01", 0&, 0, 0)<br>End Sub<br>它说Error in loading DLL<br>错误发生在"result = mciSendString("open c:\3ds4\temp\dosokai\dsk_01.mid type sequencer alias dsk_01", 0&, 0, 0)"<br>这句子又错了什么呢?<br>My VB is Ver.4.0 32-BIT<br><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 1434--><!--top: 1441--><li><a href="1441.html"><b>你观念错误喔!</b></a> 小吴 <i>02:04:34 12/03/97</i>(<!--responses: 1441-->0)<ul><!--insert: 1441--></ul><!--end: 1441--></ul><!--end: 1434--><br><HR><p></body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -