使用VB语言实现
没有学过VB方面的知识
希望知道vb方面知识的高手能帮个忙
使用VB语言实现
没有学过VB方面的知识
希望知道vb方面知识的高手能帮个忙
Dim s As String
s = "My name is Jim,Your name is Tom."
Dim Count As Integer
Count = 0
For i = 1 To Len(s)
If Mid(s, i, 1) = "i" Then
TextBox1.Text = TextBox1.Text & "Found i at " & i & vbCrLf
Count = Count + 1
End If
Next
TextBox1.Text = TextBox1.Text & "共找到" & Count & "个i"