题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-11-13 19:53:42

[单项选择]程序运行时,用户向文本框输入内容时,将触发文本框的( )事件。
A. Click
B. DblClick
C. Gotfocus
D. Change

更多"程序运行时,用户向文本框输入内容时,将触发文本框的( )事件。"的相关试题:

[单项选择]程序运行时,用户向文本框输入内容时,将触发文本框的( )事件。
A. Click
B. Db1Click
C. GotFocus
D. Change
[单项选择]运行时,当用户向文本框输入新的内容,或在程序代码中对文本框的Text属性进行赋值从而改变了文本框的Text属性时,将触发文本框的( )事件。
A. Click
B. DblClick
C. GotFocus
D. Change
[单项选择]在运行程序时,在程序代码中改变文本框的Text属性值,或在文本框中输入新的内容,相应会触发( )事件。
A. GotFocus
B. Click
C. Change
D. DblClick
[单项选择]通过文本框( )事件过程可以获取文本框中输入字符的ASCII码值。
A. Change
B. LostFocus
C. KeyPress
D. GotFocus
[单项选择]在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母e,则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1.Text=String(5,KeyAscii) End Sub
A. eeeee
B. EEEEE
C. eeeeee
D. EEEEEE
[单项选择]通过文本框的( )事件过程可以获取文本框中输入字符的ASCII码值。
A. Change
B. GotFocus
C. LostFocus
D. KeyPress
[单项选择]在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母“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
[单项选择]设窗体上有一个文本框,名称为Textl,程序运行后,要求该文本框只能显示信息,不能接收输入的信息,以下能实现该操作的语句是( )。
A. TextMaxLength=0
B. TextEnabled=False
C. TextVisible=False
D. TextWidth=0
[单项选择]要在文本框获得焦点时操作文本框中的内容,应该在( )事件过程中编写程序。
A. GoFocus
B. LostFocus
C. Change
D. SetFoeus
[单项选择]在窗体上放一个文本框Text1,在文本框中输入456,并有如下事件过程: Private Sub Form_Click( ) x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 单击该窗体,在输入对话框中输入123,单击“确定”按钮后,窗体上显示是( )。
A. 123
B. 456
C. 579
D. 123456
[单项选择]在窗体上放一个文本框Text1,在文本框中输入456,并有下列事件过程: Private Sub Form_Click( ) x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 单击该窗体,在输入对话框中输入123,单击“确定”按钮后,窗体上显示的是( )。
A. 123
B. 456
C. 579
D. 123456
[单项选择]在窗体上画一个名称为Text1的文本框,要求文本框只能接收大写字母的输入,以下能实现该操作的事件过程是______。
A. Private Sub Text1_KeyPress(KeyAscii As Intege If KeyAscii<65 Or KeyAscii>90 Then MsgBox"请输入大写字母" KeyAscii=0 End If End Sub
B. Private Sub Text1_KeyDown(Keycode As Integer, Shift As Intege If KeyCode<65 Or Keycode>90 Then MsgBox"请输入大写字母" KcyCode=0 End If End Sub
C. Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Singl If Asc(Text1. Tex<65 Or Asc(Text1. Tex>90 Then MsgBox"请输入大写字母" End If End Sub
D. Private Sub Text1_Change() If Asc(Text1. Tex>64 Or Asc(Text1. Tex<91 Then MsgBox"请输入大写字母" End If End Sub

我来回答:

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

订单号:

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