|
>>Changeイベントは連鎖で影響が出るので余り使わないのですが
余り使わないと言うより、私としては使いたくないと言う方が正しかも?
>とのことですが、連鎖する数が多くなったりすると影響が出たりするのでしょうか?
何処にどう影響するか、気をつけていなければ、いけないと言う事です
例えば、今回の物も、
Private Sub ComboBox1_Change()
' If intFocus = 1 Then
ComboBox2.ListIndex = ComboBox1.ListIndex
' End If
End Sub
Private Sub ComboBox2_Change()
' If intFocus = 2 Then
ComboBox1.ListIndex = ComboBox2.ListIndex
' End If
End Sub
として見れば解ると思います
結果としてどうなるかと言うと
コンボボックスのListから選択する場合は、別に特に表面上、問題ないのですが
ComboBox1のText部に入力した場合
ComboBox1のListIndexは当然-1に成ります
それを、ComboBox2のListIndexに入れるとComboBox2のListIndexも-1に成り
Sub ComboBox2_Changeのイベントが起こり、ComboBox1のListIndexが-1に書き替えら
れる為、入力中の文字列が消されてしまいます
詰まり、文字列の入力が不可能という事態に成ります
|
|