Olur. Biz siz ne zaman uygun olursanız o zamana kendimizi ayarlarız. Bizim yüzümüzden zorlanmanızı istemeyiz
Eczane Programları Yapmak
Form_Load olayında
temizle
diye bir satırımız daha var.
Bu satırla aşağıda gördüğümüz
Private Sub temizle()
adlı yordama git diyoruz.
Peki bu yordam da ne var?
Bu yordamda başlangıçta nesnelerimizin değerlerini ayarlıyoruz, alanlarımızı sıfırlıyoruz, etkin etkin olmayan nesnelerimizi belirtiyoruz.
ilackutu.enabled=false satırıyla ilaç seçeceğimiz kutuyu pasif yapıyoruz. Neden çünkü daha fatura bilgisi girmeden, oradaki firma seçilmeden ilaç seçilmesin. Çünkü o ilaçlar firmaya göre gelecek.
Diğer ise İlaçkaydet tuşunu
ilackaydet.Enabled = False satırıyla pasif yapıyoruz. Çünkü fatura seçilmeden ilaç kaydı olmaması gerekir. Buraya kadar anlaştık mı?
Anlayışınız için teşekkür ederim Arkadaşlar. Sizin gibi öğrencilerle çalışmak çok güzel.
temizle
diye bir satırımız daha var.
Bu satırla aşağıda gördüğümüz
Private Sub temizle()
adlı yordama git diyoruz.
Peki bu yordam da ne var?
Bu yordamda başlangıçta nesnelerimizin değerlerini ayarlıyoruz, alanlarımızı sıfırlıyoruz, etkin etkin olmayan nesnelerimizi belirtiyoruz.
Private Sub temizle()
ffattar = ""
ffatno = ""
firmakutu = ""
ffattop = ""
ilackutu.Enabled = False
fbarkod = ""
filac = ""
fmevcut = ""
ffiyat = ""
geladet = ""
ilackaydet.Enabled = False
ilacliste = ""
gtop = ""
tilac = ""
End Sub
Burada dikkatinizi çekmek istediğim 2 yer var. Birincisi ilackutu.enabled=false satırıyla ilaç seçeceğimiz kutuyu pasif yapıyoruz. Neden çünkü daha fatura bilgisi girmeden, oradaki firma seçilmeden ilaç seçilmesin. Çünkü o ilaçlar firmaya göre gelecek.
Diğer ise İlaçkaydet tuşunu
ilackaydet.Enabled = False satırıyla pasif yapıyoruz. Çünkü fatura seçilmeden ilaç kaydı olmaması gerekir. Buraya kadar anlaştık mı?
Anlayışınız için teşekkür ederim Arkadaşlar. Sizin gibi öğrencilerle çalışmak çok güzel.
Hayri16, 12-11-2009 tarihinden beri AccessTr.neT üyesidir.
Son Düzenleme: 29/12/2010, 20:49, Düzenleyen: Hayri16.
Evett
Evet..
Arife KULAK
Burcu aramıza hoş geldin. Katılmak ister misin?
Hayri16, 12-11-2009 tarihinden beri AccessTr.neT üyesidir.
İster isteeer
Arife KULAK
Konuyu Okuyanlar: 1 Ziyaretçi