在窗体上画一个命令按钮和一个文本框,并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim Save All As String Private Sub Command1_Click() Text1.Text=UCa

admin2009-01-15  24

问题 在窗体上画一个命令按钮和一个文本框,并把窗体的KeyPreview属性设置为True,然后编写如下代码:    Dim Save All As String    Private Sub Command1_Click()    Text1.Text=UCase(SaveAll)    End Sub    Private Sub Form_KeyPress(KeyAscii As Integer)        SaveAll=SaveAll+Chr(KeyAscii)    End Sub    程序运行后,在键盘上输入“abcdefg”,单击命令按钮,则文本框中显示的内容为 ______。

选项 A、abcdefg
B、不显示任何信息
C、ABCDEFG
D、出错

答案4

解析 KeyPreview属性返回或设置一个值,以决定是否在控件的键盘事件之前激活窗体的键盘事件。键盘事件为:KeyDown、KeyUp和KeyPress。UCase函数的作用是将指定的字符串中的字符转化为大写。
转载请注明原文地址:https://jikaoti.com/ti/Sj80FFFM
0

最新回复(0)