2. 计算机
  3. 在窗体上画一个命令按钮和一个文本框，并将窗体的KeyPreview属性设置为True，然后编写如下代码： Dim SaveAll As String Private Sub Form_Load() Show Text1.

在窗体上画一个命令按钮和一个文本框，并将窗体的KeyPreview属性设置为True，然后编写如下代码： Dim SaveAll As String Private Sub Form_Load() Show Text1.

admin2009-02-13  83
问题 在窗体上画一个命令按钮和一个文本框，并将窗体的KeyPreview属性设置为True，然后编写如下代码：    Dim SaveAll As String    Private Sub Form_Load()       Show       Text1.Text=" "       Text1.SetFocus    End Sub    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属性设置为True，在键盘上输入abcdefg时，触发Form_KeyPross事件，变量SaveAll的值为“abcdefg”。由于 SaveAll为过程变量，单击命令按钮后，UCase函数将SaveAll的内容转换成大写字符。选项C的答案是正确的。
转载请注明原文地址:https://kaotiyun.com/show/xb1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)