计算字符串中每个字符的出现次数,忽略CR

Cob*_*old 1 .net vb.net

我正在扫描文本框中的所有字符.然后程序计算文本框中每个字符的数量.这是将所有字符添加到列表中的代码:

For each c as char in TxtBox
    list.add(c)
Next
Run Code Online (Sandbox Code Playgroud)

一切正常,除了这也会增加列表的返回,这是我不想要的.我以为我可以这样写:

If c <> chr(10) Then
    list.add(c)
End If
Run Code Online (Sandbox Code Playgroud)

......但它不起作用.有任何想法吗?

Fos*_*sco 7

你还需要排除chr(13).10 =新行,13 =回车.

对于每个c作为TxtBox中的char

   if c <> chr(10) and c <> chr(13) then
      list.add(c)
   end if
Run Code Online (Sandbox Code Playgroud)

试一试.