为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500。编写如下程序: Private Sub Form_Load()
Timer1.Enabled=False
End Sub
Private Sub Command1_Click() Private Sub Timer1_Timer() If Label1.Left<Width Then Label1.Left = Label1.Left + 20 Else
Label1.Left=0
End If End Sub
Timer1.Enabled=True
End Sub
程序运行后,单击“开始”按钮,标签在窗体中移动。对于这个程序,以下叙述中错误的是___(29)___
(A) 标签的移动方向为自右向左
(B)单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动
(C) 当标签全部移出窗体后,将从窗体的另一端出现并重新移动
(D)标签按指定的时间时隔移动
? 设有如下程序,通过For循环计算一个表达式的值,这个表达式是___(30)____:
Private Sub Command1_Click()
Dim sum As Double, x As Double
sum = 0: n = 0
For i = 1 To 5
x = n / i: n = n + 1: sum = sum + x
Next
End Sub
(A)1+1/2+ 2/3+3/4+4/5 (B)1+1/2+2/3+3/4
(C)1/2+2/3+3/4+4/5 (D)1+1/2+1/3+1/4+1/5
二、填空题(50分,每空2分)
? Visual Basic中有三种类型的模块文件,即类模块、标准模块和___[1]__窗体模块。 ? 将数学式y3?3
|ab|写成VB表达式,应该是___[2]sqr(y^3+3/abs(a*b))____。
? 赋值语句:a=123 + MID("123456",3,2)执行后,a变量中的值。 ? Visual Basic提供的对数据文件的三种访问方式为顺序访问方式、随机访问
方式___和二进制访问方式。
? 执行下列语句序列,显示的结果是___[5]false___。
a = 2: b = 3: c = 4: d = 5
Print 3 > 2 * b Or a = c And b <> c Or c > d
? 运行下列程序,单击命令按钮,则Text1中显示___[6]5___,窗体中显示___[7]0___。
Private Sub Command1_Click()
Dim i As Integer, j As Integer, a(5, 4) As Integer
本文来自电脑杂谈,转载请注明本文网址:
http://www.pc-fly.com/a/jisuanjixue/article-22686-11.html
他的声音真的很棒
机巡航南海中国岛礁12海里
不错