2016-03-04 81 views
0

這裏是另外一個問題:訪問2010 MS SQL Server 2008 R2中,VAB代碼

Private Sub cboKundennummer_AfterUpdate() 

' Kundenname aus Abfrage Kundennummer 
Me.kunde_name = Me![cboKundennummer].Column(1) 
Me.lieferant_name = Me![cboKundennummer].Column(3) 
Me.lieferant_nummer = Me![cboKundennummer].Column(2) 
Me.Form.Requery 

End Sub 

你看,我想打電話查詢在Access 2010表格填寫三個文本框。當我打電話查詢所有列都在那裏。但是當我在編輯器中設置斷點時,只有Me.kunde_name =「A Name」。兩個其他我...... =「空」

爲什麼?

- > Support.microsoft:

Private Sub cboNames_AfterUpdate() 
    Me.txtFirstName = Me![cboNames].column(1) 
    Me.txtLastName = Me![cboNames].column(2) 
    Me.txtTitle = Me![cboNames].column(3) 
End Sub 

這裏是我的SQL代碼:

SELECT A.kunde_nummer, A.kunde_name, A.lieferant_nummer, A.lieferant_name 
FROM dbo_View_Teilestamm_Lieferschein AS A 
INNER JOIN dbo_tblRetoureStamm AS B 
ON A.lieferschein_nummer = B.lieferschein_nummer; 

當我改變了我的第一與第二,第一個工作,但第二個沒有。 ..

請幫忙:-)

格爾茨

回答

0

所以大家好:-)

現在我知道它!!!!是!!!您必須創建 Combobox 手動組合框嚮導 !!!而且「將這個價值儲存在這個領域:」!!!我把我的TextBox改成了Combobox!那是錯!然後代碼鎖:

Private Sub cboLieferscheinnummer_Change() 
    Me.txtkunde_nummer.Value = Me![cboLieferscheinnummer].Column(1) 
    Me.txtkunde_name.Value = Me![cboLieferscheinnummer].Column(2) 
    Me.txtlieferant_name.Value = Me![cboLieferscheinnummer].Column(3) 
    Me.txtlieferant_nummer.Value = Me![cboLieferscheinnummer].Column(4) 
End Sub 

所以代碼填充所有四個文本字段! 謝謝。

Greetz。

相關問題