如何把一组数字、字母或中文分别把相同的显示出来的代码？
如：编、程、论、坛、程、坛、坛、

坛 3个
程 2个
编 1个
论 1个

举个例子，说下我的浅见思路：
str='编、程、论、坛、程、坛、坛'
arr=split(str,'、') '顿号分割成数组
for i=0 to ubound(arr)-1
 for j=i+1 to ubound(arr)
  k=1   '出现次数
  if asc(arr(i))=asc(arr(j)) then
  brr()=i
  crr()=k+1 'ASC值相等即出现次数加1
  else
  brr()=i
  crr()=k
  end if
  next
next
以上代码只是依据我自己的思路随便写的，没有测试过，你还需要去改进！

哇，学习了，如果楼上能把输出的方式也写出来就好了