1

コンボボックスのインデックスが変更されると、SelectedIndexChanged イベントが発生します。

これをタイマーのコードから呼び出し、ユーザーがオプションを選択したときに呼び出します。

このイベントを発生させたのがユーザー アクションなのか、それとも他のイベントなのかを判断する方法がわかりません。

タイマーでフラグを試してみましたが、これは機能しますが、よりオープンなソリューションを探していました。

4

2 に答える 2

0

任意のフラグの使用について ...

Dim ByWhat As String 

Private Sub timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles timer1.Tick
    ByWhat = "TIMER1"
    MyJob()       
End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

    ByWhat = "COMBOBOX1"
    MyJob()

End Sub

Sub MyJob()

  Select Case ByWhat
  Case "TIMER1"
    'code if called by timer1

  Case "COMBOBOX1"
    'code if called by combobox1

  End Select 

  ByWhat = "" '---->Clear it
End Sub
于 2013-07-30T08:56:35.160 に答える