1樓：匿名使用者
生成10-20的隨機數整數 除以2搞定
2樓：匿名使用者
正確如下,函式
function rndx()
return (int(rnd()*11)+10)*0.5end function
'說明'rnd()*11 產生0-10的數字'int(rnd()*11)+10 為10-20的整數'*0.5當然是你要的結果
'用法'dim x
'x=rndx
3樓：匿名使用者
int(rnd*5)+5+int(rnd*2)*0.5就是再讓隨機產生0或0.5
4樓：匿名使用者
textbox1.text = int(0.5 * (5 * rnd() + 10))
這個是隨機5~10的整數。
你看看能不能幫到你。
自己再多試幾次
5樓：
式子是(fix(rnd * 11) + 10) / 2
你自己加到程式裡面就可以了
6樓：匿名使用者
private sub form_click()randomize
a = int(rnd * 5 + 0.5) + 5print a
end sub
這樣才對~~ 如果沒有加0.5 是不會有10出現的 不信試試~
7樓：匿名使用者
很遺憾,上面的人都搞錯了,注意 mosquitokobe 的方法會使5和10出現的機率減小
randomize
5+int（rnd（time）*11)/2
8樓：我就屬蛇
i=5+int（rnd（time）*10）/2
計算機vb中,利用隨機函式產生10個10-100的隨機數,並將其賦值給陣列a,然後求出平均值？
9樓：聽不清啊
private sub command1_click()dim a(10) as integer
randomize
for i = 1 to 10
a(i) = int(rnd() * 91) + 10print a(i);
s = s + a(i)
next i
print "平均值="; s / 10
end sub
vb生成10個隨機數，且在1~50之間
10樓：設計營地
建立一個陣列，a（50），把數字1~50，存在相應的陣列中，讓後根據隨機數的值，交換對應下標的陣列存放的值，最後把陣列的前10個數儲存，或是輸出即可，這樣就不會出現重複值，也可簡化演算法。
在vb中，如何編寫程式通過隨機函式產生10~99之間的隨機整數？
11樓：匿名使用者
vb 產生隨機數的公式（上界-下界+1）*rnd+下界你的題目就應該是（99-10+1)*rnd +10一般用rnd的時候還要在前面加一條 randomize 初始化隨機種 子
12樓：匿名使用者
randomize time '初始化
print int(rnd * 90) + 10 '產生隨機數，並輸出
13樓：匿名使用者
private sub form_click()randomize
for i = 10 to 99
n = int(rnd * i + 10)next
print nend sub
14樓：匿名使用者
dim tmp as byte randomize timer ' 隨機種子 tmp=int(rnd * 90+10) msgbox tmp ' 輸出隨機數
vb中如何利用函式生成776 878之間的以4為倍數的隨機數
rem 執行後，單擊窗體即可產生 private sub form click dim n as integer randomize 生成隨機種子 don int rnd 878 776 1 776 int rnd m n 1 n是產生 n,m 之間隨機整數的通用公式 loop until n mo...
vb中ListIndex屬性如何利用
返回或設定控制元件中當前選擇 專案的索引號，如 list1.listindex 5 設定要選擇list1控制元件的第5條記錄 v list1.listindex 返回當前選擇list1的第幾條記錄 listindex 屬性示例 msdn 這個例子在 listbox 控制元件中顯示三個演員的名字，在 ...
excel中，如何利用函式給1 80的排名給出相應的數值，如第一名給30，第二名27，依此類推，分數成0為止
你這個很麻煩。首先，第一張表a列是排名的依據 數值。b列作為排名。然後回c列是得分 答你需要在另一張表 例如sheet2 中。做一個對名錶。a列是排名，b列是排名所對應的得分。這個表可以手工去做。也可以用公式 b7 b6 2，b16 b15 2。返回第一張表，假設有標題行。在b2中輸入公式 sump...