轉Shownic 的 方法
1. 加入一個ComboBox到表單中, 名字(name)設定為cboNum
2. 在cboNum上按滑鼠右鍵, 選擇copy
3. 在表單空白位置按滑鼠右鍵, 選擇paste
4. 訊息顥示控制項已經存在, 是否要建立control array, 回答'是'
5. 這時在表單上有兩個ComboBox, 兩者共用同一個名字cboNum, 但是index分別為0和1--cboNum(0)和cboNum(1)
6. 加入TextBox, 名字設為txtSum
7, 加入下列的程式碼
Option Explicit
Private Sub cboNum_Click(Index As Integer)
Static intNum(1) As Integer '設定變數陣列
intNum(Index) = Val(cboNum(Index).Text) '將變數指定成選擇的數值
txtSum.Text = intNum(0) + intNum(1) '在TextBox中顯示和數
End Sub
現在問題是,我沒有辦法在兩個相同的combo name 裡面放一些預算數字?!
如.... 我想要在combo1 和 combo2 裡面放的數字都是相同 也就是25,50,75 to 200! 因為當我像一般combo 加入additem 時出現error?!
Private Sub Form_Load()
Dim i As Integer
Dim term(7) As String
'Various fineness modulus of sand value guided
term(0) = "25"
term(1) = "50"
term(2) = "75"
term(3) = "100"
term(4) = "125"
term(5) = "150"
term (6) = "175"
term(7) = "200"
For i = 0 To 7
cboNum.AddItem term(i)＜---------- 在這裡Additem 是出現 "method or data members not found"
Next
cboNum.Text = cboNum.List(0)
那如果我想現在做配對的呢?! 就是選combo1 裡面的X,和選combo2 裡面的Y 那麼答案就會立即顯示在text 裡面?!
這時候又應該怎麼寫呢?!
請各位高手幫我修改一下吧~~~＞_＜~