1樓：設計營地
s=a(i)
i=i+1
2樓：數學王子他
const n as integer = 10 'n為城市數
dim a(1 to n) as string '陣列a儲存城市名
dim b(1 to n) as single '陣列b儲存日照時間
private sub command1_click()
dim i as integer, s as string 's用於儲存輸入的城市名稱
s = text1.text
dim f as boolean 'f用於表示是否找到，當f=true時，表示未找到
f = true
i = 1
do while i <= n and f
if s = a(i) then
text2.text = str(b(i))
f = false
end if
i = i + 1
loop
if f then text2.text = "未找到城市"
end sub
private sub form_load()
a(1) = "北京": b(1) = 8
a(2) = "上海": b(2) = 8.5
a(3) = "南京": b(3) = 8.5
a(4) = "武漢": b(4) = 9
a(5) = "西安": b(5) = 8
a(6) = "長沙": b(6) = 8.5
a(7) = "廣州": b(7) = 8.5
a(8) = "瀋陽": b(8) = 9
a(9) = "深圳": b(9) = 8.5
a(10) = "香港": b(10) = 9
end sub
求解一道高中VB題目，一道vb題目求解。
private sub form click dim i as integer dim s as integer s 1 for i 1 to 9 s s 1 2 next i print s s end sub 是1534個 迴圈9次。因為第十天已經剩下1個 就沒再吃了 樓上那位 han44229...
VB程式設計題目
我也是初學者,比較冗繁,還有點小bug 建立一個按鈕控制元件陣列 command1 0 command1 1 command1 2 command1 3 一個 框控制元件picture1 如下 dim a as integer private sub form load command1 0 cap...
VB引用的問題（高分求解）VB題目求解
dll有兩種。一種是active dll這種dll內部包含是類或者類庫 這種dll可以通過vb的引用對話方塊引用進來。還有一種是windows的標準dll 這種dll內部包換的是匯出函式 這種dll的使用方式是像普通的api函式。想必你一定用過windows api函式吧。api函式的使用方法是這樣...