[单选题]

窗体上有一个名为Commandl的命令按钮和一个名为Timerl的计时器,并有下面的事件过程:

Private Sub Commandl_Click()

Timerl.Enabled=True

E.nd Sub

Private Sub Form_Load()

Timerl.Interval=10

Timerl.Enabled—False

Private Sub Timerl _Timer()

C.ommandl.Left=Commandl.Left+10

E.nd Sub

程序运行时,单击命令按钮,则产生的结果是

A.命令按钮每10秒向左移动一次

B.命令按钮每10秒向右移动一次

C.命令按钮每10毫秒向左移动一次

D.命令按钮每l0毫秒向右移动一次

参考答案与解析:

相关试题

窗体上有一个名为Command 1的命令按钮和一个名为Timer 1的计时器,并

[单选题]窗体上有一个名为Command 1的命令按钮和一个名为Timer 1的计时器,并有下面的事件过程:Private Sub Command 1_Click()Timerl.Enabled=TrueE.nd SubPrivate Sub Form_ Load()Timerl.Interval=10Timerl.Enabled=FalseE.nd SubPrivate Sub Timerl_Timer()C.ommand l .Left=Commandl .Left+10E.nd Sub程序运行时,单

  • 查看答案
  • 设窗体上有一个名为Txtl的文本框和一个名为Commandl的命令按钮,并有以下

    [单选题]设窗体上有一个名为Txtl的文本框和一个名为Commandl的命令按钮,并有以下事件过程:Private Sub Commandl一Click()x!==Val(Textl.Text)Select Case xC.asc Is<-10,Is>=20Print“输入错误”C.ase Is<0Print 20 xC.ase ls<10Print 20C.ase Is=20Print x+10E.nd SelectE.nd Sub程序运行时,如果存文本框中输入一5,则单击命令按

  • 查看答案
  • 窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub

    [单选题]窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Commandl_Click()D.im a(1 0),x%a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2Print xE.nd Sub程序运行后.单击命令按钮,输出结果是A.10个数中奇数的个数B.l0个数中偶数的个教C.10个数中奇数的累加和D.10个数中偶数的累加和

  • 查看答案
  • 窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub

    [单选题]窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Command_Click()D.im a As Integer,b As Integera=8b=12Print Fun(a,b);a;bE.nd SubPrivate Function Fun(ByVal a As Integer,b As Integer)As Integera=a Mod 5b=b\5F.un=aE.nd Function程序运行时,单击命令按钮,则输出结果是A.3 3 2B.3 8 2C.

  • 查看答案
  • 窗体上有一个名为Commandl的命令按钮,并有下面的程序:Private Su

    [单选题]窗体上有一个名为Commandl的命令按钮,并有下面的程序:Private Sub Command1_Click()D.im art(5)As IntegerF.or k=1 TO 5arr(k)=kNext kprog art()F.or k=1 To 5Print alT(k);Next kE.nd subSub prog(a()As Integer)n=UBound(a)F.or i=n To 2 step-1F.or j=1 To n-1if a(j)<a(j+1)Thent=a(

  • 查看答案
  • 窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub

    [单选题]窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Command 1_Click()D.im a As Integer, b As Integera=8b=12Print Fun(a, b);a; bE.nd SubPrivate Function Fun(ByVal a As Integer, b As Integer)As Integera=a Mod 5b=b、5F.un=aE.nd Function程序运行时,单击命令按钮,则输出结果是A.)3 3 2B.

  • 查看答案
  • 若窗体中已有一个名为Commandl的命令按钮、一个名为Labell的标签和一个

    [主观题]若窗体中已有一个名为Commandl的命令按钮、一个名为Labell的标签和一个名为Textl的文本框,且文本框的内容光焕发为空,然后编写如下事件代码: Private Function fx As Long. As Boolean If x Mod 2 =0 Then f =True Else f =False End If End Function Privare Sub Commandl_Click. Dim n As Ling n =ValMeltextl. p=Iiffn.,”Even

  • 查看答案
  • 在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1)

    [单选题]在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ,并在命令按钮中编写如下事件代码: Private Sub Commandl_click() m=2.17 n=Len(Str$(m) +Space(5) ) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示( )。A.5B.8C.9D.10

  • 查看答案
  • 窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器,并有下面的事件过程:<br /><img border="0" style="

    [单选题]窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器,并有下面的事件过程:程序运行时单击命令按钮,则产生的结果是(  )。A.命令

  • 查看答案
  • (30)窗体上有一个名为Command 1的命令按钮,并有如下程序:Privat

    [单选题](30)窗体上有一个名为Command 1的命令按钮,并有如下程序:Private Sub Command 1_Click()D.im a(10),x%F.or k=1To10a(k)=lnt(Rnd*90+10)x=x +a(k) Mod 2Next kPrint xE.nd Sub程序运行后,单击命令按钮,输出结果是A.)10个数中奇数的个数B.)10个数中偶数的个数C.)10个数中奇数的累加和D.)10个数中偶数的累加和

  • 查看答案
  • 窗体上有一个名为Commandl的命令按钮和一个名为Timerl的计时器,并有下