UC知道VB 那个方法可以返回字符串 A 在字符串 B 中出现的次数？
来源：百度知道 编辑：UC知道 时间：2024/09/21 08:38:55
==================
我要一个“方法”，用 Visual 之前的话来说就是“函数”。
辛苦以下 2 位了，可能是我的问题不完整的缘故吧！？我是想找一个 Visual Basic 内置的函数，不是自己编写的函数。
我要一个“方法”，用 Visual 之前的话来说就是“函数”。
辛苦以下 2 位了，可能是我的问题不完整的缘故吧！？我是想找一个 Visual Basic 内置的函数，不是自己编写的函数。
Private Sub Command1_Click()
Dim a() As String
b="abcdabcd"
a = Split(b, "a")
MsgBox UBound(a)
End Sub
Function cs(s1,s2)
dim n as integer
n=0
for i = 1 to len(s2)
ch=mid(b,i,len(s1))
if ch=s1 then
n=n+1
end if
next i
cs = n
End Function
for i = 1 to len(b)
ch=mid(b,i,len(a))
if ch=a then
n=n+1
end if
next i
msgbox a & "出现" & n & "次"