205关注1857浏览

我需要一个类似于抽奖的小程序，我的编译软件是visual basic，大概就这么个意思，有30个人名，我按个开始键，开始检索，后来检索结束，出来7个随机的检索名单，请问可以给我一个源代码吗，谢谢，非常感谢，急，在线等。
是不是要在VB的可视化界面做两个按键上去，然后在代码界面里面输入代码，但是我运行总是不对，哎
我按F5运行后，点开始键，总是提示“实时错误，要求对象”。然后我点“调试“，错误代码直接指向Timer1.Enabled = True。我没用VB很多年了，一些东西实在不记

展开全部

收起

4回答

新浪微博

微信

关注问题我来回答

即速问答小程序开发

VB 抽奖小程序

提交回答

至过去的我

2044人对此回答表示赞同

我是未来的你，你现在是不是在年找寻小程序答案。你不要感觉诧异，给你来信原因，就是让你不在后悔。今天去学习如何推广小程序，相信......点击查看更多>

展开

2024

2024回复

分享

QQ

新浪微博

微信

发布于年
收起
朱果果

16人对此回答表示赞同

Private Sub Command1_Click()

Dim i As Integer
Dim a(30) As String
List1.Clear
a(1) = "姓名1"
a(2) = "姓名2"
a(3) = "姓名3"
a(4) = "姓名4"
a(5) = "姓名5"
a(6) = &quo

展开

16

0回复

分享

QQ

新浪微博

微信

发布于 7年前
收起
评论（0）

收起评论
Eli4321

16人对此回答表示赞同

参加人26个字母，呵呵，自己也凑热闹
Option Explicit
Option Base 1

Dim Rec() As String * 1
Dim FirPrize(3) As String * 1
Dim SecPrize(5) As String * 1
Dim ThiPrize(10) As String * 1
Dim RecNum As Integer

Private Sub Cd1()

展开

16

0回复

分享

QQ

新浪微博

微信

发布于 7年前
收起
评论（0）

收起评论
亚马逊河游客

16人对此回答表示赞同

完化楼上的，，可以摇人名，，不会出现重复，，不会出现空白
加一个LIST 和一个TIMER ，COMMAND

Dim a(30) As String
Private Sub Command1_Click()

If Command1.Caption = "开始" Then

a(1) = "姓名1"
a(2) = "姓名2"
a(3) = &q

展开

16

0回复

分享

QQ

新浪微博

微信

发布于 7年前
收起
评论（0）

收起评论
月下独酌素笺淡墨

10人对此回答表示赞同

太简单了吧。。

将30个人名存储到数组a(i)里，然后。
for j=0 to 6
Randomize
print a(Int(30 * Rnd))
next

展开

10

0回复

分享

QQ

新浪微博

微信

发布于 7年前
收起
评论（0）

收起评论

相关问题

微信多参数二维码怎么生成？公众号生成微信渠道二维码的方法？微信公众号带参数二维码的使用？微信订阅号渠道推广带参数二维码如何生成和统计呢？如何在微信小程序里面添加游戏微信公众号参数二维码生成器使用？

热门问题

如何生成公众号渠道二维码如何快速实现公众号群发模板消息微信小程序 errMsg:\"operateCamera:fail operate fail\" 微信服务号推送消息接口开发微信小程序能不能做微信网页授权，是微信网页授权，不是小程序自带的那个wx.login这个方法的授权；如果可以的话，授权里面的redirect_uri这个字段在小程序的那个地方填写；注意是小程序，不是公众号成都帮帮普惠小微企业贷款怎么办理？微信公众平台群发消息里,为什么一天只能发一条

小程序功能

用即速应用做的小程序，怎么内嵌到微信公众平台菜单栏？小程序为什么那么多人都在做？已有的公众号文章怎么发送到小程序你是不是傻子抖音小程序什么时候上线? 有没有类似有赞微店商城的无需囤货的货源？

