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拿掉就可以了
{{-
相关问答：
DIM ds as new DataSet
我这样声明 怎老是报 用户定义类型未定义？ 这个需要引用什么吗？？
前提是DataSet对象要存在,就是对象浏览器中有它.没有就要引用.
dataset是ADO.NET对象
如果你用的是vb.net，那么在� ......
谁能帮我把下面这些代码改成VB形式的，多谢了，急用~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......
挺繁琐，之前发的帖子，分值太低现在重发一个。欢迎各位大侠~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
小弟用VB调EXCEL作图
objExlApp.Workbooks.Add
objExlApp.Charts.Add
objExlApp.ActiveChart.ChartType = xlLine
objExlApp.ActiveChart.HasLegend = True
objExlApp. ......
