Question

在VB中，同一个窗体多次读取同一张access表里面的数据，如何做到读取表里的一个列

然后其他的相对应的列立刻就显示出来，例如下面的图片中，车牌号和车牌底色是来自同一个表里面的不同列，但是每一个车牌号都唯一对应一种车牌底色，我要如何做到当下拉选择一个车牌号，然后下面的车牌底色就对应显示出来
各位高手，请帮帮忙，我没有很多的财富值，5财富值只是一个小小的心意，我真的很需要你们的帮忙，而且很急，谢谢你们

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励10（财富值+成长值）+提问者悬赏5（财富值+成长值）

Answer 1

类似的问题我也遇到过，解决方法两种：

1. 从表中读出 序号,牌号，底色... 将牌号写到combo1里面时候把序号写入相应的itemdata中。底色写到一个数组里面。 这样当combo1变化时，读出相对应的itemdata，再查数组填到底色中即可。

2. 从表中读出 牌号，底色，以字符串  left(牌号+space(30),30) + 底色 写入combo1的list中。之所以加若干空格是让combo1显示出来的是前面的字符串，而底色数据隐藏在后面看不到。当combo1变化时，底色.text = mid(combo1.text,31)即可。

第二种较简单，常用。

追问

第一种我有试过，但是要分别一个一个下拉选择，这样子比较麻烦，而且选择的前提是要知道它们之间的对应关系，自己用的话都不是很方便，把开发出来的系统给别人用就更不方便了。不过你说的第二种我还是不是很明白，你能不能拿一个例子编程给我看一下呀？谢谢了，我是刚学vb的菜鸟，很多都不是很懂

追答

Private Sub Combo1_Click()
     Combo2.Text = Mid(Combo1.Text, 21)



Private Sub Form_Load()
       For i = 1 To 5
          Combo1.AddItem Left("车型" & i & Space(20), 20) & "底色" & i
          Combo2.AddItem "底色" & i
        Next
End Sub

combo1.style要设成2, 我以前用时是加了很多项附属信息在里面,每段信息用|号隔开.在click事件时再提取到别的控件里的.