主题：如何判定一个字符串中包含某字符的个数

比如一字符串："daew，，，，fewds",这个字符串中包含多个“，”，如何判断逗号“，”的个数，请那位高手指教

谢谢，看来不知道的东西还有很多

感谢大家帮我释疑解惑，我把我提出这个问题的用途告诉大家，看有没有更好的办法。在帮助中有：StringBuilder方法，可大规模地合并字符串。

Dim v As String
Dim s As new StringBuilder
Dim cr As Row = Tables("干部信息").Current
s.Append(cr("姓名") & ",")
s.Append(cr("性别") & ",")

s.Append(cr("民族") & ",")
v = s.Tostring
Output.Show(v)

问题是：当性别、民族两列没有填入内容时，姓名后出现两个“，，”，有时候会出现三个“，，，”，这样就达不到要求，应该如何处理

 

找到了解决办法，大家看看，还有更简单的办法没有

Dim v As String
Dim s As new StringBuilder
Dim cr As Row = Tables("干部信息").Current
s.Append(cr("姓名") & ",")
s.Append(IIF(cr.Isnull("性别"),"",cr("性别") & ","))
s.Append(IIF(cr.Isnull("出生年月"),"",format(cr("出生年月"),"yyyy-MM") & ","))
v = s.Tostring
Output.Show(v)

 

比较完善的解决办法，分享给大家

'''
If Tables("干部信息").Rows.Count > 0 Then
    For i As Integer = Tables("干部信息").TopPosition To Tables("干部信息").BottomPosition
        Dim v As String
        Dim s As new StringBuilder
        Dim cr As Row = Tables("干部信息").Rows(i)
        s.Append("    " & cr("姓名") & "，")
        s.Append(IIF(cr.Isnull("性别"),"",cr("性别") & "，"))
        s.Append(IIF(cr.Isnull("民族"),"",cr("民族") & "，"))
        s.Append(IIF(cr.Isnull("籍贯"),"",cr("籍贯") & "人，"))
        s.Append(IIF(cr.Isnull("出生年月"),"",format(cr("出生年月"),"yyyy年M月") & "出生，"))
        s.Append("现在" & IIF(cr.Isnull("工作单位"),"",cr("工作单位") & "工作。"))
        v = s.Tostring
        MessageBox.Show(v)
    Next
End If