Skip to main content

AccessTr.neT


klavyede altfomdan üstforma geçiş yapmak

klavyede altfomdan üstforma geçiş yapmak

Çözüldü #19
aynen bunu istemiştim teşekkürler.
Cevapla
Çözüldü #20
Arkadaşlar şuanda da şöyle bir sorunum var, aynı veritabanı için konuşuyorum tekrar eklememe gerek yok sanırım.
Aynı alt formu kullanan iki ana formda da aynı alt formu kullanıyorum. (örneğin hambezsiparis1 ve t_sorgu ikisi de t_ürünler alt formunu kullanıyor)
Dolayısı ile altforuma yazdığım üst forma geçiş kodu bir anaform için çalışırsa diğeri için hata veriyor. Söz gelimi hambezsiparis1 formunda çalıştığım zaman "Forms!t_sorgu!Ürünadı.SetFocus" yolunu izlemeye çalışıyor ama aslında çalıştırması gereken kod "Forms!hambezsiparis1!Hamsip_no.SetFocus.
Sanırım burada if li bir kod yazmamız gerekicek,şu formdaysan şunu uygula diğerindeysen şunu uygula gibi..
Yardımcı olabilirseniz sevinirim,Şimdiden teşekkürler.
Cevapla
Çözüldü #21
kullanılacak form aktif olmadığı için ;yani imlecin gideceği denetimimin bulunduğu form aktif olmadığı için hata verecektir.
aynı altformu kullanan 2 adet formunuz varsa örneğin son halini ekleyin ki ona göre çözüm bulalım
GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
Son Düzenleme: 14/04/2011, 11:57, Düzenleyen: Coskun0559.
Cevapla
Çözüldü #22
parent diye bir komut vardı biraz müsade edersen araştırayım
aşağıdaki kodda işaretli komut üst formun adını veriyor. buna göre birşeyler yapabilirsiniz.

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
MsgBox Parent.Name
If KeyCode = 17 Then Forms!usttablo!ad.SetFocus
End Sub
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Son Düzenleme: 14/04/2011, 13:23, Düzenleyen: Yandemir.
Cevapla
Çözüldü #23
son örnekte zaten aynı altform kullanılıyor.
Cevapla
Çözüldü #24
örneğin hambezsiparis1 ve t_sorgu ikisi de t_ürünler alt formunu kullanıyor)

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
'MsgBox Parent.Name
If KeyCode = 17 Then
if parent.name = "hambezsiparis1" then Forms!hambezsiparis1!ad.SetFocus
if parent.name = "t_sorgu" then Forms!t_sorgu!ad.SetFocus
end if
End Sub
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task