填空题

窗体上有一个名称为Listl的列表框，一个名称为Picturel的图片框。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 "Data1.txt" For Random As #1 ______ = 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