表1:
ID | 类型
1 | 正方形表2:
ID | 类型 | 描述 | 说明
1 | 1 | 方 | 倒萨表1.ID=表2类型问题是这样的。让表2的数据显示在4个TEXT文本框内,但是怎么让表2的类型显示成表1的类型的数据呢??
请大家帮帮忙~~~~
谢谢了。
ID | 类型
1 | 正方形表2:
ID | 类型 | 描述 | 说明
1 | 1 | 方 | 倒萨表1.ID=表2类型问题是这样的。让表2的数据显示在4个TEXT文本框内,但是怎么让表2的类型显示成表1的类型的数据呢??
请大家帮帮忙~~~~
谢谢了。
首先从表2中读取类型的编号,再写一个过程来从表1中获取类型的名称来替换,应该就可以了。
sql="select * from 表1"+ " " +"where"+ " " +"id='"+ trim(text2.text)+"'"
adodc1.recordsource=sql
adodc1.refresh
text2.text=adodc1.recordset.fields("类型")
如果表1的ID是数字,就去掉单引号"'"我刚学VB一个月,仅供参考
我喜欢把SQL单独写,因为我正在学写一个通用的数据库查询软件,可查询任何一个ACCESS或EXCEL文件,感觉必须这样写才有通用的可能性
返回结果:
字段: ID 类型名 描述 说明
值: 1 正方形 方 倒萨
select a.ID,b.类型,a.描述,a.说明
from 表2 a left outer join 表1 b on a.类型=b.ID
Access
SELECT 表2.ID,表1.类型,表2.描述,表2.说明
FROM 表2 LEFT JOIN 表1 ON 表2.类型 = 表1.ID;