单项选择题

在Activate事件过程中，写入下面的程序： Prirate Sub Form_Activate() Dim S As String，a As String，b As String a="*"：b="$" For i=1 To 4 If i/2=Int(i/2) Then S=String(Len(a)+i,b) Else S=String(Len(a)+i,a) End If Print S： Next i End Sub 运行程序后，显示的结果是( )。

A．$$***$$$$*****
B．*$$**$$***$$$****$$$$
C．**$$$****$$$$$
D．$*$$**$$$***$$$$****

<上一题目录下一题>

热门试题

填空题

对长度为10的线性表进行冒泡排序，最坏情况下需要比较的次数为______。

填空题

对随机文件数据存取是以______为单位进行操作的。