题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2024-07-05 21:26:58

[单项选择]假定在窗体中的通用声明段已经定义有如下的子过程:

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 "的相关试题:

[单项选择]假定在窗体中的通用声明段已经定义有如下的子过程:

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类型的两个数据元素写到文件中

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码