[求助]想请教一下如何用 VB 编写数据库字段的宏替换
想请教一下如何用 VB 编写数据库字段的宏替换。
例：
说明：科目1,科目2,...科目20，分别为表"学生资料"中的字段。
Set rd1 = db.OpenRecordset("学生资料", dbOpenDynaset)
...
for no = 1 to 20
nox = trim(str(no))
Text1(no).Text = rd1("科目"+'" & nox & "'") '出错--项目找不到
next no
...
希望结果:
Text1(0).Text = rd1("科目0")
Text1(1).Text = rd1("科目1")
Text1(2).Text = rd1("科目2")
...
Text1(20).Text = rd1("科目20")
请教如何实现？
