违法和不良信息举报 联系客服
免费注册 登录

在窗体上画一个名称为Text1的文本框,然后编写如下的事件过程:Private Sub Text1_KeyPress(Keyasc

题目

在窗体上画一个名称为Text1的文本框，然后编写如下的事件过程： Private Sub Text1_KeyPress(Keyascii As Integer) ... End Sub 若焦点位于文本框中，则能够触发此事件的操作是( )。

A．左键单击文本框

B．左键双击文本框

C．右键单击文本框

D．按下键盘上的某个键

参考答案和解析
正确答案：D
解析：本题考查控件事件的基础知识。在窗体上每一个控件都是一个对象，都具有属性、事件和方法3个要素。事件是控件可以响应的动作，KeyPress事件当焦点在控件上并且按下键盘上某个键时被触发。
如果没有搜索结果或未解决您的问题，请直接 联系老师 获取答案。
相似问题和答案

第1题：

在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：

程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。


正确答案：
9【解析】本题考查多分支语句SelectCase的知识。SelectCase用于实现多分支结构，其使用格式为： 其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行.如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行y=x*x后退出Case结构，最后Y的值为9。

第2题：

在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程： Private Sub Form_Load() TextText= " " TextSetFocus For i=1 To 10 Sum=Sum+i Next i TextText=Sum End Sub 上述程序的运行结果是 ______。

A．在文本框Text1中输出55

B．在文本框Text1中输出0

C．出错

D．在文本框Text1中输出不定值


正确答案：C
解析：焦点只能移到可视的窗体或控件。因为在窗体的Load事件完成前窗体或窗体上的控件是不可视的，所以如果不是在Form_Load事件过程完成之前首先使用Show方法显示窗体的话，是不能使用SetFocus方法将焦点移至正在自己的Load事件中加载的控件上的。

第3题：

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是

A． Visual

B．Basic

C．Program

D．出错


正确答案：C
解析：Text是文本框的默认属性。

第4题：

在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：

程序运行后，单击命令按钮，在文本框中显示的值是

A．2

B．3

C．4

D．5


正确答案：B
题只能计算当i>1所循环的次数。注意i在循环体内被强行加3，到For循环时．还要再加步长1，这相当于因此，n=3。选择B。

第5题：

设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。

A. 30

B. 25

C. 20

D. 15


正确答案：A
A)    【解析】本题考查函数的参数。数组作为参数进行传递时，VB中默认的参数传递方式为地址传递。过程Fun的功能是计算数组中所有元素的积。数组的元素为2 4 6 8 10，因此最后文本框中显示的内容为30。

第6题：

窗体上画一个名称为Text1的文本框，然后编写如下事件过程： Private Sub Form. Load() Show TextSetFocus End Sub Private Sub Text1_ KeyPress (KeyAscii As Integer) Dim ch As String ch = Chr (KeyAscii) KeyAscii = Asc(UCase(ch)) Pint Chr(KeyAscii + 4) End Sub程序运行后，在文本框中输入abcde，则在窗体上显示的内容是______。

A．abcde

B．efghi

C．EFGHI

D．ABCDE


正确答案：C

第7题：

在窗体上画一个名称为Text1的文本框，然后编写如下事件过程： Private Sub Text1_ KeyPress (KeyAscii As Integer) Dim ch As String ch = Chr (KeyAscii) KeyAscii = Asc (UCase(ch)) TextText = String(1, KeyAscii) End Sub程序运行后，使文本框拥有焦点，然后按键盘上的B键，则在文本框中显示的内容是 ______。

A．b

B．bb

C．BB

D．B


正确答案：C

第8题：

在窗体上画一个文本框(Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4，KeyAscii) End Sub 程序运行后，在文本框Text1中输入A，则程序在窗体上的输出结果为

A．a

B．A

C．aaaa

D．AAAA


正确答案：D
解析：Chr(x)是将x的值转换为相应的ASCII字符，Asc(x)是返回字符串x中第一个字符的ASCII码，Ucase(“字符串”)将“字符串”中的小写字母转换为大写字母。本程序是将在文本框中输入的字符都转换成4个大写字符输出。

第9题：

在窗体上画一个名称为Text1的文本框，然后编写如下的事件过程：Pfivate Sub Text1_KeyPress(Keyascii As Integer) … End Sub 若焦点位于文本框中，则能够触发此事件的操作是( )。

A．单击文本框

B．双击文本框

C．单击文本框

D．按键盘上的某个键


正确答案：D

相关内容