Uygulamanıza srg_formisimleri adında sorgu ekledim. Bu sorgu ile MSysObjects tablosunda Type değeri -32768 olan Name alanlarını (yani form isimlerini) listelettim.
ana_menu formundaki Açılan Kutu5 in güncellenme sonrasında olayına puletin hocanın verdiği kodu
Kod:
Private Sub Açılan_Kutu5_AfterUpdate()
DoCmd.OpenForm Me.Açılan_Kutu5, acNormal
End Sub
yazdım.
Açılan kutunun satır kaynağı
Kod:
SELECT srg_formisimleri.Name FROM srg_formisimleri ORDER BY srg_formisimleri.Name;
üstteki
Sql kodu srg_formisimleri sorgusunun 1. sütununu yani uygulamadaki tüm formların isimlerini listeliyor.
vt1.rar
(Dosya Boyutu: 13,79 KB | İndirme Sayısı: 159)