超级列表框取标题1.置标题

刚写的百度经验2113 

.程序集 窗口程序集1

创建目录 (“D:\” + 编辑框1.内容)

.子程序 _超级列表框1_右键单击表项

弹出菜单 (菜单, 取鼠标水平位置 (), 取鼠标垂直位置 ())

.子程序 _添加_被选择

编辑框1.獲取焦点 ()

.子程序 _超级列表框1_被双击, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

.局部变量 临时变量, 文本型

输入框 (“输入要修改的文件名称:”, , , 临时变量, #输入文本)

文件更名 (“D:\” + 超级列表框1.取标题 (超级列表框1.现行选中项, 0), “D:\” + 临时变量)

超级列表框1.置标題 (超级列表框1.现行选中项, 0, 临时变量)

}
我想 实现通过多线的方式填写 列表框的标题

弄了好久就是弄不好,总是写在一行里

就是想看看多线程运行的时候是如何在不同行同时填写对应的内容.


索引 = 超级列表框1.


_启动窗口.超级列表框1.

_启动窗口.超级列表框1.

_启动窗口.超级列表框1.

_启动窗口.超级列表框1.

_启动窗口.超级列表框1.

}

实现的功能: 双击弹出菜单一鍵批量导入文件夹内的图片到超级列表框,可以删除选中或者全部删除


' 调试输出 (数组)
.计次循环首 (取数组成员数 (数组), i)
加入图片 (图片组变量, 讀入文件 (到文本 (数组 [i])), ) ' 加入到变量“图片组变量”中
超级列表框1.全部删除 ()
超级列表框1.图片组 = 图片组变量 ' 添加到超级列表框的图片组内
.如果嫃 (取图片组图片数 (图片组变量) > 0)
.计次循环首 (取图片组图片数 (图片组变量), x)
超级列表框1.置图片 (x - 1, 0, x - 1) ' 把图片加入到超级列表框中
超级列表框1.置标題 (x - 1, 0, 到文本 (x)) ' 添加图片的标题,给图片编个号
}

我要回帖

更多关于 超级列表框取标题 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信