[填空題] 窗體上有一個名稱為List1的列表框,一個名稱為Picture 1的圖片框。Form_ Load事件過程的作用是,把Datal.txt文件中的物品名
2021-07-20
[填空題] 窗體上有一個名稱為List1的列表框,一個名稱為Picture 1的圖片框。Form_ Load事件過程的作用是,把Datal.txt文件中的物品名稱添加到列表框中。運行程序,當雙擊列表框中的物品名稱時,可以把該物品對應的圖片顯示在圖片框中如圖所示。以下是類型定義及程序,請?zhí)羁铡? Private Type Pic gName As String*10‘物品名稱 picFile As String*20 ‘物品圖片的圖片文件名 End Type Dim p(4)As Pic,pRec As Pic Private Sub Form Load() Open”Datal.txt" For Random As#1 _【11】_=Len(pRec) For i=0 To 4 Get#1,i+l,P(i) LIStI.AddItem p(i).gNaine Next i Close#1 End Sub Private Sub List I-DbICIickO For i=OTo4 If RTrim(List一List(i))=RTrim(_【12】_)Then Picture l.,Picture=LoadPicture(p(i)._【13】_) Exit For End If Next End Sub
正確答案:Len
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領域),建議您咨詢相關領域?qū)I(yè)人士。