抽数字小程序 随机求抽数字的软件

1, 随机求抽数字的软件

Dim n As Integer
Dim a()
Private Sub Command1_Click()
If n = 0 Then "第一次点击时执行
m = Val(Text1)
ReDim a(1 To m)
For i = 1 To m "生成数组a，元素为1至m这m个数
a(i) = i
Next
For i = 1 To m - 1 "随机打乱数组a中元素
r = Int(Rnd * m + 1)
tmp = a(i)
a(i) = a(r)
a(r) = tmp
Next
End If
n = n + 1 "计数点击次数
If n > Val(Text1) Then "次数超过指定次数，抽奖结束
MsgBox "抽奖结束！"
Exit Sub
End If
Text2 = a(n) "从数组中抽出第n个数，由于数组中是随机排列，所以相当于生成一个随机数，并且不会重复
End Sub

3, 一个随机数的小程序

数字抽奖软件 3.2
数字抽奖软件是一个适合商场、单位娱乐晚会等使用的趣味抽奖软件，内置音效、动画效果。奖项包括一至五等奖、幸运奖、未中奖，用户可以设置各奖项出现的百分比以及出现时间。本软件已经成功应用于多个大型商场。
功能特点：
* 支持每个奖项对应不同的数字。
* 支持背景音乐和出奖音效。
* 奖项设置：一等奖，二等奖，三等奖，四等奖，五等奖，幸运奖和未中奖。
* 支持设置各奖项出现概率。
* 支持设置一二三等奖出现的时间。
* 支持数据统计，统计时间段内总抽奖次数以及每个奖项的出现次数。
系统要求：
* 操作系统：简体中文版Windows 2000/XP/2003 Server/Vista。
* 屏幕分辨率1024*768以上，32位真彩色。
* 256M以上内存。
* 声音设备：声卡，音箱。

4, 抽奖是屏幕上可以滚动数字的软件叫什么啊？可以输入人名来滚动人名...

用标准c就可以实现
需要用到的两个函数在包含在stdlib.h头文件里，分别是
void rand ( unsigned int seed )； //设置随机化种子
int rand ( void )； //产生0到RAND_MAX之间的随机数，RAND_MAX是stdlib.h里定义的数字。
其实这两个函数实现产生的是假随机数，所以真正实现随机还要借助time.h里面的函数time()。
具体可以参考下面的方法：
//产生0-9只间的随机数
#include<stdlib.h>
#include<stdio.h>
#include<time.h>
int Random()
{
srand(time(NULL));
return rand()%9;
}

名词解释

time

《时代周刊》（Time）又称《时代》，创立于1923年，是半个世纪多以前最先出现的新闻周刊之一，特为新的日益增长的国际读者群开设一个了解全球新闻的窗口。《时代》是美国三大时事性周刊之一，内容广泛，对国际问题发表主张和对国际重大事件进行跟踪报道。 《时代》有美国主版、国际版，以及欧洲、亚洲和拉丁美洲版。欧洲版（Time Europe，旧称Time Atlantic）出版于伦敦，亦涵盖了中东、非洲和拉丁美洲的事件，亚洲版（Time Asia）出版于香港，南太平洋版出版于悉尼，涵盖了澳大利亚、新西兰太平洋群岛。 2018年12月18日，世界品牌实验室编制的《2018世界品牌500强》揭晓，时代周刊排名第263。

rand

Rand（兰特，符号：R，国际标志：ZAR），是南非的货币名称，1 Rand (R) = 100 cents。