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

admin2009-02-13  41

问题 在窗体上画一个文本框,然后编写如下事件过程:    Private Sub Text1_KeyPress(KeyAscii As Integer)       Dim char As String       char=Chr(KeyAscii)       KeyAscii=Asc(Ucase(char))       Print String(6,KeyAscii)    End Sub    程序运行后,如果在键盘上输入字母“a”,则在窗体上显示的内容为

选项 A、a
B、A
C、aaaaaa
D、AAAAAA

答案8

解析 Chr(x)是将x的值转换为相应的ASCII字符,Asc(x)是返回字符串x中第一个字符的ASCII码,Ucase(“字符串”)将“字符串”中的小写字母转换为大写字母。函数String(n,字符串)的功能是返回由n个指定字符组成的字符串。本程序中是将在文本框中输入的字符都转换成6个大写字符输出。
转载请注明原文地址:https://jikaoti.com/ti/6Zq0FFFM
0

最新回复(0)