VB中怎麼統計隨機十組隨機數陣列後第一位出現最多的某個數字

2022-03-28 03:35:12 字數 1232 閱讀 2828

1樓:聽不清啊

private sub command1_click()

dim a(10, 6) as string * 2, b(30) as integer

dim max as integer, maxi as integer, maxj as integer

randomize

for i = 1 to 6

print "第" & i & "位  ";

next i

print

for i = 1 to 10

for j = 1 to 6

a(i, j) = format(int(30 * rnd() + 1), "00")

print "  "; a(i, j); "   ";

next j

print

next i

for i = 1 to 6

for j = 1 to 30

b(j) = 0

next j

for j = 1 to 10

t = val(a(j, i))

b(t) = b(t) + 1

next j

for j = 1 to 30

if b(j) > max then

max = b(j): maxi = i: maxj = j

end if

next j

next i

print

print max, maxi, maxj

print "第"; maxi; "位的 "; format(maxj, "00"); " 出現最多。"

end sub

private sub command2_click()

clsend sub

2樓:匿名使用者

vb 6 還是,net 哦

建立 類temp 屬性 名稱 次數

1遍歷 所有陣列第一位

2 比較當前陣列在 tem 裡面是否存在 如果存在temp 的次數加1

如果不存在就新建乙個temp 並把次數賦值為1 名稱賦值為數字3 遍歷完成之後比較 所有temp 的次數的大小 讀取最大次數的名稱就是出現最多的數字

方法就是這樣 vb6 和.net 語法不一樣

3樓:匿名使用者

一共6位?

一共10組?

請問你的陣列名與格式?

c怎麼獲取隨機數C怎麼獲取隨機數

在開發過程中,常常要產生隨機數,如生成靜態 html 網頁時,檔名通常用產生隨機數的方式獲得,生成定單的時候,定單號也可以用產生隨機數的方式獲得等。在 c 中,一般都用 random 產生隨機數,它可任意指定產生隨機數範圍。random 結合陣列,可以產生一些特殊範圍的隨機數,以滿足特殊的需要。一 ...

ecel中的隨機數能不能隨機數值以後就固定下

將公式設定為手動重算,這樣就不會變了。但是其他公式需要變的也不能變了。最好就是生成隨機數後用選擇性貼上貼上成數字。1 在excel 的任意單元格中輸入隨機函式 rand 點選檢視大圖 2 點選回車,即可生成隨機函式資料。3 需要將此隨機數值固定下來,可以選中該單元格,按下 ctrl c 執行複製操作...

怎麼用c 生成指定隨機數,在c 裡怎麼弄隨機數?

include include include using namespace std int main srand unsigned time null 初始化時間種子 int ret rand 3 產生 0 1 2 三種隨機數 int real pow 2,ret 2的0次方 1 2的1次方2 ...