查人人中国名人网集团 子公司 架构:VB编程问题
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/04 07:21:57
统计字符窜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
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