如何使隨機產生的數平均三行顯示 vb

時間 2022-07-09 10:25:03

1樓:白木道人

dim a(29) as single

for i=0 to 29

a(i)=rnd*55

text1=text1+a(i)

if (i-0) mod 10 =0 then text1=text1+chr(13)+chr(10)

next i

2樓:

private sub form_load()randomize

end sub

private sub command1_click()dim i as integer

dim j as integer

for i = 0 to 29

text1.text = text1.text & int(rnd * 99 + 1) & " "

j = j + 1

if (j mod 10) = 0 thentext1.text = text1.text & chr(13) & chr(10)

end if

next i

end sub

這次可以了!要讓文字框可以顯示多行!text1.multiline=true

3樓:匿名使用者

private sub command1_click()text1.text = ""

dim t(1 to 30) as integerrandomize

for i = 1 to 30

t(i) = rnd * 99 + 1

next

for i = 1 to 30

text1.text = text1.text & " " & format(t(i), "@@")

if i mod 10 = 0 then text1.text = text1.text & vbcrlf

next

end sub

如何使ecel產生範圍內的隨機數要求小數點

wu家欽 1.首先計算這個範圍的差值。這裡假設範圍值為50 100之內的隨機數2.開啟電子 在所需要產隨機數的單元格內輸入如下公式 rand 100 50 50。按確認鍵就可以生成在規定範圍內的隨機數了!3.如果你需要生成多個隨機數,那拖動單元格最下角小三角就可以啦!microsoft excel可...

電腦隨機數是如何生成的,電腦如何產生隨機數?

不可能寫出那樣的程式.因為本來就是隨即出的數字.當然不能先知道.我做這麼長時間開發.沒發現能這麼寫過 電腦產生的隨機數稱為偽隨機數,是通過演算法模擬的,看上去和隨機數一樣,實際上能算出來的數就是可以預見的數 對你來說不可預見,對電腦則是可預見 不是真正的隨機數。 有具體的針對某個軟體嗎?單獨的電腦隨...

excel如何產生不重複的隨機數

如,要求,1 50個數字隨機不重複分佈在50個單元格里 1 在a1單元格輸入 50 int 51 row rand 1 不要直接回車或點前邊的勾確認,而要點ctrl shift enter三鍵結束。2 滑鼠移到a1單元格右下角,游標變為黑十字,向下拖拽到a50即可。 北辰酆海雪 用輔助列的方法最為簡...