Salut ,
Je suis pratiquement debutant dans Access/Visaul Basic.
Mon PB est le suivant:
j'ai une Liste modifiable cbo_Qs provenant de la table tbl_Daten.
cette table pessede un champ [Text] ( qui s'affiche sur la liste modifiable cbo_Qs ) et un autre champ [tbl_Text].
j'aimerais en choisissant un element de cbo_Qs
qu' un formulaire standar "Daten_Formular" s'ouvre, qu'il prend le Titre [Text] et qu'il soit charger par la table [tbl_Text]
comme resultat, :quelque soit l' element selectionner il attribue comme Titre le Premier element de cbo_Qs (itemdata(0))et la Table corespondant au premier element.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim rs As Object Dim Con as Object stSql as string Set con = Application.CurrentProject.Connection Set rs = CreateObject("ADODB.Recordset") stSql = "SELECT * FROM [tbl_Daten] " rs.Open stSql, con, 1 For i = 0 To cbtest.ListCount - 1 DoCmd.OpenForm "Daten_Formular" Forms!Daten_Formular.Titel.Caption = rs.[Text] Forms!Daten_Formular.RecordSource = rs.[tbl_Text] Next i
Merci D'avance
Balises code powered by Xo, merci d'y penser![]()
Partager