30、【
单选题
】 在过程定义中有语句:
Private Sub GetData(ByRef f As Integer)
其中“ByRef”的含义是
[2分]
、
传值调用
、
传址调用
、
形式参数
、
实际参数
答案:
31、【
单选题
】 在Access中,DAO的含义是
[2分]
、
开放数据库互连应用编辑接口
、
数据库访问对象
、
Active数据对象
、
数据库动态链接库
答案:
32、【
单选题
】 在窗体中有一个标签Labelo,标题为“测试进行中”:有一个命令按钮Command1,事件代码如下:
Private Sub Command1_Click( )
Labelo.Caption="标签"
End Sub
Private Sub Form_Load( )
Form.Caption="举例"
Command1.Caption="移动"
End Sub
打开窗体后单击命令按钮,屏幕显示
[2分]
、
、
、
、
答案:
33、【
单选题
】 在窗体中有一个标签Lb1和一个命令按钮Command1,事件代码如下:
Option Compare Database
Dim a As String *10
Private Sub Command 1_Click( )
a="1234"
b=Len(a)
Me.Lb1.Coption=b
End Sub
打开窗体后单击命令按钮,窗体中显示的内容是
[2分]
、
4
、
5
、
10
、
40
答案:
34、【
单选题
】 下列不是分支结构的语句是
[2分]
、
If…Then…EndIF
、
While…Wend
、
If…Then…Else…EndIf
、
Select…Case…End Select
答案:
35、【
单选题
】 在窗体中使用一个文本框(名为n)接受输入的值,有一个命令按钮run,事件代码如下:
Private Sub run_Click( )
result=""
For i=1 To Me!n
For j=1 To Me!n
result=result+"*"
Next j
result=result+Chr(13)+Chr(10)
Next i
MesgBox result
End Sub
打开窗体后,如果通过文本框输入的的值为4,单击命令按钮后输出的图型是
[2分]