小程序吐槽

你觉得小程序以后的发展怎么样？有哪些小众的、有趣的、值得推荐的小程序？有什么类似龙虾游戏资讯的小游戏推荐公众号吗？抖音小程序什么时候会正式开放？小程序代理可以做吗？现在小程序正是企业浪潮的风口。做什么类型的小程序表较好呢？

A B C D E F G H I J K L M N O P Q R S T U V W X Y Z

安卓怎么把小程序放到桌面安卓自带小应用程序安卓模拟器微信小程序玩不了按键精灵小程序安卓模拟器使用小程序案桌手机找不到小程序按规律排序微信小程序安卓模拟器运行小程序按键控制小灯亮灭程序按键精灵小程序自动启动暗恋榜单小程序安卓应用开发小程序安卓最近任务小程序按摩椅小程序安卓怎么没有小程序按揭服务小程序模版

班级群接龙小程序为啥少一人部署小程序多少钱布丁小程序变卡通头像是什么小程序不要微信小程序步步高手机小程序布置作业的微信小程序部落系统小程序步行小程序不重复抽号小程序布丁小程序怎么样不准发小程序的图片不支持微信交易的小程序有用吗不在发现里面看见微信小程序不占座小程序鸡肋步数运动小程序

consolelog微信小程序 c语言小程序编程打印名字 c#程序如果保存小程序出口算题的小程序 c语言小程序有趣的源代码 c语言小程序判断奇偶数 c#评分小程序 c/c++生日快乐小程序超强智商送娃娃问题小程序彻底删除微信小程序长沙租车小程序 c++源小程序怎么找错从外部的h5页面跳转到小程序长沙最火的小程序 C++生成布尔矩阵小程序 cover-view真机小程序不显示

调试小程序多抓鱼小程序钉钉小程序开发教材点击弹出下拉窗口小程序夺冠小程序电脑方面一些小程序点击小程序后重启微信夺冠会议小程序会销调查问卷电子小程序导致微信小程序变慢第三方小程序业务域名有什么用哆拉宝办卡小程序调节小程序速度电脑如何打开微信小程序调试微信小程序白夺冠魔方微信小程序

二维码读取器微信小程序二手车小程序模板二维火小程序二维码小程序系统开发二维非稳态导热c语编程小程序二维码下单小程序二手闲置交换小程序-爆发二手交易平台小程序二维数组小程序二维码关联小程序二维码打印小程序二维码点餐小程序二维码转化小程序码二维码扫描出现小程序二手商小程序二月小程序残局37关

附近小程序找不到附小程序一周年生态回顾富途微信相关小程序附近小程序展示能力封禁复杂门店小程序复用认证小程序富文本l数据小程序识别富登小贷诉讼程序复用资质认证50个小程序富途牛牛小程序复制微信小程序富阳微信小程序公司复制小程序商品链接富文本转微信小程序附近小程序支持第三方吗阜阳小程序推广员

国外电视直播小程序关闭小程序时缓存失效国外附近的小程序国外资质的小程序过户小程序公众号绑定小程序的备用网页个体小程序工商户账户取现果蔬公众号小程序共享健身房小程序公众平台登录是小程序国外类似小程序给携程好友加速需要小程序号码? 果蔬配送小程序嚰姑街怎么更新小程序个哇哈域名能绑几个做小程序个体工商户营业执照小程序

获取小程序菊花码获取验证码后倒计时小程序获取用户名小程序海盗来了小程序水果获取小程序码返回乱码 h5页内拉起小程序分享获取小程序图片到本地服务器获取小程序二维码实例获取小程序页面二维码带参获取小程序二维码返回海盗小程序群互帮获取元素小程序获取小程序二维码后面的连接获取小程序码47001 获取小程序转发路径参数获取小程序客服消息

