开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

楼主: shiqing123
收起左侧

[已解决] 文本内容实现下拉选择

 关闭 [复制链接]
结帖率:0% (0/3)
 楼主| 发表于 昨天 17:12 | 显示全部楼层   浙江省金华市

其实不用导入文本   就是文本的内容固定的 有100多行  能把文本内容直接复制过来吗
回复

使用道具 举报

结帖率:79% (44/56)

签到天数: 3 天

发表于 昨天 17:19 | 显示全部楼层   福建省莆田市
导入文本 1.e (956.79 KB, 下载次数: 4)
回复

使用道具 举报

结帖率:79% (44/56)

签到天数: 3 天

发表于 昨天 17:19 | 显示全部楼层   福建省莆田市
shiqing123 发表于 2025-8-9 17:12
其实不用导入文本   就是文本的内容固定的 有100多行  能把文本内容直接复制过来吗 ...

我最新回复的 你把文本 复制到常量里就行
回复

使用道具 举报

结帖率:0% (0/3)

签到天数: 1 天

 楼主| 发表于 昨天 17:38 | 显示全部楼层   浙江省金华市
222555222 发表于 2025-8-9 17:19
我最新回复的 你把文本 复制到常量里就行

能实现 选中的内容 会变色吗

补充内容 (2025-8-9 17:56):
或者选中后 能标记区别也行  
回复

使用道具 举报

结帖率:0% (0/3)

签到天数: 1 天

 楼主| 发表于 昨天 17:44 | 显示全部楼层   浙江省金华市
shiqing123 发表于 2025-8-9 17:38
能实现 选中的内容 会变色吗

右侧列表框能增加查找功能吗 比如输入 北京  列表框自动显示出来  北京-100
回复

使用道具 举报

结帖率:100% (1/1)
发表于 昨天 19:53 | 显示全部楼层   浙江省温州市
效果:
0.gif
代码:
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
变量名类 型数组备 注
数组文本型0 

子程序名返回值类型公开备 注
_列表框1_列表项被选择  
变量名类 型静态数组备 注
成员文本型0
成员 = 分割文本 (列表框1.取项目文本 (列表框1.现行选中项), “-”, )
重定义数组 (成员, 真, 2)
编辑框1.内容 = 成员 [2]
编辑框1.文本颜色 = #红色
子程序名返回值类型公开备 注
__启动窗口_创建完毕  
变量名类 型静态数组备 注
文本文本型 
整数型 
文本 = #常量1
数组 = 分割文本 (文本, #换行符, )
列表框1.清空 ()
计次循环首 (取数组成员数 (数组), 数)
列表框1.插入项目 (数 - 1, 数组 [], )
计次循环尾 ()
子程序名返回值类型公开备 注
_编辑框2_内容被改变  
变量名类 型静态数组备 注
整数型 
表项文本型0
整数型 
计次循环首 (取数组成员数 (数组), 数)
如果真 (寻找文本 (数组 [], 编辑框2.内容, , ) ≠ -1)
加入成员 (表项, 数组 [])

计次循环尾 ()
列表框1.清空 ()
计次循环首 (取数组成员数 (表项), 数)
列表框1.插入项目 (数 - 1, 表项 [], )
计次循环尾 ()

例子.zip (1.57 KB, 下载次数: 1)
回复

使用道具 举报

结帖率:87% (20/23)

签到天数: 6 天

发表于 昨天 20:24 | 显示全部楼层   广东省东莞市
就问你这个代码简不简单
1112222.gif

  
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
文本文本型 
文本 = 取文本中间 (文本_取右边 (编辑框2.内容, 编辑框1.内容, , ), 2, 3)
信息框 (文本, 0, , )
回复

使用道具 举报

结帖率:79% (44/56)

签到天数: 3 天

发表于 昨天 21:16 | 显示全部楼层   福建省莆田市
shiqing123 发表于 2025-8-9 17:44
右侧列表框能增加查找功能吗 比如输入 北京  列表框自动显示出来  北京-100 ...

.版本 2

.子程序 _列表框1_鼠标右键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 i, 整数型
.局部变量 nr, 文本型

输入框 (, , , nr, , )
.计次循环首 (列表框1.取项目数 (), i)
    .如果真 (文本_取左边 (列表框1.取项目文本 (i - 1), “-”) = nr)
        列表框1.现行选中项 = i - 1
        _列表框1_列表项被选择 ()
    .如果真结束

.计次循环尾 ()
加上这个代码
回复

使用道具 举报

结帖率:0% (0/3)

签到天数: 1 天

 楼主| 发表于 昨天 21:19 | 显示全部楼层   浙江省金华市

选择后的文本内容 可以变色吗 或者怎样进行标记一下 说明已经选择过了
回复

使用道具 举报

结帖率:0% (0/3)

签到天数: 1 天

 楼主| 发表于 昨天 21:19 | 显示全部楼层   浙江省金华市
222555222 发表于 2025-8-9 21:16
.版本 2

.子程序 _列表框1_鼠标右键被按下, 逻辑型

选择后的文本内容 可以变色吗 或者怎样进行标记一下 说明已经选择过了

补充内容 (2025-8-9 21:21):
另外 怎样使文本保存为big5

补充内容 (2025-8-9 21:21):
另外文本输出保存为big5
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报QQ: 793400750,邮箱:wp@125.la
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备2025452707号) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表