導航:首頁 > 源碼編譯 > 隨機顯示號碼源碼

隨機顯示號碼源碼

發布時間:2022-08-09 16:38:22

❶ 易語言怎麼寫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

閱讀全文

與隨機顯示號碼源碼相關的資料

熱點內容
php數組中刪除元素 瀏覽:724
螢石雲伺服器視頻 瀏覽:269
防火牆配置伺服器熱備的虛擬地址 瀏覽:188
linux安裝xdm 瀏覽:736
java計算12 瀏覽:249
大金空調擺動式壓縮機 瀏覽:453
新的雲伺服器如何設置首頁 瀏覽:687
javastring字元位置 瀏覽:196
銀河麒麟字體庫存在哪個文件夾 瀏覽:956
魔獸加丁伺服器的航空叫什麼 瀏覽:152
花冠改裝案例哪個app多 瀏覽:515
成績單app哪個好用 瀏覽:140
北美程序員vs國內程序員 瀏覽:181
php解析xml文檔 瀏覽:121
石墨文檔APP怎麼橫屏 瀏覽:185
牆主鋼筋加密和非加密怎麼看 瀏覽:144
金山區文件夾封套定製 瀏覽:708
soho程序員 瀏覽:672
java位元組截取 瀏覽:526
php提交作業 瀏覽:816