Question

vb中怎样在输入第一个文本框以后，就输出以第一个文本框其他文本框的内容

vb怎样在输入第一个文本框以后，就在数据库里查询出来，并且把其他的文本框的内容的内容对应输出来，显示在对应的文本框或列表框里容。
例如我有三个文本框TEXT1，TEXT2，TEXT3，输入TEXT1的内容，然后在数据库搜索text1.内容，并且把text2的内容也对应的数据库里读出来，这么应该怎么写的？

Answer 1

这个问题提得有些看不明白，要先知道你想取得的是什么样的数据。在库的的表结果是怎么样子。
我举个例子，希望是你想要的结果吧
库中有表1：表1有三个字段
A | B | C
要将这三个字段取出来的值分别对应到TEXT1\2\3

CALL OPERS("SELECT * FROM 表1 WHERE A=' " & TEXT1.TEXT & " ')
TEXT1.TEXT=Rs.Fields(0)
TEXT2.TEXT=Rs.Fields(1)
TEXT3.TEXT=Rs.Fields(2)

Answer 2

st = "Select * from histone "

st = st + "where " & Combo1.Text & " = '" & Format((Text39.Text), "00") & "'"
st = st + " Order by xuhao asc"
Set histtab = ssqDB.OpenRecordset(st, dbOpenDynaset)
With histtab