更多"假定在窗体中的通用声明段已经定义有如下的子过程: Sub f(x "的相关试题:
[单项选择]假定在窗体中的通用声明段已经定义有如下的子过程:
Sub f(x As Single,y As Single)
t=x
x=y
y=x
End Sub
在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:
PrivateSubCommand1_Click( )
a=10
b=20
f(a,B)
MsgBox a&b
End Sub
打开窗体运行后,单击命令按钮,消息框输出的值分别为( )。
A. 20和10
B. 10和20
C. 10和10
D. 20和20
[单项选择]假定在窗体中的通用声明段已经定义有如下的子过程:
Sub f(x As Single,y As Single)
t=x
x=y
y=x
End Sub
在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:
Private Sub Command1_Click( )
a=10
b=20
f(a,b)
MsgBox a&b
End Sub
打开窗体运行后,单击命令按钮,消息框输出的值分别为( )。
A. 20和10
B. 10和20
C. 10和10
D. 20和20
[单项选择]假定窗体的名称为fTest,将窗体的标题设置为“Sample”的语句是()。
A. Me="Sample"
B. Me.Caption="Sample"
C. Me.Text="Sample"
D. Me.Name="Sample/
[填空题]假定窗体的名称为Form1,则把窗体的标题设置为“Access模拟”的语句是______。
[单项选择]假定有如下的窗体事件过程:
Private Sub Form_Click( )
a$="Microsoft Visual Basic"
b$=Right(a$,5)
c$=Mid(a$,1,9)
Msg Box aS,34,b$,c$,5
End Sub
程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是
A. Microsoft Visual
B. Microsoft
C. Basic
D. 5
[单项选择]假定有如下的窗体事件过程:
Private Sub Command1_Click( )
a$="Microsoft Visual Basic"
b$=Riqht(a$, 5)
c$=Mid(a$, 1, 9)
MsgBox a$, 34, b$, c$, 5
End Sub
程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是______。
A. Microsoft Visual
B. Microsoft
C. Basic
D. 5
[单项选择]假定有如下的窗体事件过程:
Private Sub Form_Click( )
a$="Microsoft Visual Basic"
b$=Right(a$,5)
c$=Mid(a$,1,9)
MsgBox a$,34,b$,c$,5
End Sub
程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是
A. Microsoft Visual
B. Microsoft
C. Basic
D. 5
[单项选择]假定窗体上有-个标签,名为Label1,为了使该标签透明并且没有边框,则正确的属性设置为()。
A. Label1.BackStyle=0
B. Label1.BackStyle=1
C. Label1.BackStyle—True
D. Label1.BackStyle=False
[填空题]某个窗体已编写以下事件过程。打开窗体运行后,单击窗体,消息框的输出结果为
Private Sub Form_Click( )
a=1
i=1
Do Until i>10
a=a+2
i=i+3
Loop
MsgBox a
End Sub
[单项选择]假定在窗体(名称为Form1)的代码窗口中定义如下记录类型:
Private Type animal
animalName As String*20
aColor As String*10
End Type
在窗体上面一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Dim rec As animal
Open "c:/vbTest. dat" For Random As #1 Len=Len(rec)
rec. animalName="Cat"
rec. aColor="White"
Put #1, , rec
End Sub
则以下叙述中正确的是______。
A. 记录类型animal不能在Form1中定义,必须在标准模块中定义
B. 如果文件"c:/vbTest. dat"不存在,则Open命令执行失败
C. 由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾
D. 语句“Put #1, , rec”将animal类型的两个数据元素写到文件中
[单项选择]假定在窗体(名称为Form1)的代码窗口中定义如下记录类型:
Private Type animal
animal Name As String * 20
aColor As String * 10
End Type
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1 Click( )
Dim rec As animal
Open "c:/vb Test.dat"For Random As # 1 Len=Len(reC)
rec.animalName="cat"
rec.aColor="White"
Put # 1,,rec
Close # 1
End Sub
则以下叙述中正确的是 ______。
A) 记录类型animal不能在Form1中定义,必须在标准模块中定义
D) 如果文件c:/vbTest.dat不存在,则Open命令执行失败
C) 由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾
D) 语句"Put # 1,,rec"将animal类型的两个数据元素写到文件中