句子的平均{pinyin：jūn}长度

用VB编写过程，计算输入英文句子中单词的平均长度？如果要判断句子中的英文单词是否正确，那就很麻烦的.如果不要判断单词的正确性，仅仅假设句子中.单词以空格分隔，那么就比较容易实现了.思路:1．计算句子的长度

用VB编写过程，计算输入英文句子中单词的平均长度？

如果要判断句子中的英文单词是否正确，那就很麻烦的.如果不要判断单词的正确性，仅仅假设句子中.单词以空格分隔，那么就比较容易实现了.

思路:

1．计算句jù 子的长度，字符数L

2．ZFS ---澳门永利- 存放英文单词所用到的总字符数（读：shù）

　　DCS --- 存【练：cún】放英文单词个数

　　MyStr ---- 存放英文句(jù)子

DCS = 0

For i = 1 To L

If Mid(MyStr ， i，1) " " Then

ZFS = ZFS 1 "如果不是空格，就是英文单词中的{de}一个字母

　　　Else

DZS 世界杯= DZS 1 "如果{pinyin：guǒ}是空格，说明1个单词已经结束

Next i

DCS = D澳门新葡京CS 1 "考虑到句子结束不是空格，所以退出循环，单词总数要加（jiā）1

ZFS = ZFS - 1 "考虑到句子结束是句[pinyin：jù]号，字母总数要减1

Print ZFS/DCS "将总的字《读：zì》母数除以总的单词数

当然，程序需要优化，即空格[读：gé]有1个以上怎么办？有逗号怎么办等等