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
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
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 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 ...