展开全部
给你一个我写的例程代码:
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.子程序 _按钮1_被单击
.如果真 (通用对话框1.打开 () 且 列表框1.选择 (通用对话框1.文件名) = -1)
列表框1.加入项目 (通用对话框1.文件名, )
.如果真结束
.子程序 _按钮2_被单击
.如果真 (列表框1.现行选中项 ≠ -1)
列表框1.删除项目 (列表框1.现行选中项)
.如果真结束
.子程序 _按钮3_被单击
_列表框1_双击选择 ()
.子程序 _按钮4_被单击
停止播放 ()
.子程序 _列表框1_双击选择
同步播放MP3 (列表框1.取项目文本 (列表框1.现行选中项), 0, 标签1, )
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.如果真 (参数一 = 100 且 列表框1.现行选中项 < 列表框1.取项目数 () - 1) ' 播放结束
列表框1.现行选中项 = 列表框1.现行选中项 + 1
_列表框1_双击选择 ()
.如果真结束
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.子程序 _按钮1_被单击
.如果真 (通用对话框1.打开 () 且 列表框1.选择 (通用对话框1.文件名) = -1)
列表框1.加入项目 (通用对话框1.文件名, )
.如果真结束
.子程序 _按钮2_被单击
.如果真 (列表框1.现行选中项 ≠ -1)
列表框1.删除项目 (列表框1.现行选中项)
.如果真结束
.子程序 _按钮3_被单击
_列表框1_双击选择 ()
.子程序 _按钮4_被单击
停止播放 ()
.子程序 _列表框1_双击选择
同步播放MP3 (列表框1.取项目文本 (列表框1.现行选中项), 0, 标签1, )
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.如果真 (参数一 = 100 且 列表框1.现行选中项 < 列表框1.取项目数 () - 1) ' 播放结束
列表框1.现行选中项 = 列表框1.现行选中项 + 1
_列表框1_双击选择 ()
.如果真结束
博思aippt
2024-07-20 广告
2024-07-20 广告
作为深圳市博思云创科技有限公司的工作人员,对于Word文档生成PPT的操作,我们有以下建议:1. 使用另存为功能:在Word中编辑完文档后,点击文件->另存为,选择PowerPoint演示文稿(*.pptx)格式,即可将文档内容转换为PPT...
点击进入详情页
本回答由博思aippt提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询