[填空題] 如圖所示，在列表框List1中已經(jīng)有若干人的簡單信息，運行時在Text1文本框（即“查 找對象”右邊的文本框）輸入一個姓或姓名，單擊“查找”按鈕，則
2021-07-20
[填空題] 如圖所示，在列表框List1中已經(jīng)有若干人的簡單信息，運行時在Text1文本框（即“查 找對象”右邊的文本框）輸入一個姓或姓名，單擊“查找”按鈕，則在列表框中進(jìn)行查 找，若找到，則把該人的信息顯示在Text2文本框中。若有多個匹配的列表項，則只顯 示第1個匹配項；若未找到，則在Text2中顯示“查無此人”。請?zhí)羁铡rivate Sub Command1_Click()Dim k As Integer, n As Integer, found As Boolean found = Falsen = Len( _________)k = 0While k
正確答案：TextA , ListA.List(k)
參考解析：本題是把 Text1 中的內(nèi)容與 List1 中的項目逐個比較，而比較的時候，是先求出 Text1 中內(nèi)容的長度，即 n = Len(Text1)，再從 List1 的項目中取出相同長度的內(nèi)容與 Text1 的值進(jìn) 行比較，如果找到，則把項目顯示到 Text2 中，即 Text2 = List1.List(k)。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。