驴友阁 >风水知识 >生肖运势

求一个随机抽签不重复软件或.exe程序,1-54之间不重复。哪位能帮忙?谢谢!

  using System;   using System.Collections.Generic;   using System.Text;   using System.IO;   namespace RandDemo   {   class Program   {   static void Main(string[] args)   {   System.Random rdm1 = new Random(unchecked((int)DateTime.Now.Ticks));   Console.WriteLine(rdm1.Next(1,54)); //输出1-54之间的一个随机数   }   }   }   如果只要整数的话是!不8341可能不重复的,!

用vb做抽签软件,怎么样能抽一个删一个,也就是不重复抽签

  前几天帮别人做的一个抽奖程序代码你根据自己的要求改下吧Private Sub Timer2_Timer()Static i As Integer If i Jiang品等级:", "")ww(1) = Replace(ww(1), "奖品名称:", "")ww(2) = Replace(ww(2), "抽奖次数:", "")Timer3.Enabled = TrueCommand2.Enabled = FalseTimer2.Enabled = TrueWMP1.Controls.pause主页面.WMP2.URL = 基本信息.Text5.TextStatic cs As Integercs = cs + 1Select Case csCase 1 To ww(2)Label12.Caption = "当前抽取的是:" & ww(0) & "。共:" & ww(2) & "份,当前是第:" & cs & "份"Label11.Caption = "当前抽取的是:"Label13.Caption = "奖品:" & ww(1)Label14.Caption = ww(0)If cs = ww(2) Thencs = 0List2.RemoveItem 0End IfEnd SelectExit Subn:If List1.ListCount = 0 ThenCommand3.Enabled = FalseCommand2.Enabled = FalseMsgBox "每个人都抽到奖品了", 64, "提示"ElseCommand2.Enabled = TrueCommand3.Enabled = TrueEnd IfEnd Sub!

急,我做得vb抽签怎样修改成无重复的抽签方式?

  你贴的代码能正常工作吗,    如果能正常工作。修改这就行了   k = Int(Rnd * 47)   TextBox1.Text =0706 rstr(k)   改成   1. rstr()数组做成全局数组!并初始化为0   2. 上面的代码,生成随机数后,判断随机数是否用过、用rstr()记录随机数是否使用信息   do while 1   k = Int(Rnd * 47)   if rstr(k) = "0" then   TextBox1.Text = k   ;;;,如果k有0值?则写成k+1;不知道这么用行不行、没用过VB   rstr(k) = "1"   else   exit do   end if   loop!

怎样在网上抽签

  象由心生。意动则应吉凶、你可以试试“观音灵签”。通俗易懂、!

两个字重复的男孩名字

  喜喜(本人比较喜欢) 皮皮 ( 堃堃(Kun) 籁籁 鲁鲁 虎虎 桐桐 玮玮,

两个字不重复狗名字

  公狗:辛巴 卡儿 卡其 麦琪 麦兜 DUDU 妞妞 米奇 happy baby 哈罗Lucky 旺财 维尼 努比 哈利 贝勒、巴顿!   母狗:美芽,叮当 布丁 丁香 仙妮 安妮 米莉 香奈 诺米 珍妮 米妮 薇倪。

两个字重复的好听的名字有哪些

  女生:暖暖!娜娜、宁宁。晶晶!秀秀,甜甜!贝贝。冰冰、花花、文文。微微!   男生:凯凯、豆豆,琦琦、呆呆!,

狗狗叫什么名字好听,两个字重复的,多一点

  球球、绒绒。果果。朵朵。朗朗,帅帅。,

抽签 上上签

  道士不可信 、但是如果你真要信的话,珐么我就说吧。上上签其实0382就是最好的签?对你比较好。道士不告诉你!我想他可能是故弄玄虚,一方面说好话。另一方面来个9426故弄玄虚,你也只有挨的份了。

常梓锌这个名字重复的多吗

  不多的。叫梓婕到是挺多的。


展开全文