【单选题】在窗体上画一个名称为Text1的文本框,并编写如下程序: Private Sub Form_Load() Show Textl.Text='' Textl.Set Focus End Sub Private Sub Form_MouseUp(Button As Inateger,Shift As Integer,X As Single,Y As Single) Frint'程序设计' End Su...
【单选题】在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim i As Integer,n As Integer For i=0 T0 50 i=i+3 n=n+1 If i>10 Then Exit For Next Textl.Text=Str(n) End Sub 程序运行后,单击命令按...