VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2007/01/20(Sat) 09:13
投稿者花ちゃん
Eメール
URL
タイトルRe^5: 配列要素についてお願いします

> Private Sub Combo1_Change(Index As Integer)
> ST = Index

この ST が悪さしているようですね。
Combo1(ST + 1).Text = OP$ '--ここではST=18
ここで書き込んだ時に ST = Index で ST=19 になっている
ブレークポイントを設定して確認して見て下さい

下記のように変更して見て下さい
If Left$(DAT, Len(Combo1(Index).Text)) = Left$(Combo1(Index).Text, Len(Combo1(Index).Text)) Then
List2(Index \ 3).AddItem DAT


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -