运行下列程序：
Private Sub Command1_Click( )
s$ = "abcdefabcdefabcdef"
k = InStr(s$, "c")
Do While k > 0
n = n + 1
s$ = Mid(s$, k + 1)
k = InStr(s$, "c")
Loop
Print n
End Sub
单击Command1命令按钮后，则在窗体上显示的结果是( )。
A.1
B.2
C.3
D.4
运行下列程序：
Private Sub Command1_Click( )
s$ = "abcdefabcdefabcdef"
k = InStr(s$, "c")
Do While k > 0
n = n + 1
s$ = Mid(s$, k + 1)
k = InStr(s$, "c")
Loop
Print n
End Sub
单击Command1命令按钮后，则在窗体上显示的结果是( )。
A.1
B.2
C.3
D.4
C
VIP截止日期：2025-01-02 11:03:56
←请使用支付宝扫码支付
VIP截止日期：2025-01-02 11:03:56
←请使用微信扫码支付
