窗体上有一个名称为List1的列表框，一个名称为Picture1的图片框。Form. Load事件过程的作用是，把Data1．txt文件中的物品名称添加到列表框中。运行程序，当双击列表框中的物品名称时，可以把该物品对应的图片显示在图片框中，如图所示，以下是类型定义及程序，请填空。Private Type PicgNane As String*10 ’物品名称picFile As String*20 ’物品图片的图片文件名End TypeDime p(4)As Pic，pRec As PicPrivate
题目
窗体上有一个名称为List1的列表框，一个名称为Picture1的图片框。Form. Load事件过程的作用是，把Data1．txt文件中的物品名称添加到列表框中。运行程序，当双击列表框中的物品名称时，可以把该物品对应的图片显示在图片框中，如图所示，以下是类型定义及程序，请填空。
Private Type Pic
gNane As String*10 ’物品名称
picFile As String*20 ’物品图片的图片文件名
End Type
Dime p(4)As Pic，pRec As Pic
Private Sub Form_Load()
Open”Data1．txt”For Random As1______=Len(pRec)
For i=0 To 4
Get1，i+1，p(i)
List 1，Addltem p(i)gName
Next i
Close1
End Sub
Private Sub List 1_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
相似考题
参考答案和解析
len p(i)．gName picFile 解析：Open语句格式Open filename For Random as[#]filenumber Len=Reclength。(1)参数filename和filenumber分别表示文件名或文件号。(2)关键字Random表示打开的是随机文件。(3)Len子句用于设置记录长度，长度由参数Reclength指定，Reclength的值必须大于0，而且必须与定义的记录结构的长度一致。本题中len(pRec)是求pic结构类型的长度，也就是设置欲读取的结构类型的长度。所以第一空填Len。RTtim(List1．List(i))=RTrim()，此判定表达式的作用是判定列表框中的列表项的值和物品名是否相同，函数trim是去字符串中的空格，是干扰项对本题没什么影响，所以第二空填p(i)．gName。语句Picture 1．Picture=LoadPicture(p(i)．picFile)的作用是装载指定的图片，loadPicture函数的参数是所要载入图片的图片名，所以第三空填picFile。
更多“ 窗体上有一个名称为List1的列表框，一个名称为Picture1的图片框。Form. Load事件过程的作用是，把Data1．txt文件中的物品名称添加到列表框中。运行程序，当双击列表框中的物品名称时，可以把该物”相关问题
-
第1题：
在考生文件夹中有一个工程文件exeeise86.vbp及窗体文件execise86.frm。在名为Form1的窗体上有一个名称为List1的列表框和一个名称为Cmd1、标题为；显示”的命令按钮。要求程序运行后,如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。
要求；
修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
正确答案：
-
第2题：
在窗体上画一个名称为List1的列表框，一个名称为Labe11的标签，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名从列表框中消失，并在标签中显示出来。下列能正确实现上述操作的程序是( )。
A．
B．
C．
D．
正确答案：C
-
第3题：
窗体上有一个名称为Command1的命令按钮，一个名称为List1的列表框。命令按钮的单击事件过程如下： Private Sub Command1_Click（) Open "c:f1.txt" For Input As #1 Do While Not EOF（1) Input #1, str1 List1.AddItem str1 Loop Close End Sub 对于上述程序，以下叙述中错误的是________。
A．Close的作用是关闭已经打开的数据文件
B．单击命令按钮后，把f1.txt中的所有内容添加到列表框中
C．以输入方式打开随机文件f1.txt
D．运行程序后，列表框中的列表项都是f1.txt中的记录
C C。【解析】本题考y,-add方法里IsMissing的v3，v3是一个可选项，用来判断这个参数是否存在。根据程序语句，当输入3个参数时，就是3个参数求和，输入2个参数时是两个数求和，题目中是2个参数，因此是2个参数求和，不会报错。 -
第4题：
在窗体上画一个名称为Labell的标签和一个名称为Listl的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label中显示所选中的项目，如下图所示。请在______和______处填入适当的内容，将程序补充完整。
Private Sub Form_Load()
List1.AddItem "北京"
List1.AddItem "上海"
List1.AddItem "河北"
End Sub
Private Sub List ______()
LabeCaption = ______
End Sub
正确答案：DblClick Listl.Text
DblClick , Listl.Text -
第5题：
在考生文件夹中有一个工程文件execise50.vbp及窗体文件execise50.frm。在名为Form1的窗体上有一个名称为Cmd1，标题为“显示”的命令按钮，一个名称为List1的列表框。要求程序运行后，如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。
要求：
修改列表框的适当属性，使得运行时可以多选；去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
正确答案：