輸入一個英文句子,統計其中單詞的個數,輸出最長單詞在文本中的位置(是文本中的第幾個字符)和長度;

題目:

輸入一個英文句子,統計其中單詞的個數,輸出最長單詞在文本中的位置(是文本中的第幾個字符)和長度;
c++的
從鍵盤輸入一個英文句子,統計其中單詞的個數,並輸出最長單詞在文本中的位置(是文本中的第幾個字符)和長度;單詞的界定:單詞是由空格、換行符號、標點符號等分隔的字母和數字組成的連續字符串;
從鍵盤輸入一個英文句子,統計其中單詞的個數 這個我會~但是後面的就不會了

解答:

Private Sub maxlengthword(ByVal str1$,ByRef maxword$)
Dim i%
Dim temp$
i = InStr(str1," ")
maxword = ""
Do While i > 0
temp = Mid(str1,1,i - 1)
If Len(temp) > Len(maxword) Then maxword = temp
str1 = Mid(str1,i + 1)
i = InStr(str1," ")
Loop
If Len(str1) > Len(maxword) Then maxword = str1
TextBox2.Text = maxword
End Sub
Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click
Dim str1 As String,m As String
m = ""
str1 = TextBox1.Text
maxlengthword(str1,m)
End Su

添加新評論

暱稱
郵箱
網站