在窗体上画一个名称为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．bB．bbC．BBD．B

题目

在窗体上画一个名称为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

如果没有搜索结果，请直接联系老师获取答案。

相似问题和答案

第1题：

在窗体上画一个名称为TxtA的文本框,然后编写如下事件过程:PrivateSubTxtA_KeyPress(Keyasciiasinteger)…EndSub若焦点位于文本框中,则能够触发KeyPress事件的操作是()

A、单击鼠标

B、双击文本框

C、鼠标划过文本框

D、按下键盘上的某个键

正确答案：D

第2题：

在窗体上画一个文本框,其名称为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字符。

第3题：

在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim sb As String Str=Chr(KcyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“b”，则在文本框Text1中显示的内容是

A．bbb

B．BBB

C．BB

D．bb

正确答案：C
解析：Ucase$(字符串)是指“字符串”中的小写字母转换为大写字母，Chr$(x)是把x的值转换为相应的ASCII字符。

第4题：

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

A．左键单击文本框

B．左键双击文本框

C．右键单击文本框

D．按下键盘上的某个键

正确答案：D
解析：本题考查控件事件的基础知识。在窗体上每一个控件都是一个对象，都具有属性、事件和方法3个要素。事件是控件可以响应的动作，KeyPress事件当焦点在控件上并且按下键盘上某个键时被触发。

第5题：

窗体上画一个名称为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

第6题：

在窗体上画一个文本框(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个大写字符输出。

第7题：

在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位于文本框中，则能够触发KeyPress事件的操作是______。

A．单击鼠标

B．双击文本框

C．鼠标滑过文本框

D．按下键盘上的某个键

正确答案：D
解析：KeyPress事件用来识别按键的ASCII码，从而识别键盘上某个键的按下与释放。

第8题：

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

A．单击文本框

B．双击文本框

C．单击文本框

D．按键盘上的某个键

正确答案：D

第9题：

（ 28 ）在窗体上画一个名称为 TxtA 的文本框，然后编写如下的事件过程：

Private Sub TxtA _KeyPress(KeyAscii As Integer)

......

End Sub

假定焦点已经位于文本框中，则能够触发 KeyPress 事件的操作是

A ）单击鼠标

B ）双击文本框

C ）鼠标滑过文本框

D ）按下键盘上的某个键

正确答案：D

计算机二级

题目

相似问题和答案

相关内容