Access 2013のVBAでコンボボックスオプションを選択

Question

コンボボックスのあるフォームがあります。コンボボックスで特定のオプションを選択すると、フォーム内で異なるアクションが発生します。

フォームを開いたり、次のレコードに移動したりするときに最初のドロップダウンオプションを自動的に選択したいと思っています。 ComboBox.Value = "Option1"は、コンボボックスに文字列を入力するだけです。手動でオプションをクリックするのと同じではなく、他のアクションをトリガーしません。

コンボボックスのドロップダウンで、Accessがそれを認識するのと同じ方法でオプションを選択するにはどうすればよいですか？

Answer 1

他の回答に記載されているようにコンボボックスの値を設定してから、私のアクションがコード化されたAfterUpdateイベントを呼び出すことでこれを解決しました。このイベントは、VBAを使用して設定したComboBox.Valueをトリガーして使用します。

ComboBox.Value = "Option1" 
Call ComboBox_AfterUpdate 

Answer 2

あなたは/更新以下のコードでは、クリックイベント

me.combobox.value = "option1" 

Answer 3

上で、ボタンを使用してcomboxbox値を変更し、あなたのコンボボックスの名前にCombo7を変更したい場合。 Filed1をテーブルのFieldnameに変更します。あなたのオプション文字列に変更しますオプション1：私があれば教えてください

Private Sub Combo7_Change() 
    Select Case Combo7.Value 
    Case "option1" 
     Text9.Value = 1 
    Case "option2" 
     Text9.Value = 2 
    Case "option3" 
     Text9.Value = 3   
    End Select  
End Sub 

：以下のコードで

Private Sub Form_Current() 
    If IsNull(Me.recordSet.field1) Then 
     Me.recordSet.Edit 
     Me.recordSet.Field1 = "option1" 
     Me.recordSet.Update 
    End If 
    Call Combo7_Change 
End Sub 

は、あなたが欲しいのコードフォームを開くときに実行またはレコードが変更されるまでText9.Valueを変更しますあなたには、あなたの質問があります。