问答题

在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview设置为True（在激活对象上的控件键盘事件之前，优先激活键盘事件,即Form优先）然后编写如下代码：Dim SaveAll As StringPrivate Sub Command1_Click()Text1.Text=Ucase(SaveAll)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)SaveAll= SaveAll+Chr(KeyAscii)End Sub程序运行后，在键

答案： ABCDEFG

你可能感兴趣的试题

编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub一般情况下(即不按住Shift和锁定大写)运行程序，如按“A”键则输出( )。

答案： A a

运行以下程序后 ,输出的图形是( ) 。 For r=0 To 150 Circle(320,240),r For i=1 To l000 Next i Next r

答案：一个固定的实心圆