Kod:
Private Sub Metin4_AfterUpdate()
If Me.Metin4 = "FR01" Then DoCmd.OpenForm "form1"
If Me.Metin4 = "FR02" Then DoCmd.OpenForm "form2"
If Me.Metin4 = "FR03" Then DoCmd.OpenForm "form3"
End Sub
Private Sub Metin4_AfterUpdate()
If Me.Metin4 = "FR01" Then DoCmd.OpenForm "form1"
If Me.Metin4 = "FR02" Then DoCmd.OpenForm "form2"
If Me.Metin4 = "FR03" Then DoCmd.OpenForm "form3"
End Sub
Bu Konudaki Yorumlar |
Kod İle Form Yada Rapor Açma - Yazar: adnnfrm - 02/02/2020, 17:17
Cvp: Kod İle Form Yada Rapor Açma - Yazar: mehmetdemiral - 02/02/2020, 18:55
Cvp: Kod İle Form Yada Rapor Açma - Yazar: adnnfrm - 02/02/2020, 21:32
Cvp: Kod İle Form Yada Rapor Açma - Yazar: mehmetdemiral - 02/02/2020, 23:38
Cvp: Kod İle Form Yada Rapor Açma - Yazar: adnnfrm - 02/02/2020, 23:52
Cvp: Kod İle Form Yada Rapor Açma - Yazar: berduş - 03/02/2020, 00:20
Cvp: Kod İle Form Yada Rapor Açma - Yazar: access_delisi - 03/02/2020, 09:48
Cvp: Kod İle Form Yada Rapor Açma - Yazar: mehmetdemiral - 06/02/2020, 23:44
Cvp: Kod İle Form Yada Rapor Açma - Yazar: berduş - 05/02/2020, 14:26
|