在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String Str=Chr(KeyAscii) KeyAscii

admin2010-11-20  25

问题 在窗体上画一个文本框,其名称为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字符。
转载请注明原文地址:https://jikaoti.com/ti/V4g0FFFM
0

最新回复(0)