• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:03-18

按键精灵安卓版
立即下载

软件版本:3.3.8
软件大小:62.5M
更新时间:12-18

按键精灵iOS版
立即下载

软件版本:1.6.5
软件大小:29.2M
更新时间:12-01

最新企业版UiBot
立即下载

软件版本:3.3
软件大小:282M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
发新话题 回复该主题

[已解决] 窗口事件中的变量传递 [复制链接]

1#
  1. Event Form1.Load
  2. // DimEnv
  3. PicList = lib。文件。判断文件夹是否存在(“ C:\ PicList”)
  4. 如果PicList = False,则
  5. MsgBox“图片文件夹不存在,脚本将自动创建。如果创建失败请在C磁盘根目录下手动创建文件夹PicList”
  6. 调用Plugin.File.CreateFolder(“ C:\ PicList”)
  7. 延迟200
  8. 结束如果
  9. 遍历文件名= lib。文件。遍历指定目录下所有文件名(“ C:\ PicList” )
  10. 对于h = 0到UBound(遍历文件名)-1
  11. ReDim保存图片名(h)
  12. 图片名(h)= split(遍历文件名(h),“ |”)(0)
  13. 下一个
  14. refile = join(图片名,“ |”)
  15. Form1.ComboBox1.List = refile
  16. l = 5
  17. 结束事件
  18. 事件Form1.ComboBox1.SelectChange
  19. MsgBox图片名(Form1.ComboBox1.ListIndex)//这句能读到选择的文件名
  20. MsgBox Form1.ComboBox1.ListIndex //此句能读到ListIndex返回值
  21. End事件
  22. MsgBox l //无法传递变量
  23. MsgBox Form1.ComboBox1.ListIndex //这句能读到ListIndex返回值
  24. MsgBox 图片名(Form1 .ComboBox1.ListIndex)//无法传递数组
复制代码
请问form.load事件里面的变量是否传递出来?我需要得到列表框替换的文件名。测试过DimEnv也不行,只能得到ListIndex的序号。然后我有个想法“ lib。文件。判断文件夹是否存在”在遍历文件时以什么来给分配编号的,如果在事件外面再遍历一次,然后ListIndex编号和事件外面遍历的编号对应赋值行不行?看起来是不是很蠢
所以还是想直接得到事件中的变量。

最后编辑FreeMike 最后编辑于 2021-01-07 12:55:21
本主题由 超级版主 瑞祥幽冥狼 于 2021/1/7 14:15:02 执行 审核帖子 操作
2#

回复 1楼FreeMike的帖子

注:你好 [join]数组为字符串 使用[DimEnv]传递 事件内再进行[Split]

收 徒 索 引 ← ← ← ← ← ← ← ← ← ← 点 击

个 人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8[将满]
个 人 Q Q 2 : 6 1 7 0 9 5 5 4 3[可加]
3#

  1. picpath="C:\PicList\"
  2. Event Form1.Load
  3. picpath="C:\PicList\"
  4. PicList=lib.文件.判断文件夹是否存在(picpath)
  5. If PicList = False Then
  6. Call Plugin.File.CreateFolder(picpath)
  7. Delay 200
  8. End If
  9. 遍历文件名 = lib.文件.遍历指定目录下所有文件名(picpath)
  10. For h = 0 To UBound(遍历文件名) -1
  11. ReDim Preserve 图片名(h)
  12. 图片名(h) = split(遍历文件名(h), "|")(0)
  13. MessageBox 遍历文件名(h)
  14. Next
  15. refile = join(图片名, "|")
  16. Form1.ComboBox1.List =refile
  17. End Event
  18. 遍历文件名 = lib.文件.遍历指定目录下所有文件名(picpath)
  19. MessageBox picpath&遍历文件名(Form1.ComboBox1.ListIndex)
复制代码
比如这样也能得到选择的图片路径,有没有办法直接得到事件中选择的图片路径?

4#

回复 2楼瑞祥幽冥狼的帖子

版主不好意思,最后没看懂你的意思。

1.[join]数组为字符串我知道,因为遍历返回的值本来就是字符串类型。
2.因用了redim ,如果前面去DimEnv的话就出错了。

3.事件内再进行[Split]的意思是SelectChange里面再Split吗?

5#

回复 4楼FreeMike的帖子

注:你好 下次提问请提供简洁、扼要、清晰可直接测试的代码结构
  1. DimEnv 总
  2. Event Form1.LoadOver
  3. h=1
  4. ReDim Preserve 图片名(h)
  5. 图片名(0) = 2
  6. 图片名(1) = 3
  7. 总=Join(图片名,"|")
  8. End Event
  9. Event Form1.Button1.Click
  10. TracePrint 总
  11. End Event
复制代码

收 徒 索 引 ← ← ← ← ← ← ← ← ← ← 点 击

个 人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8[将满]
个 人 Q Q 2 : 6 1 7 0 9 5 5 4 3[可加]
发新话题 回复该主题