（26）窗体上有1个名称为Text1的文本框；1个名为Timer1的计时器控件，其Interval属性值为5000，Enable属性值是True。Timer1的事件过程如下：
Private Sub Timer1_Timer()
Static flag As Integer
If flag=0 Then flag=1
flag=-flag
If flag=1 Then
Text1.ForeColor=&HFF& ‘&HFF&为红色
Else
Text1.ForeColor=&HC000& ‘&HC000&为绿色
End If
End Sub
以下叙述正确的是
A）每次执行些事件过程时，flag的初始值为0
B）flag的值只可能取0或1
C）程序执行后，文本框的文字每5秒改变一次颜色
D）程序有逻辑错误，Else分支总也不能被执行
（27）为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Text1中，若编写如下事件过程：
Private Sub Command1_Click()
Dim a%,s%,k%
s=1
a=2
For k=2 To 10
a=a*2
s=s+a
Next k
Text1.Text=s
End Sub
执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是
A）把s=1改为s=0
B）把For k=2 To 10改为For k=1 To 10
C）交换语句s=s+a和a=a*2的顺序
D）同时进行B）、C）两种修改
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >>
