单个字符在某个字符串中出现的次数

利用替换，替换为空字符，之后字符串长度的变化
Dim N As Integer = str.Length - str.Replace("a", [String].Empty).Length

欢迎关注微信公众账号ByCAD