首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为List1的列表框控件,其List属性值为一组花卉的名称。一个名称为Picture1的图片框。窗体外观如图所示。 程序代码如下: Private Sub List1_Click() For i=0 To List1.Listcou
窗体上有一个名称为List1的列表框控件,其List属性值为一组花卉的名称。一个名称为Picture1的图片框。窗体外观如图所示。 程序代码如下: Private Sub List1_Click() For i=0 To List1.Listcou
admin
2018-12-20
78
问题
窗体上有一个名称为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://kaotiyun.com/show/y8Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面的程序是利用公式:π=4-4/3+4/5-4/7+4/9-4/11+…计算机π的近似值PvivateSubCommand1_Click() DimPIAsDouble,xAsDouble,kAsLong,signAsI
在窗体上添加"控件"的正确的操作方式是( )。
如果一个菜单项的Enabled属性被设置为False,则程序运行时,该菜单项( )。
下列关于线性链表的叙述中,正确的是( )。
设窗体上有3个图像框:Image1、Image2、Image3,并有下面的程序代码:PrivateSubForm_Load()Image1.Picture=LoadPicture("LEAF.bmp")Image2.Pictu
下面关于直线控件的叙述中正确的是
A、选择B、差C、交D、并B关系T是关系R的一部分,并且是关系R去掉R和S相同的元素,符合差操作。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
数据库管理系统是( )。
随机试题
环境影响评价工程师对其主持完成的环境影响评价工作的()承担责任。
有价证券按照上市与否可分为上市证券和非上市证券,非上市证券就是指不符合证券交易所上市条件而不能上市的证券。()
常用的球类比赛的编排有()。
下列关于政府职能转变的说法,正确的有()。
下列关于政府价格管制的说法,不正确的是()。
求下列微分方程的通解或特解:-4y=4x2,y(0)=-1/2,y’(0)=2;
关于分布式非结构化P2P网络的描述中,错误的是()。
在下列字符中,其ASCII码值最小的一个是()。
"InterestinlearningChineseamongAmericanyouthandtheirparentshasgrown【S1】______inthepastfiveyears,"saidVivienSte
Whatdoesthepassagemainlydiscuss?Accordingtothefirstparagraph,allofthefollowingstatementscanbeacceptedEXCEFT
最新回复
(
0
)