Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
02/06/2018 20:18
Konu Sahibi
firtina
Yorumlar
12
Okunma
673
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

firtina

Aktif Üye
7295
Ay.... Ah.... TO....
 48
 12
 48
 28/05/2009
0
 
 
 Ofis XP
 01/03/2019,01:16
Çözüldü 
Herkese iyi akşamlar, 

     Yapmış olduğun çalışmayı geliştirmek için farklı bir soru olduğuna inandığım (benim için) şöyle bir sorunum var. Yardımlarınızı rica ediyorum.

  Örnek'teki herhangi bir text box'a Command button'a (mesela Ayhan) tıklandığında "Ayhan" yazıyor ve bir sonraki text box'a sorunsuz geçmektedir. 

  Acaba bu command button (Ayhan) tıklandıktan ve içindeki "Ayhan"'ı yazdıktan sonra False olabilir mi? Yazılan text box'ı tıkladığımda Command button tekrar True olabilir mi? Text box'ın içini silerek sanki oraya yazılmamış gibi. 

Şimdiden yardımlarınız için çok teşekkür ederim.

İyi çalışmalar.


firtina, 28-05-2009 tarihinden beri AccessTr.neT üyesidir. Hoba

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 480
 12.053
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,00:25
Butonun tıklandığında olayı

metinkutusu = "Ayhan" 
metinkutusu.setfocus
Komutbutonu.visible = false

Metin kutusu tıklandığında olayı

Komutbutonu.visible = true


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

firtina

Aktif Üye
7295
Ay.... Ah.... TO....
 48
 12
 48
 28/05/2009
0
 
 
 Ofis XP
 01/03/2019,01:16
(02/06/2018 21:35)ozanakkaya Adlı Kullanıcıdan Alıntı: Butonun tıklandığında olayı

metinkutusu = "Ayhan" 
metinkutusu.setfocus
Komutbutonu.visible = false

Metin kutusu tıklandığında olayı

Komutbutonu.visible = true

Hocam örnekteki buton tıklanma olayında;

Private Sub Command0_Click()
 If IsNull(Me.Text4) Then
Me.Text4 = Me.Command0.Caption
ElseIf IsNull(Me.Text6) Then
Me.Text6 = Me.Command0.Caption
ElseIf IsNull(Me.Text8) Then
Me.Text8 = Me.Command0.Caption
ElseIf IsNull(Me.Text10) Then
Me.Text10 = Me.Command0.Caption
ElseIf IsNull(Me.Text12) Then
Me.Text12 = Me.Command0.Caption
ElseIf IsNull(Me.Text14) Then
Me.Text14 = Me.Command0.Caption
ElseIf IsNull(Me.Text16) Then
Me.Text16 = Me.Command0.Caption
ElseIf IsNull(Me.Text18) Then
Me.Text18 = Me.Command0.Caption
ElseIf IsNull(Me.Text20) Then
Me.Text20 = Me.Command0.Caption
ElseIf IsNull(Me.Text22) Then
Me.Text22 = Me.Command0.Caption
ElseIf IsNull(Me.Text24) Then
Me.Text24 = Me.Command0.Caption
ElseIf IsNull(Me.Text26) Then
Me.Text26 = Me.Command0.Caption
ElseIf IsNull(Me.Text28) Then
Me.Text28 = Me.Command0.Caption
End If
End Sub

kodları yazılı olduğundan hata mesajı vermektedir. Birde diğer 3 button da text boxlar için var.


firtina, 28-05-2009 tarihinden beri AccessTr.neT üyesidir. Hoba

ozguryasin

Uzman
9727
Öz.... Ya....
 36
 44
 1.130
 23/09/2009
613
 Bursa
 Yazılım
 Ofis 2016 32 Bit
 19/05/2019,09:46
Bir önceki sorunuzda metin kutularına aktarmayı yapmıştık, tıklanan butona me.butonadi.visible = false yazın.  Bu şekilde buton kapanacak.

Metin kutuşarının tıklandığı olayına, metin kutusu isnini okuyun ve o butonu aktif edin.

Bu yöntemi deneyin, yapamazsanoz pc başına geçince birlikte bakalım


POWER 'un Çekirgesi :=)
ozguryasin, 23-09-2009 tarihinden beri AccessTr.neT AİLESİ üyesidir.
Access'i Profesyonel Şekilde Öğrenmek İçin https://www.accesstr.net Ailesi Yeter. alkis


Site Kurallarını sorularınızın hızlı cevaplanması için kesinlikle okuyunuz.

firtina

Aktif Üye
7295
Ay.... Ah.... TO....
 48
 12
 48
 28/05/2009
0
 
 
 Ofis XP
 01/03/2019,01:16
(02/06/2018 21:53)ozguryasin Adlı Kullanıcıdan Alıntı: Bir önceki sorunuzda metin kutularına aktarmayı yapmıştık, tıklanan butona me.butonadi.visible = false yazın.  Bu şekilde buton kapanacak.

Metin kutuşarının tıklandığı olayına, metin kutusu isnini okuyun ve o butonu aktif edin.

Bu yöntemi deneyin, yapamazsanoz pc başına geçince birlikte bakalım

Hocam 
1 den 13 e kadar hata vermedi 13 ten sonra hata verdi.
ve ilk tıklamada false olmadı.


firtina, 28-05-2009 tarihinden beri AccessTr.neT üyesidir. Hoba

direnist

Uzman
244
Di.... SA....
 56
 494
 05/11/2008
167
 İstanbul
 
 Ofis 2010 64 Bit
 21/03/2019,13:01
Merhaba;
Ekli örneği inceler misiniz?
İyi çalışmalar.




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Listeden Seçilenlen Stokların Pasif Olması U.ALTUN 5 232 11/03/2019, 10:07
Son Yorum: U.ALTUN
Çözüldü Listeden Seçilenlen Stokların Pasif Olması U.ALTUN 6 232 08/03/2019, 11:02
Son Yorum: U.ALTUN
Çözüldü DoCmd.SetWarnings False veya DoCmd.SetWarnings True Nedir? Oğuz Türkyılmaz 3 168 24/12/2018, 17:53
Son Yorum: Oğuz Türkyılmaz
Çözüldü Formun En Üstte Olması Hakkında notrino 6 251 19/12/2018, 18:11
Son Yorum: notrino
Çözüldü Alt Formda Varsayılanın Tek Kayıt Olması max7 2 342 05/02/2018, 08:01
Son Yorum: max7

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.