VB6.0 抽獎(jiǎng)程序 2010-01-17 在 Windows XP 下調(diào)試通過 作者：鄧忠 dwjnhkbc123@163.com QQ：751667650 該程序是本人在翔德電子科技（深圳）有限公司就職期間用Visual Basic為2010年尾牙晚會(huì)做的一個(gè)小抽獎(jiǎng)程序，僅供學(xué)習(xí)參考，不得用于商業(yè)用途，否則后果自負(fù)。 啟動(dòng)時(shí)會(huì)生成隨機(jī)順序的抽獎(jiǎng)名單幸運(yùn)星名單已經(jīng)隨機(jī)確定。運(yùn)行時(shí)隨機(jī)滾動(dòng)抽獎(jiǎng)名單，按抽獎(jiǎng)（或回車鍵）逐一揭曉幸運(yùn)星。 關(guān)閉程序時(shí)會(huì)生成幸運(yùn)星名單luckystars.txt 記錄有時(shí)間 所中獎(jiǎng)項(xiàng) 獎(jiǎng)品名 姓名，請(qǐng)及時(shí)保存luckystars.txt，以免被下次運(yùn)行程序時(shí)覆蓋。 本程序awards.txt保存各獎(jiǎng)項(xiàng)目 如： 三等獎(jiǎng) 二等獎(jiǎng) awardsname.txt 保存獎(jiǎng)項(xiàng)對(duì)應(yīng)的獎(jiǎng)品名 如： 電吹風(fēng) 電飯煲 awardstotal.txt 保存各獎(jiǎng)項(xiàng)對(duì)應(yīng)的個(gè)數(shù) 如： 100 80。 list.txt 保存抽獎(jiǎng)名單 為了區(qū)分重名的人 可以加入部門名稱，工號(hào)等。 背景文件為luckybg.jpg，象素1024*768。 請(qǐng)確保程序的當(dāng)前目錄下有存在上述文件，否則會(huì)報(bào)錯(cuò)。1g4紅軟基地

抽獎(jiǎng)程序源代碼截圖

1g4紅軟基地