VB在线求助，急~~ - VB / 控件
这个Function编译时提示can't find project or library
应该是类库没有添加吧；要怎么做才行啊？
应该是DataCombo这个的问题
Public Sub FilterDataCombo(ByVal idacbo As DataCombo, ByVal BoundColumn As String, ByVal ListField As String, ByVal iRsdacbo As ADODB.RecordSet)
Dim strTmpData As String
Dim rstmp As ADODB.RecordSet
On Error GoTo err
If iRsdacbo Is Nothing Then Exit Sub
strTmpData = Trim(idacbo.BoundText)
iRsdacbo.Filter = adFilterNone
If strTmpData <> "" Then
iRsdacbo.Filter = BoundColumn & " like " & kk(strTmpData & "%")
End If
Set rstmp = rsCopy(iRsdacbo)
GetDatadacboGotFocus idacbo, rstmp, BoundColumn, ListField, , IIf(Trim(strTmpData) <> "", False, True)
iRsdacbo.Filter = 0
Exit Sub
err:
Call GetMsg(E_OnErrMsg, "[ FilterDataCombo ]ErrNo:" & err.Number & " ErrDesc:" & err.Description)
End Sub
都引用了。还是不行
出错行指向哪条语句？
在IDE里运行一下看看是否出错，出错行指向哪里。
记得注掉on error 之类的语句
出错指向Public Sub FilterDataCombo(ByVal idacbo As DataCombo, ByVal BoundColumn As String, ByVal ListField As String, ByVal iRsdacbo As ADODB.RecordSet)
把ByVal idacbo As DataCombo拿掉就可以了
{{-
相关问答：
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
各位高手，小弟最近碰到一个问题：原先写的程序大概的思路是：首先webbrowser打开网址，网址显示后，点击网址上的某一个连接，当webbrowser检测到网址已经连接到想要的地址时候就开始下载文件，当用IE6的时候下� ......
我的要求是：通过抓取别的程序上的表格的句柄，然后读取这个表格的内容。
表格句柄（类名：MSFlexGridWndClass）我已抓到，接下来如何读取表格的内容就不会了？求助。
能把代码发来学习下不？
244326867@qq.com ......
现在小弟在用vb6.0编写程序，遇到异步的问题，具体如下：
点击按钮A时，调用外部的dll(C++)，此dll是同步返回数据。此时如果远程未响应，我的程序界面就会卡死。因此我想到用timer来实现异步 ，但是不清楚具体的实� ......
有两个问题
第一个问题：
网页源码
<td><select name="question" onchange="showcustomquest(this.value)" tabindex="4"><option value="0">无安全问 ......
