琴弦有关的诗句:VB编程问题

来源:百度文库 编辑:高考问答 时间:2024/05/05 20:08:46
统计字符窜a中出现字符窜b的次数,然后输出。
Private Sub Form_Click()
a$ = "ABCDEHGABCDEFABCDEABCDABCABA"
b$ = "AB"
c = InStr(a$, b$)
x = 0
While e <> 0
x = x + 1
a$=mid$(a$,__!___+2)
c = InStr(a$, b$)
when ___!___
End Sub

sdf