易语言怎么通过列表框来改变图片框的图片

 我来答
尐粨姓
推荐于2016-08-07 · TA获得超过120个赞
知道小有建树答主
回答量:171
采纳率:0%
帮助的人:155万
展开全部
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
图片框1.显示方式 = 1
列表框1.清空 ()
列表框1.加入项目 (“图片1”, )
列表框1.加入项目 (“图片2”, )
列表框1.现行选中项 = 0
_列表框1_列表项被选择 ()

.子程序 _列表框1_列表项被选择
.判断开始 (列表框1.取项目文本 (列表框1.现行选中项) = “图片1”)
图片框1.图片 = #图片一
.判断 (列表框1.取项目文本 (列表框1.现行选中项) = “图片2”)
图片框1.图片 = #图片二
.默认

.判断结束
岁岁年年相似
推荐于2016-11-23 · TA获得超过549个赞
知道小有建树答主
回答量:692
采纳率:87%
帮助的人:559万
展开全部
说明:在“启动窗口”中放一个“列表框1”和一个“图片框1”,程序运行时,会出来一个“请选择目录”的浏览文件夹对话框,点击里面“文件夹”,找到放有JPG图片的文件夹,点“确定”按钮,如果没有选择目录,默认是程序运行的文件夹,然后“列表框1”会显示该目录下所有后缀名为“.JPG”的文件,点击“列表框1”中的文件名,图片框中就会出现该图片,从而实现预览图片的功能。
---------
.版本 2
.支持库 shell

.程序集 窗口程序集1
.程序集变量 目录, 文本型
.程序集变量 文件名, 文本型

.子程序 __启动窗口_创建完毕

图片框1.显示方式 = 1
目录 = 浏览文件夹 (“请选择目录”, 真)
.如果真 (目录 = “”)
目录 = 取运行目录 ()
.如果真结束
文件名 = 寻找文件 (目录 + “\*.jpg”, )
.循环判断首 ()
列表框1.加入项目 (文件名, )
文件名 = 寻找文件 (, )
.循环判断尾 (文件名 ≠ “”)

.子程序 _列表框1_列表项被选择

图片框1.图片 = 读入文件 (目录 + “\” + 列表框1.取项目文本 (列表框1.现行选中项))
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式