揺奖小程序

• 揺奖小程序？

  你应该用点击详情。了解更多！ 详情

  史蒂芬孙 2018-12-19 00:54 0评论 0赞同

• VB 抽奖小程序

  PrivateSubCommand1_Click()DimiAsIntegerDima(30)AsStringList1.Cleara(1)="姓名1"a(2)="姓名2"a(3)="姓名3"a(4)="姓名4"a(5)="姓名5"a(6)=&quo

  详情

  朱果果 2018-09-18 17:23 0评论 16赞同

• VB 抽奖小程序

  参加人26个字母，呵呵，自己也凑热闹OptionExplicitOptionBase1DimRec()AsString*1DimFirPrize(3)AsString*1DimSecPrize(5)AsString*1DimThiPrize(10)AsString*1DimRecNumAsIntegerPrivateSubCd1()

  详情

  Eli4321 2018-09-18 17:23 0评论 16赞同

• 如何利用vb制作抽奖小程序

  使用timer控件和随机函数就好了！

  详情

  Sadie 2018-09-18 17:21 0评论 8赞同

• VB 抽奖小程序

  太简单了吧。。将30个人名存储到数组a(i)里，然后。forj=0to6Randomizeprinta(Int(30*Rnd))next

  详情

  月下独酌素笺淡墨 2018-09-18 17:21 0评论 10赞同

• VB 抽奖小程序

  完化楼上的，，可以摇人名，，不会出现重复，，不会出现空白加一个LIST和一个TIMER，COMMANDDima(30)AsStringPrivateSubCommand1_Click()IfCommand1.Caption="开始"Thena(1)="姓名1"a(2)="姓名2"a(3)=&q

  详情

  亚马逊河游客 2018-09-18 17:18 0评论 16赞同