it科技小程序 i麦当劳小程序码 ipad可以用小程序了 ICP微信小程序 ipadair2微信小程序不能全显示 i麦当劳小程序怎么退款 i微信小程序怎么 idea如何创建小程序let ipod微信小程序版 ionic2打包微信小程序 it橘子小程序 i麦当劳小程序 iqzz小程序 i麦当劳小程序天津 iponex换刘海微信小程序 ipone微信小程序

绝地求生yy小程序 java小程序怎么添加背景音乐军武次位面小程序安装揺奖小程序免费下载绝地求生压枪小程序即速应用知乎小程序 java编写手机运行小程序集字游戏小程序均和文化微信小程序绝地求生旅客吃鸡小程序军装照小程序绝地求生地主小程序即速小程序提交审核军武次位面微信小程序专题没了军装小程序即速应用小程序文本换行

快递100小程序非业务域名快站如何弄进小程序里昆明小程序云南企云集匡威中国官方小程序矿泉水小程序开发后台图片管理带小程序源码匡威小程序昆明小程序骗局视频昆明微信小程序价格昆山小程序昆明小程序价格昆明商城小程序快站有小程序吗昆明小程序开发商昆明小程序加盟电话宽带测速小程序

绿箭小程序律师小程序推广效果律师介绍小程序律师会见小程序律师怎样在微信开通小程序绿色小程序图片 LISP小程序注册码加密律师小程序哪个好旅游小程序起什么名好滤镜微信小程序律师所公众号加小程序旅游小程序系统开发绿叶惠购小程序律师小程序免费律师行业小程序解决方案律师小程序平台

摩拜小程序总定位显示在北京慕课网微信小程序入门到美团小程序切换账号慕课网小程序视频下载美团小程序是以手机号为账号? 麦当劳微信小程序如何退款没有备案域名微信小程序服务器慕课小程序百度云麦当劳小程序怎样退单摩拜小程序蓝牙开锁没反应买了个小程序源码,但是不会装, 麦当劳小程序如何退单没有营业执照注册公众号小程序美团外卖怎么更改商家微信小程序慕课网小程序下载慕课网微信小程序下载

女王爱衣服小程序怎么退货 netbeans怎么运行applet小程序女生爱玩的微信小程序女程序员超小比基尼挪车码小程序女生的小程序农业部小反刍兽疫免疫程序农资小程序案例弄一个微信小程序需要多少钱女王新款模式小程序弄个微信小程序要几钱弄一个小程序大概多少钱能去照片中多余部分的小程序女票小程序努比亚手机小程序弄一个小程序价格

oppo时钟小程序 oppo锁屏小程序 oppo界面小程序 oppor9s小程序 oppo怎么将程序加入小插件欧拜单车小程序 oppo小程序桌面 OPPOa59s小程序如何移到sd卡里 oppo微信小程序没声音 oppo微信小程序满屏 op手机没有小程序 oppo手机屏幕程序缩小 oppor9s有小程序吗 ORG小灯左移右移程序 oppor9s怎么加小程序欧尚微信小程序

普勒小程序普法小程序批量提交小程序功能普通小程序入门介绍普通公众账号可以关联的小程序普陀小程序 php怎么接收到小程序code 普通话成绩查询we交理小程序浦发信用卡小程序积分 php小程序页面加载数据慢浦发小程序怎么 php微信小程序提现浦发小程序怎么找到浦发银行微信小程序浦发信用卡签到小程序浦发信用卡小程序申卡

群友小程序群玩助手小程序怎么没法下载求2个数值的和小程序群印象小程序权限群统计小程序维护中群统计小程序实名群统计小程序截图群聊里的聊天小程序怎么删除群雄逐鹿小程序怎么玩其他组织的小程序群玩助手小程序群英会微信购彩小程序群统计小程序授权失败群小助手小程序群享通讯录小程序请帖小程序源码

