打开两个数据库,
并用两个ComboBox,第一个box直接显示第一个数据库中的某个字段,
能否实现在第二个box中根据第一个Box的内容显示在第二个数据库中该字段对应的其他字段的值,
为什么用这个判断不行呢?
while EmployRs.Fields.Item(6) = BranchCombo.Text
UserIDCombo.AddItem EmployRs.Fields.Item(0)
EmployRs.MoveNext
Wend
并用两个ComboBox,第一个box直接显示第一个数据库中的某个字段,
能否实现在第二个box中根据第一个Box的内容显示在第二个数据库中该字段对应的其他字段的值,
为什么用这个判断不行呢?
while EmployRs.Fields.Item(6) = BranchCombo.Text
UserIDCombo.AddItem EmployRs.Fields.Item(0)
EmployRs.MoveNext
Wend
解决方案 »
- vb winsoke传输错误问题
- 我是初学者,请教ado控件的问题.
- 查询两个表中是否有记录
- 怎样在vb界面上做一个接网线口的视频窗口!不是USB哦!如果有代码可以给300分
- datareport 能否在一行中输出多条记录?
- vb 一個令人想不出來的問題!高手接招吧??很難!!!
- 对于空access2000数据库,注意是空的即只有一个表而表里面没有记录,怎样通过data控件添加记录.
- 我如何知道VB中的文本框中有多少行文本?
- 走过路过千万不要错过啊
- ★★★各位大虾,到那去下载MicroSoft ActiveX Data Objects 2.5 Library 的安装程序,好像不大
- 我想这个问题大家都是感兴趣的
- 数据库如何利用VB来导入导出到TXT文件(格式为自定义的)最快最好,请指教?
按照你上面的文字描述好像应该这样:
dim i as integer
EmployRs.MoveFirst
EmployRs.Find "UserID=" & Combo1.Text
for i=1 to EmployRs.Fields.count-1
combo2.additem EmployRs.Field(i).Value
next i
EmployRs.Find "UserID=" & Combo1.Text这个具体的语法怎样?
我套进去不能用
EmployRs.Find "Branchname=" & BranchCombo.Text
谢谢