VB加载DLL中遇到的问题 - VB / API
我用VB加载一个DLL，在“工程==〉引用”引用这个DLL的时候，显示该DLL不能加载could not be loaded
如果直接运行Private Declare Function RDBPointQuery Lib "C:\WINDOWS\system32\MACSVIDBCom.dll" (ByVal pQueryFlag As PointQueryFlag, ByRef lPNum As Long, ByRef PNameArr() As String_struct, ByVal lDomainNo As Long) As Long
则会报编译出错：'user-defined type not defined',请问是什么原因？
错误是：用户定义类型未定义。
dll不能引用，这很正常，表示该DLL有可能是标准的，不通通过引用调用，只能通过Declare声明调用。
编译出错的原因有可能是类型PointQueryFlag、String_struct没有定义。还有你那些ByVal,ByRef要斟酌一下。
PointQueryFlag、String_struct可能需要自己定义一下，你需要查找一下里面包含哪些数据类型，然后类似下面方法定义：
Public Type PointQueryFlag
a As Integer
b As Integer
rcv_dg_outstanding As Integer
rcv_any_outstanding As Integer
End Type
用户类型定义的问题解决了，谢谢两位。然后我运行以下代码时
--------------------------------------
Private Sub Command1_Click()
Dim pQueryFlag As pointqueryflag
Dim lPNum As Long
Dim PNameArr(10) As String_struct
Dim PointNam(10) As String_struct
pQueryFlag.BSDes = ""
pQueryFlag.BSPTypeName = ""
pQueryFlag.lQueryFlag = 0
pQueryFlag.lStationNo = 0
Dim ret As Long '
ret = RDBObj.RDBPointQuery(pQueryFlag, lPNum, PNameArr, 0)
If ret = 0 Then
相关问答：
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
form1中有text1-8， 和command1
text8中为程序代码（生成窗体为form2（已做好））
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题
......
现在小弟在用vb6.0编写程序，遇到异步的问题，具体如下：
点击按钮A时，调用外部的dll(C++)，此dll是同步返回数据。此时如果远程未响应，我的程序界面就会卡死。因此我想到用timer来实现异步 ，但是不清楚具体的实� ......
有两个问题
第一个问题：
网页源码
<td><select name="question" onchange="showcustomquest(this.value)" tabindex="4"><option value="0">无安全问 ......