软捷科技小程序入驻微信小程序抽成若比邻小程序开发软件测试之微信小程序软文植入小程序如何限制小孩玩微信内小程序让女朋友说出我是猪的小程序软件属于小程序什么类目如何下载微信小程序的音频入驻微信小程序需要收费吗入驻微信小程序有用吗软件著作权小程序软件放入微信小程序软件测试计算器小程序如何获得微信小程序链接网址软件在微信小程序劣势

索尼xzp截图小程序所有小程序索尼Z5小应用程序索尼黑卡5小程序索尼悬浮小程序宿迁小程序吧所有小程序加载失败什么小程序可以聊天我爱你全屏所有小程序的名字宿州小程序招聘锁屏小程序宿迁小程序价位宿迁到家小程序宿舍管理小程序宿迁小程序报价索尼相机的小程序

推销微信小程序话术? 推荐小程序商店拖拽式小程序平台推荐一个微信读书的小程序推销微信小程序骗局退出销毁小程序推荐一个小程序知乎退伍军人服务中心小程序 tp5接受小程序用户信息拖拽式小程序天客通小程序收费标准推送小程序卡片托克托小程序腾讯小程序象棋残局92关腾讯小程序象棋92关怎么破图解推小程序

u盘加密小程序 unity3d微信小程序 unity小程序开发 udp客户端小程序 unity入门小程序 url微信小程序 ubuntu桌面小程序 ueditor支持小程序 ug自动出bom小程序 ui设计微信小程序 UI开发小程序 util微信小程序 untiy的简易小程序 ubuntu下的小程序 untiy3d小程序 unitylog小程序

vs2013小程序例子 vue开发抽奖小程序 vue小程序富文本 vs小程序实时预览 vs有趣的小程序 vs哄女朋友小程序 vs可以开发小程序吗 vx小程序查看密码 vs聊天小程序 vuenpm微信小程序 vs微信小程序 vx猜歌小程序 vue开发支付宝小程序 vue搭建的小程序 vs的测试小程序 vue开发微信小程序开发视频

微信美团小程序怎么改手机号微信小程序美团外卖怎么更换号码微信小程序象棋怎么关声音微信小程序表单和数据库怎么绑定微信小程序如何遮住tabbar 微信小程序怎么判断字符串为空微信小程序可以加入安装SDK吗微信小程序怎么沒有图标微信小程序美团电话怎么改微信小程序有多少行代码微信小程序的美团如何换绑微信小程序客服消息与PC端交互微信小程序美团外卖怎么改电话微信pc可以看小程序吗微信小程序打卡怎么写名字微信小程序中的图标怎么都没有乃

小程序里的文字怎么复制小程序怎么定义一个二维数组小程序还没上线认证费用可以退吗小程序基础库版本在哪里看小程序的微信头像会变吗小程序开发怎么设置字体为苹方小程序中怎么让单个字体图标变大小程序怎么添加编译模块小程序怎么引用css 小程序怎么引入本地的css 小程序认证失败钱会退吗小程序audio怎么修改样式小程序icon大小怎么调小程序中icon怎么调节大小小程序Numbe如何输入文字小程序中数组如何判断是否包含

用微信小程序代码编写自己的名字有TP后台的小程序后台怎么弄运动游戏的小程序有趣的小程序运行程序小化后找不到有赞小程序的好处运行程序缩小后就不见了运营小程序推广有趣小程序c++编程题运行小程序都需要什么有趣小程序c++ 运营微信小程序赚钱运用程序缩小运营维护小程序算高科技公司吗运行小程序引入小程序缺少app.js

座位表小程序怎么缩放小程序canvas 坐套微信小程序多少钱支付小程序流量变现证件照小程序源码走步刷礼的小程序坐标正反算小程序最好的调查问卷小程序坐标计算小程序坐深圳地铁微信小程序怎么在小程序定义二维数组重力感应微信小程序小游戏展示中的小程序不能勾选自动点击系统弹窗小程序怎么彻底删除微信上的小程序招聘类小程序代码