试题

试题 试卷

logo

题型:综合题 题类:模拟题 难易度:普通

浙江省杭州市2016年信息技术高考模拟卷十二

编写VB程序,实现如下功能:在文本框Text1中输入骑士奔跑的速度值(为1到10之间的整数),单击“奔跑”按钮Command1,骑士以相应的速度从左往右循环奔跑,单击“停止”按钮Command2,骑士停止奔跑。界面如图1示。

(1)、在设计应用程序界面时,应使用图2示“控件工具箱”中的(填写相应编号)添加用于输入文字“加减速(1到10)”的控件。
(2)、为实现上述功能,请在划线处填入合适代码。

    Private Sub Command1_Click()

    Dim x As Integer

x =

    If (x > 0) And (x <= 10) Then

        Timer1.Enabled =

        Timer1.Interval = 1000 \ x

    Else

        Text1.Text = "错误"

   

    End Sub

举一反三
返回首页

试题篮