Alıntı:1-2
3-4
5-6
7-8
9-10
dolayısıyla çift sayılardan önce tek sayılar geliyor.
11 numaralı koltuk için kod olarak ifade edecek olursak:
If 11="E" Then
If 12 <> "E" Then
Msgbox "Bu koltuk için sadece Erkek yolcu rezervasyonu yapılabilir"
Me.Undo
Else
Msgbox "Rezervasyon yapılmıştır"
End If
Else If 11="K" Then
If 12 <> "K" Then
Msgbox "Bu koltuk için sadece Kadın yolcu rezervasyonu yapılabilir"
Me.Undo
Else
Msgbox "Rezervasyon yapılmıştır"
End If
Else
' Koltuk hiç rezerve edilmemiş demektir.
End If
Kodları Access'te yazıp denemedim ufak tefek hatalar olabilir düzeltirsiniz.
