19/05/2014, 20:40
Sn.aayazli,
Yazmış olduğum kodda aracın cinsine göre hazırlamış olduğunuz formların hangisinin görünüp hangisinin görünmeyeceğine olanak sağlıyoruz. Bunu yaparken ben 2 form olduğu için ARAC_CINSI metin kutusu içeriğini sorgulatıp burada "TIR" yazıyorsa "TIR" isimli altformun görünmesini, Yazmıyorsa "KAMYON" isimli altformun görünmesini sağladım. Bu işin mantığı siz bu mantığı geliştirerek altformlardan hangisinin görünmesini gerekiyorsa ona göre kodu revize etmelisiniz.
Kodun türkçe meali
Yazmış olduğum kodda aracın cinsine göre hazırlamış olduğunuz formların hangisinin görünüp hangisinin görünmeyeceğine olanak sağlıyoruz. Bunu yaparken ben 2 form olduğu için ARAC_CINSI metin kutusu içeriğini sorgulatıp burada "TIR" yazıyorsa "TIR" isimli altformun görünmesini, Yazmıyorsa "KAMYON" isimli altformun görünmesini sağladım. Bu işin mantığı siz bu mantığı geliştirerek altformlardan hangisinin görünmesini gerekiyorsa ona göre kodu revize etmelisiniz.
Kodun türkçe meali
If Me.ARAC_CINSI = "TIR" Then '(- EĞER ARAC_CINSI metin kutusunda TIR yazıyorsa)
Me.TIR.Visible = True '( - TIR altformunu göster)
Me.KAMYON.Visible = False '( - KAMYON altformunu gizle)
Else '( - EĞER ARAC_CINSI metin kutusunda TIR yazmıyorsa)
Me.KAMYON.Visible = True '(- KAMYON altformunu göster)
Me.TIR.Visible = False '( - TIR altformunu gizle)
End If