影音先锋AⅤ天堂资源站,13小箩利洗澡无码视频APP,午夜理论片日本中文在线,最近新免费韩国日本电影

萬能百科  > 計算機?  > 

[填空題] 在窗體上建立如下圖所示的界面。在列表框List1中已有若干人的簡單信息,運行時Text1文本框輸入一個姓或姓名,單擊"查找"按鈕,則在列表框中進行查

2021-07-20   

[填空題] 在窗體上建立如下圖所示的界面。在列表框List1中已有若干人的簡單信息,運行時Text1文本框輸入一個姓或姓名,單擊"查找"按鈕,則在列表框中進行查找。若找到,則把該人的信息顯示在Text2文本框中。若有多個匹配的列表框,則只顯示第一個匹配項;若未找到,則在Text2文本框中顯示"查無此人"。請完成下列的程序代碼。

Private Sub Command1_Click()

Dim k As Integer,n As Integer, found As Boolean

found=False

n=Len( (10) )

k=0

While k< (11) And Not found

If Text1=Left $ (List1.List(k),n)Then

Text2= (12)

found=True

End If

k=k+1

Wend

If Not found Then

Text2="查無此人"

End If

End Sub

正確答案:

List1.List(k)

參考解析:

本題考查的是While…Wend循環(huán)格式語句,嵌套層內使用If條件語句判斷。[10]空是讀取Text1中字符串的長度,以便在Text2中進行查找。[11]空循環(huán)條件是在列表框的項數(shù)之內循環(huán),用List1.ListCount來讀取列表框共有多少項。[12]空的條件語句中,如果找到該項,用List1.List(k)語句把結果在Text2中顯示出來。

詞條內容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領域),建議您咨詢相關領域專業(yè)人士。

標簽

<蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <文本链> <文本链> <文本链> <文本链> <文本链> <文本链>