组卷题库 > 高中信息技术试卷库
试题详情
下图是通过VB程序读取“GDP2018.accdb”文件中的GDP总量,显示在列表框中,部分代码实现如下:

Private Sub Command1_Click()     ‘列表框中输出 b(i),代码略

End Sub

Private Sub Form_Load()

conn.ConnectionString="Provider=Microsoft.ACE.OLEDB.12.0;DATASource="& App.Path & "\GDP2018.accdb" conn.Open:Set myrecord.ActiveConnection = conn:myrecord.Open "GDP"

n = 0

Do While Not myrecord.EOF n = n + 1

a(n) = myrecord.Fields("2018")

b(n) = Left(myrecord.Fields("Area"), 5) & "   " & myrecord.Fields("2018") myrecord.MoveNext

Loop

conn.Close: myrecord.Close: Set myrecord = Nothing: Set conn = Nothing End Sub

下列说法不正确的是(  )

A、ConnectionString是实例conn的属性
B、myrecord.Fields("2018")返回当前记录中“2018”字段的值
C、a(1)读取后执行myrecord.MoveNext将读取下一条记录,即a(2)=“中国”
D、myrecord.Fields("2018")也可以写成myrecord.Fields(3)
知识点
参考答案
采纳过本试题的试卷
教育网站链接