发布网友 发布时间:2024-10-24 13:06
共1个回答
热心网友 时间:2024-10-29 20:23
以data控件为例:在窗体层声名数组变量:
Dim a(1 to 10) As integer使用data控件查找数据:Data1.Recordset.FindFirst "要找的字段名称=" & "'" & Text1.Text & "'"(Text1中是你要找的内容)以上是定位你要找的字段,然后建立一个文本框,与data控件绑定,用于显示查找的数据。利用for循环,将10个数据一一导入数组中 for i = 1 to 10Data1.Recordset.FindFirst "要找的字段名称=" & "'" & Text1.Text & "'"a(i) =Text1.Textnext同样也可以用for 循环输出数组:
for i =1 to 10print a(i)next大概的思想就是这样!