题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-10-11 16:51:14

[单项选择]在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为 ______。
Private Sub Text1_KeyPress<KeyAscii As Integer)
Dim char as String
char=Chr(KeyAscii)
Text1.Text=String(5,KeyAscii)
End Sub
A. aaaaa
B. AAAAA
C. aaaaaa
D. AAAAAA

更多"在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘"的相关试题:

[单项选择]窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell)。要求程序运行后,如果在文本框中输入字符,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是 ______。
A. Private Sub Text1_Change()
B. Private Sub Text1_Click()
C. Private Sub Labell_Change()
D. Private Sub Labell_Click()
[单项选择]在窗体上画一个通用对话框,程序运行后,通过ShowOpen方法显示“打开”对话框,要求在该对话框的“文件类型”栏中只显示扩展名为.DOC的文件,则对通用对话框的 Filter属性的正确设置是 ______。
A. "(*.DOC) *.DOC"
B. "(*.DO
C. "(*.DOC
[单项选择]在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是
A. Private Sub Text 1_Change() Label 1.Caption=Str(Len(Text 1.Text)) End Sub
B. Private Sub Text 1_C lick() Label 1.Caption=Str(Len(Text 1.Text)1 End Sub
C. Private Sub Text 1_Change() Label 1.Caption=Text 1.Text End Sub
D. Private Sub Label 1_Change() Label 1.Caption=Str(Len(Text 1.Text)) End Sub
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_ Click ( )
x = InputBox("Enter the First integer")
y = InputBox("Enter the Second integer")
Print y +x
End Sub
程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是 ______。
A. 579
B. 123
C. 456
D. 123456
[单项选择]在窗体上画一个命令按钮,然后编写如下代码:
Private Sub Command1_Click( )
a&=InputBox("请输入第一个数")
b&=InputBox("请输入第二个数")
Print b&+a&
End Sub
程序运行后,单击命令按钮,在两个输入对话框中先后输入12345和54321,程序的输出结果是
A. 66666
B. 54321 12345
C. 1234554321
D. 出错
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
MsgBox Str(123+321)
End Sub
程序运行后,单击命令按钮,则在信息框中显示的提示信息为
A. 123+321
B. 字符串"444"
C. 数值444
D. 空白
[单项选择]在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:
PrivateSubCommandl_CnCk( )
aS="VisualBasic",
Print String(3,a$)
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是( )。
A. VVV
B. Vis
C. sic
D. 11
[单项选择]在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:
Private Sub Commandl_Click( )
Dim a( )
a=Array(“机床”,”车床”,”钻床”,”轴承”)
Print a(2)
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
A. 机床
B. 车床
C. 钻床
D. 轴承
[单项选择]在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:
Private Sub Command1 Click( )
Move 500,500
End Sub
程序运行后,单击命令按钮,执行的操作为
A. 命令按钮移动到距窗体左边界、上边界各500的位置
B. 窗体移动到距屏幕左边界、上边界各500的位置
C. 命令按钮向左、上方向各移动500
D. 窗体向左、上方向各移动500
[单项选择]在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程:
Private Sub TxtA_KeyPress(keyaseii as integer)
……
End Sub
若焦点位于文本框中,则能够触发KeyPress事件的操作是
A. 单击鼠标
B. 双击文本框
C. 鼠标滑过文稿本框
D. 按下键盘上的某个键
[单项选择]在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程:
Private Sub Command1_Click( )
A=4 : b=5 : c=6
Print a=b+c
End Sub
程序运行后,单击命令按钮,其结果为______。
A. a=11
B. a=b+c
C. False
D. 出错
[单项选择]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Dim a As Integer, b As Integer, c As Integer
a=1:b=2:c=3
Print fun2(c,b,
在窗体上画一个名称为Text1的文本框,然后画3个单选按钮,并用这3个单选按钮建立一个控件数组,名称

在窗体上画一个名称为Text1的文本框,然后画3个单选按钮,并用这3个单选按钮建立一个控件数组,名称为Option1,程序运行后,如果单击某个单选按钮,则文本框中的字体将根据所选择的单选按钮切换,请选择空白处合适的语句()。 Private Sub Option1_Click(Index As Integer) Select Case Case 0 a=“宋体” Case 1 a=“黑体” Case 2 a=“楷体_GB2312” End Select Text1. =a End Sub

A.Option Text

B.Index Text

C.Index Font

D.Option Font

(26)在窗体上画一个名称为Text1的文本框,然后画三个单选按钮,并用这三个单选按钮建立一个控件数

(26)在窗体上画一个名称为Text1的文本框,然后画三个单选按钮,并用这三个单选按钮建立一个控件数组,名称为Option1,程序运行后,如果单击某个单选按钮,则文本框中的字体将根据所选择的单选按钮切换,请选择空白处合适的语句。 Private Sub Option1_Click(Index As Integer) Select Case________ Case 0 a="宋体" Case 1 a="黑体" Case 2 a="楷体_GB2312" End Select Text1._______=a End SubA.Option Text B.Index Text C.Index Fonr D.Option Fonr

在窗体上画一个名称为Text1的文本框,然后画三个单选按钮,并用这三个单选按钮建立一个控件数组,名

在窗体上画一个名称为Text1的文本框,然后画三个单选按钮,并用这三个单选按钮建立一个控件数组,名称为Option1,程序运行后,如果单击某个单选按钮,则文本框中的字体将根据所选择的单选按钮切换,请选择空白处合适的语句()。 Private Sub Option1_Click(Index AS Integer) Select Case______ Case 0 a="宋体" Case 1 a="黑体"

A.Option Text

B.Index Text

C.Index Font

D.Option Font

我来回答:

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

订单号:

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