VBA建模 差一點了 能幫幫我嗎

這樣建模的話 可以實習一行變尺寸的方塊，但是不能在parameter list 那里修改參數值.過程是我是先進入一個模板，然后點擊macros/make VBA macro， 然后編寫代碼，最后在macros那里 選中開始輸入的名字。代碼如下:
' again
Sub Main ()
Dim i,j,n,value
Dim sline As String
n=2 ' mean two bricks
For i=1 To 2 'loop to create some bricks
j = (i-1)*5 ‘方塊間隔為5
sline = InputBox("length"+Cstr(i)) ' the length and width of brick
value = CDbl(InputBox("value")) ' length and width value
storeParameter(sline,value) 'make it as a parameter
With Brick
.reset
.Name "model"+Cstr(i) 'order name
.material "pec"
.Xrange (j,j+value)
.Yrange (0,j+value)
.Zrange (0,1)
.Create
End With
Next i
End Sub

本帖提到的人: @foxman @wh_wh22 @zjn317253663

小編，你這個問題解決了嗎

還沒有呢，只能半參數建模了。

你怎么也需要這個功能，做什么方向的哈?朋友

我暫時不需要這個功能，但是可以先學習一下嘛

實現什么功能?

反射陣，現在解決了！