问题:
(填空题)填空题:窗体上有一个名称为List1的列表框和一个名称为Picture1的图片框。Form_Load事件过程的作用是将Datal.txt文件中的物品名称添加到列表框中。当双击列表框中的物品名称时,对应的图片应显示在图片框中。请在以下代码中填空。
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 Len = Len(pRec)
For i = 0 To 4
Get #1, i + 1, p(i)
List1.AddItem p(i).gName
Next i
Close #1
End Sub
Private Sub List1_DblClick()
For i = 0 To 4
If RTrim(List1.List(i)) = RTrim(______) Then
Picture1.Picture = LoadPicture(p(i).______)
Exit For
End If
Next
End Sub
正确答案是。
提问:
请问在上述代码中,应该在画线处填写什么内容才能正确地将物品名称从文件中读取并添加到列表框,以及如何实现双击列表框时显示对应的图片?这个问题的重点是考察什么知识点?这个章节的主要内容是什么?
复习要点:
理解文件操作和数据类型定义在Visual Basic中的应用,特别是如何使用随机访问文件读取数据和如何在列表框中显示数据。重点复习如何使用LoadPicture函数加载图片以及如何处理列表框的双击事件。
查阅资料方向:
查阅关于Visual Basic中文件操作、数据类型定义、列表框和图片框使用的资料,特别是随机访问文件的读取和LoadPicture函数的使用。
参考答案: