Command Button'un False Olması - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html) +--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html) +--- Konu Başlığı: Command Button'un False Olması (/konu-command-button-un-false-olmasi.html) |
Command Button'un False Olması - firtina - 02/06/2018 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. Cvp: Command Button'un False Olması - ozanakkaya - 02/06/2018 Butonun tıklandığında olayı metinkutusu = "Ayhan" metinkutusu.setfocus Komutbutonu.visible = false Metin kutusu tıklandığında olayı Komutbutonu.visible = true Cvp: Command Button'un False Olması - firtina - 02/06/2018 (02/06/2018, 21:35)ozanakkaya yazdı: Butonun tıklandığında olayı 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. Cvp: Command Button'un False Olması - ozguryasin - 02/06/2018 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 Cvp: Command Button'un False Olması - firtina - 02/06/2018 (02/06/2018, 21:53)ozguryasin yazdı: Bir önceki sorunuzda metin kutularına aktarmayı yapmıştık, tıklanan butona me.butonadi.visible = false yazın. Bu şekilde buton kapanacak. Hocam 1 den 13 e kadar hata vermedi 13 ten sonra hata verdi. ve ilk tıklamada false olmadı. Cvp: Command Button'un False Olması - direnist - 02/06/2018 Merhaba; Ekli örneği inceler misiniz? İyi çalışmalar. |