vb 统计单词数
PrivateSubCommand1_Click()Dimm,n,p,iAsIntegerDimxAsString,yAsString*1x=Trim(Text1)n=L...
Private Sub Command1_Click()
Dim m, n, p, i As Integer
Dim x As String, y As String * 1
x = Trim(Text1)
n = Len(x)
m = 0: p = 0
For i = 1 To n
y = UCase(Mid(x, i, 1))
If y >= "A" And y <= "Z" Then
If p = 0 Then m = m + 1: p = 1
Else
p = 0
End If
Next i
label1.Caption = "共" & m & "个单词"
End Sub
不太理解for后面的循环，特别是P的作用！！
我认为没换一个字母，P就在0和1一直变换
统计单词数啊```题目的答案就是我给出的那样 可是我看不懂
为什么P是判断一个单词的结束？怎么判断的？ 展开
Dim m, n, p, i As Integer
Dim x As String, y As String * 1
x = Trim(Text1)
n = Len(x)
m = 0: p = 0
For i = 1 To n
y = UCase(Mid(x, i, 1))
If y >= "A" And y <= "Z" Then
If p = 0 Then m = m + 1: p = 1
Else
p = 0
End If
Next i
label1.Caption = "共" & m & "个单词"
End Sub
不太理解for后面的循环，特别是P的作用！！
我认为没换一个字母，P就在0和1一直变换
统计单词数啊```题目的答案就是我给出的那样 可是我看不懂
为什么P是判断一个单词的结束？怎么判断的？ 展开
2个回答
展开全部
P是一个单词是否结束的标志，如果P＝0说明一个单词判断结束，于是m=m+1，如果P＝1，说明一个单词没结束，继续读下一个字母。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
--
2022-12-05 广告
图形化编程简单理解为用积木块形式编程，scratch和python也是其中的一种，属于入门级编程，以其简单生动的画面获得无数学生的喜爱，深圳市创客火科技有限公司是一家做教育无人机的公司，旗下有编程无人机，积木无人机及室内外编队，每款飞机含有...
点击进入详情页
本回答由--提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
