随机显示号码源码

❶ 易语言怎么写1 -33数字中、标签中、随机显示6个数字号码和1-16个数字显示1个号码

.版本 2.程序集 窗口程序集1.子程序 _按钮1_被单击
.局部变量 随机数, 整数型
.局部变量 i
.局部变量 红球, 整数型, , "0"
.局部变量 a, 整数型编辑框1.内容 ＝ “”
编辑框2.内容 ＝ “”
清除数组 (红球)
.计次循环首 (33, a)
加入成员 (红球, a)
.计次循环尾 ()置随机数种子 ().计次循环首 (6, i) 随机数 ＝ 取随机数 (1, 取数组成员数 (红球))
编辑框1.加入文本 (到文本 (红球 [随机数]) ＋ “,”)
删除成员 (红球, 随机数, )
.计次循环尾 ()
编辑框2.内容 ＝ 到文本 (取随机数 (1, 16))
.子程序 __启动窗口_创建完毕

❷ 易语言指定数字中取随机，求源码

.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

列表框1.加入项目 (“海南”, )
列表框1.加入项目 (“山东”, )
列表框1.加入项目 (“福建”, )
列表框1.加入项目 (“深圳”, )

.子程序 _加入按钮_被单击
.局部变量 a, 整数型
.局部变量 找到, 逻辑型

找到 ＝ 假
.计次循环首 (列表框1.取项目数 (), a)
.如果真 (列表框1.取项目文本 (a － 1) ＝ 编辑框1.内容)
信息框 (“已有” ＋ 编辑框1.内容 ＋ “此项目，不能加入！”, 0, )
找到 ＝ 真
跳出循环 ()
.如果真结束

.计次循环尾 ()
.如果真 (找到 ＝ 假)
列表框1.加入项目 (编辑框1.内容, 列表框1.取项目数 () )
.如果真结束

.子程序 _按钮2_被单击

置随机数种子 ()
编辑框2.内容 ＝ 列表框1.取项目文本 (取随机数 (0, 列表框1.取项目数 () － 1))

❸ 一个双色球随机选号的php脚本程序。功能是按要求随机生成并显示若干组号码完全不能相同的双色球号码。

<?php
$numbers=range(1,33);
shuffle($numbers);
$result=array_slice($numbers,0,7);
foreach($resultas$n)printf("%02d",$n);
echo"<br>";
?>

❹ VB编程：在文本框里输入6位数的彩票号码，按下“开奖”按钮后，6个标签中会显示随机数号码，对比开奖

❺ 易语言谁帮我制作一个随机抽选名字或数字的源码

把姓名或数字 逐个放到一个一维数组中
然后置随机种子取随机数，然后根据这个随机数 将数组中的值 取出 放到你要显示的组件中（如编辑框）。

.版本 2

.程序集 窗口程序集1
.程序集变量 姓名数组, 文本型, , "0"
.程序集变量 点击数, 整数型

.子程序 _按钮1_被单击
.局部变量 随机数, 整数型
.局部变量 n, 整数型

' 循环加入不同姓名
.计次循环首 (10, n)
加入成员 (姓名数组, “张三” ＋ 到文本 (n))
.计次循环尾 ()
' 置随机种子并 取出数组范围内的随机数
置随机数种子 (取秒 (取现行时间 ()) ＋ 点击数)
随机数 ＝ 取随机数 (1, 取数组成员数 (姓名数组))
' 将内容打印到编辑框中
编辑框1.内容 ＝ 姓名数组 [随机数]
' 增加随机种子的随机性
点击数 ＝ 点击数 ＋ 1

补充
问：可以啊，但是为什么随机抽取的名字后面都加数字？

答：我是给你举个例子所以加入了后面带数字的名字

其实实际中 这些名字一般是由操作者加入的 ，不是程序设计时添加的。

❻ 跪求C++产生1-100随机数的源代码

#include <iostream>
#include <ctime>
#include <cstdlib>
using namespace std;

void main()
{
srand((unsigned)time(0));//函数是随机数发生器的初始化函数，以系统时间作为种子
int ran_num;
int t=0;
int strNum[100];
for(int i=0;i<100;i++)
{
ran_num=rand()%100; //产生100以内的随机数
strNum[t]=ran_num;
cout<<ran_num<<" "; //ran_num这个随机数是根据系统时间产生的
t++;
if (t%10==0)
{
cout<<endl;
}
}
for(int i=0;i<100;i++)
{
cout<<strNum[i]<<" ";
}
system("pause");
}
//运行一下啊，保证没有问题！

❼ 急 求c语言随机抽取姓名源码

#include<stdio.h>
#include<stdlib.h>
#include<time.h>
struct
{
	charstr[20];//名字
	intno;//号码
}a[99]={{"",0}};//初始化
intmain()
{
	FILE*fp;
	charch;
	inti,n=0,choice,who;
	fp=fopen("name.txt","r");
	if(fp==NULL)
	{
		printf("cannotopenthefile
");
		return1;
	}
	while((ch=fgetc(fp))!=EOF)
	{
		if(ch=='
')n++;//一行一个名字，计算人数
	}	
	rewind(fp);
	for(i=0;i<n;i++)
	{
		a[i].no=i;//每人对应的号码
		fscanf(fp,"%s
",a[i].str);		
		
	}
	srand(time(NULL));
	for(i=1;i<n;i++)
	{
		printf("=============
1.抽取0.退出
=============
");
		scanf("%d",&choice);
		if(choice==1)
		{
loop:
			who=rand()%n+1;
			if(a[who].no==0)gotoloop;
			puts(a[who].str);
			a[who].no=0;//抽取过的标志为0
		}
		elsebreak;
	}
	fclose(fp);
	return0;
}

❽ 求一个按键精灵随机数字的源代码

Dim MyValue, Response
Randomize '初始化随机数生成器。
Do Until Response = vbNo
MyValue = Int((999999 * Rnd) + 1) ' 产生 1 到 999999 之间的随机数。
MsgBox "随机数:"&MyValue
Loop