【正文】
現(xiàn)的單詞,并將該單詞的長度顯示在 Text1文本框內(nèi),將該單詞顯示在 Text2文本框內(nèi)。 本題主要考查了文件的操作以及文件中字符串長度的統(tǒng)計算法。 。 \ For Input As 1 s = Input(LOF(1), 1) Close 1 End Sub Private Sub Command2_Click() Dim i As Integer Dim max As Integer Dim j As Integer Dim arr arr = Split(s, ) max = 0 For i = 1 To UBound(arr) If Len(arr(i)) = max Then max = Len(arr(i)) j = i End If Next = max = arr(j) End Sub Private Sub Form_Unload(Cancel As Integer) Open amp。 注意: 考生不得修改窗體文件中已經(jīng)存在的控件和程序,在結(jié)束程序運行之前, 必須進行統(tǒng)計,且必須通過單擊窗體右上角的 關(guān)閉 按鈕結(jié)束程序, 否則無成績。