求一款易语言抽奖源码，最好是图片抽奖，或者自行放入对方提供的头像。

版本 2

支持库 xplib

支持库 iext

程序集 窗口程序集1

程序集变量 b, 文本型

程序集变量 框, 框

程序集变量 开始音乐, 字节集

程序集变量 结束音乐, 字节集

程序集变量 人数, 整数型

程序集变量 人数数组, 文本型, , "0"

程序集变量 n, 整数型

程序集变量 文件数组, 文本型, , "0"

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

XP风格 (#蓝色风格)

选择夹左边 ＝ (取屏幕宽度 () － 选择夹宽度) ÷ 2

选择夹顶边 ＝ (取屏幕高度 () － 选择夹高度) ÷ 2

框1标记 ＝ “1”

框2标记 ＝ “2”

框3标记 ＝ “3”

框4标记 ＝ “4”

框5标记 ＝ “5”

框6标记 ＝ “6”

选择夹现行子夹 ＝ 1

透明标签1左边 ＝ (取屏幕宽度 () － 透明标签1宽度) ÷ 2

选择夹2顶边 ＝ 选择夹高度 ＋ 选择夹顶边

选择夹2左边 ＝ (取屏幕宽度 () － 选择夹2宽度) ÷ 2

初始化 ()

人数 ＝ 取数组成员数 (文件数组)

_一个人_被选择 ()

注册热键程序 (_启动窗口取窗口句柄 (), 0, #F1键, &配置设置)

注册热键程序 (_启动窗口取窗口句柄 (), 0, #回车键, &子程序1)

注册热键程序 (_启动窗口取窗口句柄 (), 0, #键1, &_一个人_被选择)

注册热键程序 (_启动窗口取窗口句柄 (), 0, #键2, &_二个人_被选择)

注册热键程序 (_启动窗口取窗口句柄 (), 0, #键3, &_三个人_被选择)

注册热键程序 (_启动窗口取窗口句柄 (), 0, #键4, &_四个人_被选择)

注册热键程序 (_启动窗口取窗口句柄 (), 0, #键5, &_五个人_被选择)

注册热键程序 (_启动窗口取窗口句柄 (), 0, #键6, &_六个人_被选择)

注册热键程序 (_启动窗口取窗口句柄 (), 0, #Esc键, &_退出_被选择)

子程序 子程序1

n ＝ n ＋ 1

如果 (n ％ 2 ＝ 0)

_按钮2_被单击 ()

否则

_按钮1_被单击 ()

如果结束

子程序 配置设置

载入 (系统设置窗口, , 真)

系统设置窗口可视 ＝ 真

子程序 _时钟1_周期事件

置随机数种子 ()

框1 ＝ 读入文件 (文件数组 [取随机数 (1, 人数)])

子程序 抽奖停

局部变量 a, 整数型

局部变量 i, 整数型

b ＝ “”

置随机数种子 ()

计次循环首 (6, i)

a ＝ 取随机数 (1, 人数)

判断循环首 (寻找文本 (b, 到文本 (a), 1, 假) ≠ -1)

a ＝ 取随机数 (1, 人数)

判断循环尾 ()

框 ＝ 取标记组件 (i)

框 ＝ 读入文件 (文件数组 [a])

b ＝ b ＋ “,” ＋ 到文本 (a)

计次循环尾 ()

子程序 _一个人_被选择

初始化 ()

n ＝ 0

按钮1禁止 ＝ 假

按钮1获取焦点 ()

框1可视 ＝ 真

框2可视 ＝ 假

框3可视 ＝ 假

框4可视 ＝ 假

框5可视 ＝ 假

框6可视 ＝ 假

框1左边 ＝ (选择夹宽度 － 框1宽度) ÷ 2

子程序 _二个人_被选择

初始化 ()

n ＝ 0

按钮1禁止 ＝ 假

按钮1获取焦点 ()

框1可视 ＝ 真

框2可视 ＝ 真

框3可视 ＝ 假

框4可视 ＝ 假

框5可视 ＝ 假

框6可视 ＝ 假

框1左边 ＝ (选择夹宽度 － 框1宽度 × 2 － 5) ÷ 2

框2左边 ＝ 框1左边 ＋ 框1宽度 ＋ 5

子程序 _三个人_被选择

初始化 ()

n ＝ 0

按钮1禁止 ＝ 假

按钮1获取焦点 ()

框1可视 ＝ 真

框2可视 ＝ 真

框3可视 ＝ 真

框4可视 ＝ 假

框5可视 ＝ 假

框6可视 ＝ 假

框1左边 ＝ 0

框2左边 ＝ 325

框3左边 ＝ 651

子程序 _四个人_被选择

初始化 ()

n ＝ 0

按钮1禁止 ＝ 假

按钮1获取焦点 ()

框1可视 ＝ 真

框2可视 ＝ 真

框3可视 ＝ 真

框4可视 ＝ 真

框5可视 ＝ 假

框6可视 ＝ 假

框1左边 ＝ 0

框2左边 ＝ 325

框3左边 ＝ 651

子程序 _五个人_被选择

初始化 ()

n ＝ 0

按钮1禁止 ＝ 假

按钮1获取焦点 ()

框1可视 ＝ 真

框2可视 ＝ 真

框3可视 ＝ 真

框4可视 ＝ 真

框5可视 ＝ 真

框6可视 ＝ 假

框1左边 ＝ 0

框2左边 ＝ 325

框3左边 ＝ 651

子程序 _六个人_被选择

初始化 ()

n ＝ 0

按钮1禁止 ＝ 假

按钮1获取焦点 ()

框1可视 ＝ 真

框2可视 ＝ 真

框3可视 ＝ 真

框4可视 ＝ 真

框5可视 ＝ 真

框6可视 ＝ 真

框1左边 ＝ 0

框2左边 ＝ 325

框3左边 ＝ 651

子程序 初始化

局部变量 k, 整数型

选择夹现行子夹 ＝ 1

选择夹现行子夹 ＝ 0

时钟1时钟周期 ＝ 0

时钟2时钟周期 ＝ 0

时钟3时钟周期 ＝ 0

时钟4时钟周期 ＝ 0

时钟5时钟周期 ＝ 0

时钟6时钟周期 ＝ 0

_启动窗口背景音乐 ＝ 到字节集 (0)

计次循环首 (6, k)

框 ＝ 取标记组件 (k)

框 ＝ #

计次循环尾 ()

子程序 _标题_被选择

局部变量 wb, 文本型

初始化 ()

输入框 (“请输入标题内容”, , , wb, )

透明标签1标题 ＝ wb

写配置项 (取运行目录 () ＋ “\configini”, “标题”, “标题1”, wb)

子程序 _设定转奖声音_被选择

初始化 ()

通用对话框1过滤器 ＝ “WAV文件|wav”

通用对话框1打开 ()

开始音乐 ＝ 读入文件 (通用对话框1文件名)

写配置项 (取运行目录 () ＋ “\configini”, “声音”, “转奖声音”, 通用对话框1文件名)

子程序 _设定中奖声音_被选择

初始化 ()

通用对话框1过滤器 ＝ “WAV文件|wav”

通用对话框1打开 ()

结束音乐 ＝ 读入文件 (通用对话框1文件名)

写配置项 (取运行目录 () ＋ “\configini”, “声音”, “中奖声音”, 通用对话框1文件名)

子程序 _关闭音乐_被选择

初始化 ()

_启动窗口背景音乐 ＝ 到字节集 (0)

子程序 初始化

局部变量 d, 整数型

_启动窗口底图 ＝ 读入文件 (读配置项 (取运行目录 () ＋ “\configini”, “”, “背景”, 取运行目录 () ＋ “\Wallpaper\1024jpg”))

开始音乐 ＝ 读入文件 (读配置项 (取运行目录 () ＋ “\configini”, “声音”, “转奖声音”, 取运行目录 () ＋ “\sound\musiwav”))

结束音乐 ＝ 读入文件 (读配置项 (取运行目录 () ＋ “\configini”, “声音”, “中奖声音”, 取运行目录 () ＋ “\sound\finishwav”))

透明标签1标题 ＝ 读配置项 (取运行目录 () ＋ “\configini”, “标题”, “标题1”, “XX公司幸运抽奖”)

计次循环首 (6, d)

框 ＝ 取标记组件 (d)

框 ＝ 读入文件 (读配置项 (取运行目录 () ＋ “\configini”, “”, “抽奖”, 取运行目录 () ＋ “\Wallpaper\cjjpg”))

计次循环尾 ()

查找文件 (文件数组, 取运行目录 () ＋ “\Photos\”, “jpg”, )

查找文件 (文件数组, 取运行目录 () ＋ “\Photos\”, “bmp”, )

如果真 (取数组成员数 (文件数组) ＜ 6)

信息框 (“请把文件放到[Photots]文件夹下后重启软件！” ＋ #换行符 ＋ “文件格式支持[jpg bmp]”, 64, “提示：”)

结束 ()

如果真结束

子程序 _抽奖_被选择

局部变量 a, 整数型

初始化 ()

通用对话框1过滤器 ＝ “文件|jpg;bmp”

通用对话框1打开 ()

计次循环首 (6, a)

框 ＝ 取标记组件 (a)

框 ＝ 读入文件 (通用对话框1文件名)

计次循环尾 ()

写配置项 (取运行目录 () ＋ “\configini”, “”, “抽奖”, 通用对话框1文件名)

子程序 _时钟2_周期事件

置随机数种子 ()

框2 ＝ 读入文件 (文件数组 [取随机数 (1, 人数)])

子程序 _时钟3_周期事件

置随机数种子 ()

框3 ＝ 读入文件 (文件数组 [取随机数 (1, 人数)])

子程序 _时钟4_周期事件

置随机数种子 ()

框4 ＝ 读入文件 (文件数组 [取随机数 (1, 人数)])

子程序 _时钟5_周期事件

置随机数种子 ()

框5 ＝ 读入文件 (文件数组 [取随机数 (1, 人数)])

子程序 _时钟6_周期事件

置随机数种子 ()

框6 ＝ 读入文件 (文件数组 [取随机数 (1, 人数)])

子程序 _退出_被选择

结束 ()

子程序 _时钟7_周期事件

' 如果 (取鼠标垂直位置 () ＜ 10)

系统设定可视 ＝ 真

设定抽奖人数可视 ＝ 真

' 系统设定可视 ＝ 假

' 设定抽奖人数可视 ＝ 假

子程序 _按钮1_被单击, 逻辑型

如果真 (选择夹现行子夹 ＝ 1)

选择夹现行子夹 ＝ 0

如果真结束

_启动窗口背景音乐 ＝ 开始音乐

_启动窗口播放次数 ＝ 0

时钟1时钟周期 ＝ 100

时钟2时钟周期 ＝ 100

时钟3时钟周期 ＝ 100

时钟4时钟周期 ＝ 100

时钟5时钟周期 ＝ 100

时钟6时钟周期 ＝ 100

按钮2禁止 ＝ 假

按钮1禁止 ＝ 真

按钮2获取焦点 ()

返回 (真)

子程序 _按钮2_被单击

抽奖停 ()

_启动窗口背景音乐 ＝ 结束音乐

_启动窗口播放次数 ＝ 1

时钟1时钟周期 ＝ 0

时钟2时钟周期 ＝ 0

时钟3时钟周期 ＝ 0

时钟4时钟周期 ＝ 0

时钟5时钟周期 ＝ 0

时钟6时钟周期 ＝ 0

按钮2禁止 ＝ 真

按钮1禁止 ＝ 假

按钮1获取焦点 ()

方法/步骤

看到微信，如下图，看到打开

打开微信，如下图，看到微信

点击发现，如下图，看到小程序

点击小程序，如下图，看到抽奖助手（点击搜索，输入抽奖助手）

点击抽奖助手，如下图，（再次点击抽奖助手），看到发起抽奖

点击发起抽奖，如下图，看到（输入奖品名称，奖品分数，开奖的条件设置为按人数自动开奖，开奖人数为5人，抽奖说明），看到发起新抽奖

点击发起新抽奖，如下图，看到我知道了，确认发起

点击我知道了，确认发起，如下图，看到发送抽奖邀请，看到参与抽奖

定制年会抽奖方法如下：

需要借助Canva平台：

1、打开Canva在线平面设计平台，输入“抽奖”创建设计任务。

2、在Canva推荐的模板当中，选择一个合适的设计模板，正式开始创意设计环节。

3、用鼠标拖拽的方式，将抽奖模板当中不符合设计创意的插图、图标、文本清除，让模板回到符合设计需求的状态。

4、点击左侧Canva菜单栏，通过鼠标点击，一键生成本公司相应的背景、插图、文本内容。

5、继续使用鼠标拖拽，将新增设计元素调整至合理的位置/大小，进行二次设计。

6、点击下载按钮，选择png/ppt/pdf等格式，直接下载设计作品就可以了。

以上就是关于求一款易语言抽奖源码，最好是图片抽奖，或者自行放入对方提供的头像。全部的内容，包括:求一款易语言抽奖源码，最好是图片抽奖，或者自行放入对方提供的头像。、微信小程序抽奖怎么玩，如何制作抽奖、如何定制年会抽奖图片等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！