当前位置: 高中信息技术 / 综合题
  • 1. 用VB编写求句子中最长单词的程序。输入要求:句子以‘.’结束;单词之间用空格分隔,单词没有缩写形式和其他特殊形式。运行界面如图所示,程序功能:在文本框Text1中输入待统计的句子,单击“统计”按钮Command1,将结果显示在文本框Text2和Text3中。

    1. (1) 代码“Private Sub Command1_ Click”中的Command1_ Click ()是(单选,填字母:A .对象名;B .事件;C .事件处理过程;D .方法)。
    2. (2) 根据题意将下列程序补充完整。

      Private Sub Command1_ Click()

          Dim i As Integer, k As Integer

          Dim s As String, ch As String

          Dim max As Integer    '存储句子中最长单词的长度

          Dim ss As String    '存储句子中最长的单词

          s= Text1.Text

          i=1 :k=0:max=0

          ch=“”

          Do While ch<>“.“ Or i <= Len(s)

              ch= Mid(s, i, 1)

              If ch <>“”And ch<>“.”Then

                 

              Else

                  k=0

              End If

              If  Then

                  max= k

                  ss=

              End If

              i=i+1

          Loop

          Text2.Text= Str( max)

          Text3.Text= ss

      End Sub

微信扫码预览、分享更方便