Private Sub Command1_Click()
Select Case tablosec.ListIndex
Case 0 'Gaz Sale
DoCmd.OpenTable ("gs_detay")
Case 1 'Gaz Cogs
DoCmd.OpenTable ("gc_detay")
Case 2 ' Other Sale
DoCmd.OpenTable ("os_detay")
End Select
' DoCmd.OpenTable ("denemetable")
End Sub
Trending Articles
More Pages to Explore .....