在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图所

admin2006-08-25  76

问题 在窗体上画一个名称为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、标签按指定的时间间隔移动

答案A

解析 单击开始按钮后时钟事件开始执行,Label1.Left=Lebel1. Left+ 20是指标签框向右运动,If判断语句是说当标签框的左端大于窗体宽度时标签框的Left属性将为0,也就是将从窗体的最左端重新移动;选项 B)、选项C)和选项D)都正确,只有选项A)描述错误。
转载请注明原文地址:https://jikaoti.com/ti/AV80FFFM
0

最新回复(0)