![]()
请回答下列问题:

For i = 1 To 2
For j = 2 To 7 - i
If a(j) > a(j - 1) Then
k = a(j): a(j) = a(j - 1): a(j - 1) = k
End If
Next j
Next i
数组元素a(1)到a(6)的值依次为“71,54,58,29,31,78”,经过该程序段“加工”后,下列说法正确的是( )
a = 1
For p=1 to 50
If p Mod 3 = 0 Then a = a + 1
Next p
Private Sub Command1_Click()
Dim i As Integer, n As Integer
Dim s As String
s="1"
i=2
Do While i<=Val(Text1.Text)
If Then
n=n\i
s=s+"*"+Str(i)
Else
End If
Loop
Label3.Caption=Text1.Text+"="+s
End Sub
