当前位置: 答题翼 > 问答 > 计算机类考试 > 正文
目录: 标题| 题干| 答案| 搜索| 相关
问题

运行下列程序:Private Sub Command1_Click()s$ = "abcdefabcdefabcdef"k = InStr(


运行下列程序:

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()MsgBox CStr(123 + 321)

  • 下列程序运行后,信息框显示的内容是()。Private Sub Command1_Click()Dim s1 As StringDim s2

  • 运行下列程序:Private Sub Command1_Click()x = "祝你成功"y = "1234"F

  • 运行下列程序:Private Sub Command1_Click()x = 1z = InputBox("请输入一个整数2"

  • 运行下列程序:Private Sub Command1_Click()a = Val(InputBox("a = "))Print fun1

  • (14)有下列程序,程序运行后单击命令按钮,则输出的结果是 Private Sub Command1_Click() Dim a%(1