在窗体上画一个名称为TxtA的文本框,然后编写如下事件过程:PrivateSubTxtA_KeyPress(Keyasciiasinteger)…EndSub若焦点位于文本框中,则能够触发KeyPress事件的操作是()A、单击鼠标B、双击文本框C、鼠标划过文本框D、按下键盘上的某个键
题目
A、单击鼠标
B、双击文本框
C、鼠标划过文本框
D、按下键盘上的某个键
相似考题
更多“在窗体上画一个名称为TxtA的文本框,然后编写如下事件过程:PrivateSubTxtA_KeyPress(Keyasciiasinteger)…EndSub若焦点位于文本框中,则能够触发KeyPress事件的操作是() ”相关问题
-
第1题：
在窗体上一个文本框，其名称为Text1,然后编写如下事件过程：
PrivateSubText2_KeyPress(KeyAsciiAsInteger)
DimstrAsString,nAsInteger
str=Ucase(Chr(KeyAscii))
n=Len(str)
Text1=String(n,str)
EndSub
程序运行后，如果在TEXT2中通过键盘上输入单字母"k"，则在文本框Text1中显示的内容为( )
A.k
B.K
C.KK
D.Kk
正确答案：B -
第2题：
VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Textl文本框中，则每输入一个字母
A．这3个事件都会触发
B．只触发KeyPress事件
C．只触发KeyDown、KeyUp事件
D．不触发其中任何一个事件
正确答案：A
解析：在输入字母时这三个键盘事件都会发生。KeyDown事件是当一个键被按下时所产生的事件，而Key[jp事件是松开被压下的键时所产生的事件，而在此过程中KeyPress事件在按下并抬起的过程中也会发生。只是KeyDown和KeyUp事件返回的是键盘的直接状态。换言之，KeyDown和KeyUp事件返回的是键盘的KeyCode，而KeyPress事件返回的是“字符”的ASCII码。 -
第3题：
在窗体上画一个名称为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
-
第4题：
在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：
程序运行后，单击命令按钮，在文本框中显示的值是__________。
正确答案：
30【解析】本题考查VBA中二维数组和循环的知识。本题属于比较简单的问题，使用了二重循环为二维数组进行了部分赋值，最后求两个数组元素值并求和，注意这两个元素是否已被赋值，若没有赋值则为0。本题中对于a(2，3)赋值为2*3也就是6，a(4，6)赋值为4*6也就是24，最后的结果为6 24=30。 -
第5题：
在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(keyaseii as integer) …… End Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是
A．单击鼠标
B．双击文本框
C．鼠标滑过文稿本框
D．按下键盘上的某个键
正确答案：D
解析：只要按下键盘上的任何键，都可以触发KeyPress事件。故选择D项。A项触发的事件为MouseDown或MouseUp，B项触发文本框的DblClick事件，而C触发了文本框的MouseMove事件。 -
第6题：
在窗体上画一个文本框，然后编写如下事件过程。当该程序运行后，如果在键盘上输入字母“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
正确答案：D
解析：在程序段用到了4个函数，在按了键盘上的某个键(在这里是字母键A)后，Chr函数将得到的键的ASCII码值(101)转换成该ASCII码值对应的字符(A)，然后利用Ucase函数将该字符转换成大写字母(A)，将该大写字母的ASCII码值(利用函数Asc())赋给 KeyAscii，最后利用String函数的5个ASCII码值等于KeyAscii的字符(即5个A)赋给文本框Text1，此时文本框中将显示5个A，又因为KeyPress事件本身会在文本框中显示\输入一个ASCII码值为KeyAscii的字符(A)，因此最后在文本框中将显示6个大写字母A。 -
第7题：
在窗体上画一个名称为Text1的文本框，然后编写如下的事件过程： Private Sub Text1_KeyPress(Keyascii As Integer) ... End Sub 若焦点位于文本框中，则能够触发此事件的操作是( )。
A．左键单击文本框
B．左键双击文本框
C．右键单击文本框
D．按下键盘上的某个键
正确答案：D
解析：本题考查控件事件的基础知识。在窗体上每一个控件都是一个对象，都具有属性、事件和方法3个要素。事件是控件可以响应的动作，KeyPress事件当焦点在控件上并且按下键盘上某个键时被触发。 -
第8题：
在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
程序运行后，单击命令按钮，在文本框中显示的值是
A．2
B．3
C．4
D．5
正确答案：B
题只能计算当i>1所循环的次数。注意i在循环体内被强行加3，到For循环时．还要再加步长1，这相当于因此，n=3。选择B。 -
第9题：
在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(key Ascii As Integer) End Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是( )。
A．单击鼠标
B．双击文本框
C．鼠标滑过文本框
D．按下键盘上的某个键
正确答案：D
-
第10题：
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，然后编写如下事件过程：
正确答案：
15【解析】本题考查VBA程序中过程调用的知识。由于VBA中，默认情况下，参数是按地址传递(ByRef)，对形参的改变会影响到实参。本题中2的值等于a b，这个z值会返回给实参c，所以文本框中显示的内容为15。 -
第11题：
单选题在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：程序运行后，在文本框中输入456，然后单击命令按钮，在输入对话框中输入123，则文本框中显示的内容是（ ）。A579
B123
C456123
D456
正确答案： C解析：
默认情况下，InputBox的返回值是一个字符串，因此程序中a="123"，b="456"，b+a="456"+"123"="456123"。使用字符连接运算符“+”时，如果连接的是字符串和数值，可根据返回值类型判断，若返回值类型为字符串，则它将数值转换成字符串后与另一字符串连接成新字符串返回；若返回值类型为数值，则它要求字符串中只能包含数字，而不能有其他字符，否则报“类型不匹配”的错误。 -
第12题：
单选题在窗体上画一个名称为Txta的文本框，然后编写如下的事件过程：Private Sub Txta_KeyPress（keyascii asinteger）EndSub若焦点位于文本框中，则能够触发KeyPress事件的操作是（）A单击鼠标
B双击文本框
C鼠标滑过文本框
D按下键盘上的某个键
正确答案： C解析： 暂无解析 -
第13题：
在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位于文本框中，则能够触发KeyPress事件的操作是______。
A．单击鼠标
B．双击文本框
C．鼠标滑过文本框
D．按下键盘上的某个键
正确答案：D
解析：KeyPress事件用来识别按键的ASCII码，从而识别键盘上某个键的按下与释放。 -
第14题：
在窗体上画一个文本框(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个大写字符输出。 -
第15题：
在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(Key Ascii As Integer) Dim char As String char=Chr(Key Ascii) KeyAscii=Asc(UCase(char)) Text1．Text=Sting(6，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为______。
A．a
B．A
C．aaaaaaa
D．AAAAAAA
正确答案：D
解析：该事件过程中首先用Chr函数记录下输入的字符，然后用UCase函数将其转化为大写，再用Asc函数记录下其码值．最后使用String函数将其重复6遍并输出到文本框中。当文本框中的文本内容发生变化的时候，会触发文本框的Change事件，而KeyPress事件是在Change事件之前触发的，在发生KeyPress事件之前，尚未触发Change事件。在KeyPress事件中，改变了文本框的Text属性，所以会触发Change事件，之后，键盘输入的信息“a”才在变为大写之后输入文本框，文本框中最终显示的是7个“A”。 -
第16题：
在窗体上面画一个名称为Txt A的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(Keyascii as integer) .... End Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是 ______。
A．单击鼠标
B．双击文本框
C．鼠标滑过文本框
D．按下键盘上的某个键
正确答案：D
解析：KeyPress事件用来识别按键的ASCII码，从而识别键盘上某个键的按下与释放。 -
第17题：
窗体上画一个名称为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
-
第18题：
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
正确答案：12
12 解析： 本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。 -
第19题：
在窗体上画一个文本框，然后编写如下事件过程：
程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为（ ）。A. a
B. A
C. aaaaaa
D. AAAAAA
正确答案：D
D) 【解析】本题考查KeyPress事件过程和字符串函数。KeyPress事件的过程格式为：Sub object_KeyPress([Index As Integer,]KeyAscii As Integer)，其中KeyAscii为字符ASCII码。当在文本框中输入字符a后，UCase函数把输入的字符转化为大写字符，Asc函数则把字符转化为ASCII码值。String函数则产生6个同样的字符A。
-
第20题：
在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str As String
Str=Chr(KeyAscii)
KeyAscii=Asc(UCase (str))
Textl.Text=String(2, KeyAscii)
End Sub
程序运行后,如果在键盘上输入字母"b",则在文本框Text1中显示的内容是
A．bbb
B．BBB
C．BB
D．bb
正确答案：C
解析：考查对转换函数Ucase$和Chr$的概念和使用方法。Ucase$(字符串)是指"字符串"中的小写字母转换为大写字母,Chr$(x)是把x的值转换为相应的ASCII字符。 -
第21题：
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：
程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。
正确答案：
9【解析】本题考查多分支语句SelectCase的知识。SelectCase用于实现多分支结构，其使用格式为：
其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行.如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行y=x*x后退出Case结构，最后Y的值为9。
-
第22题：
在窗体上画一个名称为Txta的文本框，然后编写如下的事件过程：Private Sub Txta_KeyPress（keyascii asinteger）EndSub若焦点位于文本框中，则能够触发KeyPress事件的操作是（）
- A、单击鼠标
- B、双击文本框
- C、鼠标滑过文本框
- D、按下键盘上的某个键
正确答案:D -
第23题：
单选题在窗体上画一个文本框，然后编写如下事件过程：程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为（ ）。A123
B456
C579
D123456
正确答案： D解析：
InputBox函数返回的是字符型内容，文本框的Text属性也是字符型，所以两个字符型变量进行“+”运算实际上是将两个字符串连接起来。在窗体上显示内容为“123456”。