1樓：網海1書生
dim fc,count
count = 0
dim s()
fc=array(5,10,15,20)
redim s(ubound(fc))
for each f1 in fc
s(count) = f1
count=count+1
next
2樓：匿名使用者
dim fc,count
count = 0
dim s()
fc=array(5,10,15,20)
for each f1 in fc
count=count+1
redim preserve s(count)s(count) = f1
next
vbs 怎麼定義二維陣列和迴圈讀取
3樓：匿名使用者
vbs的陣列不支援key
你可以改用dictionary物件或者class用class:
class demo
public u
public d
end class
dim a(1)
set a(0) = new demo
a(0).u = "a1"
a(0).d = "a2"
set a(1) = new demo
a(1).u = "b1"
a(1).d = "b2"
dim b
for b = 0 to ubound(a)msgbox a[b].a
msgbox a[b].b
next
4樓：匿名使用者
dim a(1,3)
for i = 0 to ubound(a,2)for j = 0 to ubound(a,1)a(j,i)=x
x=x+1
next
next
for i = 0 to ubound(a,2)for j = 0 to ubound(a,1)str1=str1 & a(j,i) & vbcrlfnext
next
msgbox str1
如何在vbscript中給二維陣列賦值
5樓：司馬刀劍
你定義的是一個二維陣列，在vb中最多可以定義六十維。你定義了16個變數陣列（vb陣列是從0開始的）方法如下：
dim a(3,3) as integera(0,0) = 12
a(0,1) = 23
a(0,2) = 12
a(0,3) = 77
a(1,0) = 47
a(1,1) = 55
a(1,2) = 12
a(1,3) = 23
a(2,0) = 12
a(2,1) = 23
a(2,2) = 12
a(2,3) = 23
a(3,0) = 12
a(3,1) = 23
a(3,2) = 12
a(3,3) = 23
vbs低階問題關於wshshell和wscript的注意，是vbs
你也可以不用set,直接使用 createobject wscript.shell sendkeys 其實就是呼叫wscript.shell裡面的sendkeys方法而已.wshshell什麼都不是,只是個變數.你也可以換成x,y,z.當然不行.你別誤會這個 wshshell是什麼東西，這只是個變數...
eprime程式設計問題，Eprime程式設計問題
你好，你進行呼叫就可以了，比如呼叫列名為p1，那麼你分別填 p1 0 p1 1 p1 2 就成了，當熱你想要版語句實現這個要求也沒權有問題，看你的需求。另外需要e prime程式示例可以參考 http eprime程式設計問題 參 人類對未知有天生恐懼，所以新不如舊，這種想法情有可原。忽而今夏 你好...
c語言程式設計問題，C語言程式設計問題？
int main printf 字母數 d n空格數 d n數字數 d n其他字元數 d n letters,space,digit,other return 0 第一個問題 無效的主要 i 100 i 100 第二個問題，到1 100奇 0 int i 1 i 1 100 i i 100 而 i ...