投稿日 | : 2007/01/20(Sat) 08:13 |
投稿者 | : Do_Shirouto |
Eメール | : |
URL | : |
タイトル | : Re^4: 配列要素についてお願いします |
> > Combo1(ST + 1).Text = OP$ '--ここではST=18
> > Combo1(ST + 2).Text = DAT '--ここはなぜかST=19
> 変数STの宣言文がないですがどこで宣言しているのでしょうか?
> モジュールレベルで行っていたりしたら、他のイベントが発生して
> それで、変数の値が変わってしまったということが考えられます。
> Combo1_Changeなどにコードを書いてるということはないでしょうか。
皆さんご回答有り難うございます。
Combo1_Changeは下記のコード記述があります。
'==============================================
Private Sub Combo1_Change(Index As Integer)
ST = Index
List2(ST \ 3).Visible = True
List2(ST \ 3).Clear
Open App.Path & "\DATA.txt" For Input As #1
Do Until EOF(1)
Input #1, DAT, OP$, DS$
If Left$(DAT, Len(Combo1(ST).Text)) = Left$(Combo1(ST).Text, Len(Combo1(ST).Text)) Then
List2(ST \ 3).AddItem DAT
End If
Loop
Close #1
End Sub
'---------------------------------------------------
STは標準モジュールでPublic ST と宣言しています。
一度 すべての変数を変えて書直してて見ます。
有り難うございました