1樓:潛凡白
如果要變數,陣列最方便,給您提供一個陣列的程式:
dim a() as integer '在這宣告瞭陣列
dim b() as integer
dim text as integer
private sub command1_click()
dim s1, s2 as string
text = val(form1.text1.text)
if text > 9 then
msgbox "請輸入九個以下的陣列元素個數!"
exit sub
end if
randomize '初始化隨機數生成器
'以下是陣列a
redim a(text) as integer '在這宣告瞭一個陣列
for i = 0 to (text - 1) '開始為陣列中的元素賦值
a(i) = int(rnd * 100) '隨機生成0 - 99的整數
s1 = s1 & " " & str(a(i))
next
form1.text2.text = s1
randomize '初始化隨機數生成器
'以下是陣列b
redim b(text) as integer
for i = 0 to (text - 1) '開始為陣列中的元素賦值
b(i) = int(rnd * 100) '隨機生成0 - 99的整數
s2 = s2 & " " & str(b(i))
next
form1.text3.text = s2
end sub
private sub command2_click()
dim s as string
'以下是陣列c
redim c(text) as integer
for i = 0 to (text - 1)
c(i) = a(i) + b(i)
s = s & " " & str(c(i))
next
form1.text4.text = s '顯示陣列c
end sub
2樓:一邊一半
as string
as intenger
3樓:匿名使用者
'顯示大寫字母組成的子串 textbox3.text = lower '顯示小寫字母組成的子串 end sub 比較accii值就可以啦 private sub command1_click() dim
VB如何實現顏色隨機選擇,VB如何實現顏色隨機選擇
private sub form click randomize timer backcolor rgb rnd 256,rnd 256,rnd 256 end sub 這是bai改變窗體du背景顏 zhi色的 dao過版 程 權。rgb int rnd 256 int rnd 256 int rn...
如何用SPSS實現多個因變數和多個自變數的分析
要具體看 資料抄型別襲,如果y 因變數 bai為定類資料,可用dulogistic迴歸分析 如果zhiy為定量數dao據,可用多元迴歸分析。自變數中有定類資料可設定成啞變數,再放入分析。可結合spssau的分析方法選擇文件,選擇適合的分析方法。做多因素迴歸分析,可以的 統計專業 做迴歸分析即可,注意...
如何用VB實現秦九昭演算法
第一題解 作出底邊bc上的高ad 等腰 abc的周長為26 ab ac bc 26 ab ac,且ab bc 4 bc 4 bc 4 bc 26 3bc 18 bc 6 ab ac 6 4 10 bc 2 2 ad 2 ab 2 3 2 ad 2 10 2 ad 2 100 9 91 ad 根號91...