Merhaba, önceki konunuzda Yapılmaması Gereken Ölümcül Hatalar konusundan bahsetmiştim. Uygulamanız tamamen hatalı yolda ilerliyor. Uygulamanızı bir an önce düzeltmelisiniz. Bunu şiddetle tavsiye ediyorum.

if veya select Case komutu ile bu işlemi gerçekleştirebilirsiniz. Ancak Ünvan ile ilgili yeni tablo oluşturmanız ve açılan kutudan bu verileri seçmeniz daha doğru olacaktır. 1 Öğrenci, 2 Hizmet gibi.

Uygulamanızın bu haliyle örnek kod

ünvan açılan kutusunun güncelleştirme sonrasında olayına

Select Case Me.Açılan_Kutu21



Case "Öğrenci"



Me.Ücreti = Dlookup ("Ögrenci", "Fiyat_listesi")



Case "Kafle Sorumlusu"



Me.Ücreti = Dlookup ("Kafile_Sorumlusu", "Fiyat_listesi")



End Select

Sadece öğrenci ve kafile sorumlusunu ekledim, diğerlerini siz eklemeye çalışın (bu arada kafile kafle yazılmış, düzeltme yapmadım.)

Açılan kutu ismi "Açılan Kutu21" olmamalı, "acl_unvani" olmalıdır. Denetimlerde Türkçe Karakter ve boşluk olmamalı. Siz yeni açılan kutu eklendiğinde adının "Açılan Kutu 21" olmasına bakmayın, Microsoft Türkiye'deki arkadaşların umurunda değil. Tek bir Türkçe karakter yüzünden formunuz bozulmasın.

Üste yazdığm kodun devamını getiremezseniz konuya yazınız, yardımcı olmaya çalışırız.