Question

大学vb，统计一个字符串中出现某个英文字母的个数

大学vb，统计一个字符串中出现某个英文字母的个数第10题，谢谢！

Answer 1

Private Sub Command1_Click()
  s = Text1
  c = Left(Trim(Text2), 1)
  n = 0
  For i = 1 To Len(s)
    If Mid(s, i, 1) = c Then n = n + 1
  Next i
  Label3.Caption = n
End Sub