作业帮 > 数学 > 作业

使用VB在Text1中输入一个英语句子,在Text2中显示出句子中有多少个单词!急用!

来源:学生作业帮 编辑:搜狗做题网作业帮 分类:数学作业 时间:2024/04/29 22:39:12
使用VB在Text1中输入一个英语句子,在Text2中显示出句子中有多少个单词!急用!
【提示】根据题意可知:统计单词个数由其中的空格来判断,利用num变量来存放单词个数,因为两个单词中间有一个空格,其初始值设为1.
顺便请解释下,每一句程序的含义,
使用VB在Text1中输入一个英语句子,在Text2中显示出句子中有多少个单词!急用!
'假设单词之间就一空格
Private Sub Command1_Click()
Dim num
num = Trim(Text1)
If InStr(num,Space(1)) Then
num = Split(num)
Text2 = UBound(num) + 1
Else
Text2 = "检查text1输入是否合法!"
End If
End Sub
Private Sub Form_Load()
Text1 = "abc efg aa bb asdd dfgfg"
Text2 = ""
End Su