12、 在已建窗体中有一命令按钮(名为Command1.,该按钮的单击事件对应的VBA代码为: Private Sub Command1_Click(. subT.Form.RecordSource = "select * from 雇员" End Sub 单击该按钮实现的功能是 A.使用select命令查找"雇员"表中的所有记录 B.使用select命令查找并显示"雇员"表中的所有记录 C.将subT窗体的数据来源设置为一个字符串 D.将subT窗体的数据来源设置为"雇员"表
14、 设有如下程序 Private Sub Command1_Click( . Dim sum As Double, x As Double sum = 0 n = 0 For i=1 To 5 x = n / i n = n + 1 sum = sum + x Next i End Sub 该程序通过For循环来计算一个表达式的值,这个表达式是 A.1+1/2+2/3+3/4+4/5 B.1+1/2+1/3+1/4+1/5 C.1/2+2/3+3/4+4/5 D.1/2+1/3+1/4+1/5
15、设有如下程序 Private Sub Command1_Click( . Dim sum As Double, x As Double sum = 0 n = 0 For i=1 To 5 x = n / i n = n + 1 sum = sum + x Next i End Sub 该程序通过For循环来计算一个表达式的值,这个表达式是 A.1+1/2+2/3+3/4+4/5 B.1+1/2+1/3+1/4+1/5 C.1/2+2/3+3/4+4/5 D.1/2+1/3+1/4+1/5
20、 在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下: Private Sub Command1_Click(. Dim i, j, x For i = 1 To 20 Step 2 x = 0 For j = i To 20 Step 3 x = x + 1 Next j Next i Text1.Value = Str(x. End Sub 打开窗体运行后,单击命令按钮,文本框中显示的结果是 A.1 B.7 C.17 D.400