Private Sub TreeView4_NodeClick(ByVal Node As Object)
Select Case Node
Case "Rapor1"
DoCmd.OpenForm "Rapor1"
Case "Rapor2"
DoCmd.OpenForm "Rapor2"
End Select
End Sub
meşhur çin atasözü "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz