alt formdaki denetimleri false / true için tek tek yazmak yerine,ilgili kodun içeriğini aşağıdaki ile değiştirmeniz yeterlidir.böylece,alt formu direkt tek olarak etkisizleştirmiş olursunuz.
Kod:
Sub SifirsaKitle()
'ATOZ:
'AŞAĞIDAKİ KODLARA DAİR DÜZENLEMELER YAPILMIŞTIR.
If Me.İs_No = 0 Then
Me.fırkısıd.Enabled = False
Me.yetkılı.Enabled = False
Me.SEKTOR.Enabled = False
Me.tel.Enabled = False
Me.ılılce.Enabled = False
Me.belgeno.Enabled = False
Me.Komut163.SetFocus
Me.tbl_URUNGIRIS.Enabled = False
Else
Me.fırkısıd.Enabled = True
Me.yetkılı.Enabled = True
Me.SEKTOR.Enabled = True
Me.tel.Enabled = True
Me.ılılce.Enabled = True
Me.belgeno.Enabled = True
Me.tbl_URUNGIRIS.Enabled = True
End If
End Sub