求输入英文句子单词的平均长度.
问题描述：
求输入英文句子单词的平均长度.
用pascal语音
答
控件：1个文本框,1个按钮代码：Private Sub Command1_Click()a = Len(Text1.Text)b = 0For i = 1 To a If " " = Mid(Text1.Text,i,1) Then b = b + 1 '统计空格数 End If If "," = Mid(Text1.Text,i,1) Or "." = Mid...呃，能不能排整齐一点看不懂啊，而且你这是pascal语言吗？好像不是把