窗体上有一个名称为List1的列表框控件,其List属性值为一组花卉的名称。一个名称为Picture1的图片框。窗体外观如图所示。 程序代码如下: Private Sub List1_Click() For i=0 To List1.Listcou

admin2018-12-20  27

问题 窗体上有一个名称为List1的列表框控件,其List属性值为一组花卉的名称。一个名称为Picture1的图片框。窗体外观如图所示。

程序代码如下:
Private Sub List1_Click()
   For i=0 To List1.Listcount-1
       if List1.Selected(i)=True Then
           Picture1.Picture=LoadPicture("e:\p" & RTrim(i) & ".bmp")
       end if
   next
End Sub
运行程序时,选中列表框中某个花卉的名称,则在图片框中显示该花卉的图片。设花卉图片文件的命名规则是:p+花卉在列表框中下标值,扩展名为.bmp。例如,选中下标为1的花卉,则其文件名为p1.bmp。
对于以上程序,如下叙述错误的是

选项 A、为使程序正常运行,图片文件应存放在当前路径下
B、List1.Selected(i)=True条件的含义是:第i项被选中
C、LoadPicture函数中的"&"是将字符串连接起来,构成图片文件名
D、RTrim的作用是去除i中数值后面的空格

答案A

解析 图片文件即可以存放在当前路径下,也可以存放在默认路径下,存放在当前路径下不应给出绝对路径,只需给出相对路径即可,该程序在加载图片用到的是绝对路径,故选项A表述错误,故选择A项。Selected是列表框的属性,该属性表示列表框中的项目是否被选中,它和List属性一样有相同项数的逻辑型数组,各项的取值为True或者False,故选项B表述正确。"&"能将字符串连接起来的,故选项C表述正确。RTrim(字符串)去掉字符串右边的空白字符,故D项表述正确。
转载请注明原文地址:https://jikaoti.com/ti/lAm0FFFM
0

最新回复(0)