[单选题]

( 19 )在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程:

Private Sub Command1_Click()

D.im i As Integer, n As Integer

F.or i = 0 To 50

i = i + 3

n = n + 1

If i > 10 Then Exit For

Next

Text1.Text = Str(n)

E.nd Sub

程序运行后,单击命令按钮,在文本框中显示的值是

A. ) 5

B. ) 4

C. ) 3

D. ) 2

参考答案与解析:

相关试题

在窗体(名称为Forml)上画一个名称为Text1的文本框和一个名称为Comma

[单选题]在窗体(名称为Forml)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。A. Private Sub Text1_Change() Commandl.Caption="计算机等级考试" End SubB.Private Sub Commandl_Click() Caption=”计算机等级考试” End SubC.Pr

  • 查看答案
  • ( 15 )在窗体上画一个文本框(名称为 text1 )和一个标签(名称为 la

    [单选题]( 15 )在窗体上画一个文本框(名称为 text1 )和一个标签(名称为 label1 ) , 程序运行后,在文本框中每输入一个字符 , 都会立即在标签中显示文本框中字符的个数 , 以下可以实现实现上述操作的事件过程是A. )Private Sub Text1_Change()Label1.Caption = Str(Len(Text1.Text))E.nd SubB. )Private Sub Text1_Click()Label1.Caption = Str(Len(Text1.Text)

  • 查看答案
  • 在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令

    [单选题]在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮,然后编写如下事件过程:Private Commandl_Click()D.im i As Integer, n As IntegerF.or i=0 To 50i = i+3n = n+1If i>10Then Exit ForNextTextl.Text=Str(n)E.nd Sub程序运行后,单击命命令按钮,在文本框中显示的值是( )。 A.5B.4C.3D.2

  • 查看答案
  • 在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Comma

    [单选题]在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是( )。A.Private Sub Text1_Change()C.ommand1.Caption = "计算机等级考试"E.nd SubB.Private Sub Command1_ Click ()C.aption = "计算机等级考试"E.nd Sub

  • 查看答案
  • 在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Comma

    [单选题]在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。A.Prlvate Sub Text1_Change() Command1. Caption="计算机等级考试" End SubB.Private Sub Command1_Click() Caption="计算机等级考试" End SubC.

  • 查看答案
  • (27)在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1

    [单选题](27)在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )D.im i As Integer, n As IntegerF.or i=0 To 50i=i+3n=n+1If i>10 Then Exit ForNextText1.Text=Str(n)E.nd Sub程序运行后,单击命令按钮,在文本框中显示的值是( )。A.)2B.)3C.)4D.)5

  • 查看答案
  • ( 17 ) 在窗体上画一个文本框 ( 其名称为 Text1 ) 和一个标签 (

    [单选题]( 17 ) 在窗体上画一个文本框 ( 其名称为 Text1 ) 和一个标签 ( 其名称为 Label1 ) , 程序运行后 , 如果在文本框中输入指定的信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是A. ) Private Sub Text1_Click()Label1.Caption = Text1.TextE.nd SubB. ) Private Sub Text1_Change()Label1.Caption = Text1.TextE.nd SubC. ) Pri

  • 查看答案
  • 在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell),程

    [单选题]在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是______。A. Private Sub Text1 Click() Labell.Caption=Text1.Text End SubB.Private Sub Text1_Change() Labell.Caption=Text1.Text End SubC.Private Sub Labell_Change(

  • 查看答案
  • 在窗体上画一个文本框(其名称为 Text1)和一个标签(其名称为 Label1)

    [单选题]在窗体上画一个文本框(其名称为 Text1)和一个标签(其名称为 Label1),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容,以下可以实现上述操作的事件过程是( )。A.Private Sub Text1_Click()Label1.Caption=Textl.TextE.nd SubB.Private Sub Text1_Change()Label1.Caption=Text1.TextE.nd SubC.Private Sub Label1_Ctrange()La

  • 查看答案
  • 在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运

    [单选题]在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后如果在文本框中输入文本,则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是( )。A.Private Sub Text1_Change() Label1.Caption=Text1.Text End SubB.Private Sub Label 1_Change() Label1.Caption=Text1.Text End SubC.Private Sub Text1_Click() Label1.C

  • 查看答案
  • ( 19 )在窗体上画一个名称为 Text1 的文本框和一个名称为 Comman