网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体上有一个计时器控件Timer1和一个标签控件Labe11,在程序运行的时候,可通过每隔30ms让Labe11左移100缇,从而产生文字移动动画效果。文字从右向左移动,当移动到接近窗体左边界时停止移动,如图20-9所示。

空格处应填( )。 Private Sub Form_Load() Labell.Left=Form1.Width Timer1.Interval=30 Timer1.Enabled=True End Sub Private Sub Timer1_Timer() Labell.Left=Labell.Left-100 If Labell.Left<100 Then _____________ End If End Sub

A.Timer1.Enabled=False

B.Timer1.Interval=30

C.Labell.Enabled=True

D.Labell.Left=0


参考答案

更多 “ 在窗体上有一个计时器控件Timer1和一个标签控件Labe11,在程序运行的时候,可通过每隔30ms让Labe11左移100缇,从而产生文字移动动画效果。文字从右向左移动,当移动到接近窗体左边界时停止移动,如图20-9所示。空格处应填( )。 Private Sub Form_Load() Labell.Left=Form1.Width Timer1.Interval=30 Timer1.Enabled=True End Sub Private Sub Timer1_Timer() Labell.Left=Labell.Left-100 If Labell.Left<100 Then _____________ End If End SubA.Timer1.Enabled=FalseB.Timer1.Interval=30C.Labell.Enabled=TrueD.Labell.Left=0 ” 相关考题
考题 设计表单bd2,表单中有一个标签和一个汁时器控件,运行时标签“欢迎您!”为从右向左移动的字幕,移动时间间隔为20毫秒。

考题 在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图所示。编写如下程序:Private Sub Form_Load()Timer1.Enabled=FalseEnd SubPrivate Sub Command1_Click()Timer1.Enabled=TrueEnd SubPrivate Sub Command2_Click()Timer1.Enabled=FalseEnd SubPrivate Sub Timer1_Timer()If Label1.LeftLabel1.Left = Label1.Left + 20ElseLabel1.Left=0End IfEnd Sub程序运行后单击“开始”按钮,标签在窗体中移动。对于这个程序,以下叙述中错误的是( )。A.标签的移动方向为自右向左B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动C.当标签全部移出窗体后,将从窗体的另一端出现并重新移动D.标签按指定的时间间隔移动

考题 在窗体上画一个名称为Labe11、标题为“VisualBasic考试”的标签,两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timerl的计时器控件,并把其Interval属性设置为500,如下图所示。编写如下程序: Private Sub Form_Load() Timer1.Ena bled=False End Sub Private Sub Commandl_ChCk() Timer1.EnaA.标签的移动方向为自右向左B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动C.当标签全部移出窗体后,将从窗体的另一端出现,重新移动D.标签按指定的时间间隔移动

考题 在窗体上有一个计时器控件Timer1和一个标签控件Label1,在程序运行时可通过每隔30毫秒让Lable1左移100缇,从而产生文字移动动画效果。文字从右向左移动,当移动到接近窗体左边界时停止移动。空格处应填 ______。 Private Sub Form1_Load() LabelLeft=FormWidth TimerInterval=30 ______ End Sub Private Sub Timer1_Timer() Lable1.Left=LableLeft -100 If Lablel. Left<100 Then TimerEnable=False End If End SubA.Timer1. Enable=TrueB.Label1.Enable=TrueC.Timer1. Enable=FalseD.Label1. Enable=False

考题 在窗体上画一个名称为Label1、标题为“Visual Basic考试”的标签,两个名称分别为Conmmnd1和Com— mand2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图所示。编写如下程序: Private Sub Form_Load( ) Timer1.Enabled=False End Sub Private Sub Command1_Click( ) Timer1.Enabled=True End Sub PrivateSubCommand2_Click( ) Fimerl.Enabled=False End Sub Private SubTimer1_Timer( ) If Label1.Left<Width Then Label1.Left=Label1.1eft+20 Else Label1.Left=0 End If End Sub 程序运行后单击“开始”按钮,标签在窗体中移动。 对于这个程序,以下叙述中错误的是A.标签的移动方向为自右向左B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动C.当标签全部移出窗体后,将从窗体的另—端出现并重新移动D.标签按指定的时间间隔移动

考题 在窗体上画一个名称为Labell、标题为“ViSBalBasic考试”的标签,两个名称分别为 Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图所示。编写如下程序: Private Sub Form Load() Timerl.Enabled = False End Sub Private Sub Command1 Click() Timer1.Enabled = True End Sub Private Sub Command2 Click() Timerl.Enabled = False End Sub Private Sub Timerl Timer() If Labell.Left<Width Then Labell.Left = Labell.Left+20 Else Labell.Left = 0 End If End Sub 程序运行后单击“开始”按钮,标签在窗体中移动。 对于这个程序,以下叙述中错误的是A.标签的移动方向为自右向左B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动C.当标签全部移出窗体后,将从窗体的另一端出现,重新移动D.标签按指定的时间间隔移动

考题 在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两个名称分别为Command1和Conlmand2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图16-7所示。 编写如下程序: Private Sub Form_Load() Timer1. Enabled=False End Sub Private Sub Command1_Click() Timer1. Enabled=True End Sub Private Sub Command2_Click() Timer1. Enabled=False End Sub Private Sub Timer1_Timer() If Label1. Left<Width Then Label1. Left=Label1. Left+20 Else Label1. Left=0 End If End Sub 程序运行后单击“开始”按钮,标签在窗体中移动。对于这个程序,以下叙述中错误的是______。A.标签的移动方向为自右向左B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动C.当标签全部移出窗体后,将从窗体的另一端出现并重新移动D.标签按指定的时间间隔移动

考题 在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图所示。编写如下程序: Private Sub Form_Load( ) Timer1.Enabled=false End Sub Private Sub Command1 Click( ) Timer1.Enabled=True End Sub Private Sub Timer1_Timer( ) If Label1.Left<Width Then Label1.Left=label1.Left+20 Else Label1.Left=0 End If End Sub程序运行后单击“开始”按钮,标签在窗体中移动。对于这个程序,以下叙述中错误的是A.标签的移动方向为自右向左B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动C.当标签全部移出窗体后,将从窗体的另一端出现并重新移动D.标签按指定的时间间隔移动

考题 窗体中有图片框(Picture1)和计时器(Timer1)两个控件,运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下角移动,每次向左、向右移动100单位。请在[ ]填空: