Private Sub Command0_Click()



Dim GSayi As Integer



For GSayi = 4 To 28 Step 2

    If IsNull(Controls("Text" & GSayi)) Then



        Controls("Text" & GSayi) = Me.Command0.Caption

        Controls("Text" & GSayi).SetFocus

        Me.Command0.Visible = False

        Exit For

    End If

Next GSayi



End Sub

Üstteki kod sizin kod ile önceki mesajda belirttiğim kodun birleştirilip sadeleştirilmiş halidir. Lütfen sonraki sorularınızda yapılan yardım sonucu hata veriyor ise hatalı halini ekleyiniz.
Metin kutularının her biri için aşağıdaki kodun metin kutusu ismine göre düzenlenmiş hali eklenmelidir.
Text4 için

If Me.Text4 = Me.Command0.Caption Then

Me.Command0.Visible = True

ElseIf Me.Text4 = Me.Command1.Caption Then

Me.Command1.Visible = True

ElseIf Me.Text4 = Me.Command2.Caption Then

Me.Command2.Visible = True

ElseIf Me.Text4 = Me.Command3.Caption Then

Me.Command3.Visible = True

End If

(02/06/2018, 22:38)direnist yazdı: Merhaba;
Ekli örneği inceler misiniz?
İyi çalışmalar.

Hocam,

Çok teşekkür ederim.Ellerinize sağlık. Sayenizde bir aşama daha kaydetmiş bulunmaktayım. Sorun çözülmüştür. 

Çok sağolun. Kolay gelsin.

Rica ederim. ))
İyi çalışmalar.

Merhaba,

  Hocam sizlerden bu projem ile ilgili son bir isteğim olabilir mi?

Şu an istediğim herşey çok güzel çalışıyor. 
Ayhan isimli buton'a basınca Tex4'e yazıyor. Buton false oluyor. 
Text4'e basınca buton geri geliyor. 
Fakat Text4 içindeki Ayhan yazısı kalıyor
Klavyeden sildiğim zaman Text4'ün içine başka buton a basınca mesela Özden butonu yazıyor. Aksi halde Text6'ya geçiyor.
Me.Text4=""
kodunu denedim görümümde Text4 boş görünüyor fakat herhangi bir buton'u tıkladığımda Text4'ten değil bir sonraki Text'lerden yazmaya başlıyor.


  Acaba Text4'e tıklayınca Ayhan butonu geri geldiğinde Text4'ün içi temizlenip Özden, Ahmet, Mehmet  veya Ayhan butonuna basılınca kendisi  yine bu butonların içlerindeki yazıları yazabilir mi?

Yani kısaca text4, sanki baştan yazılacak konuma gelebilir mi?

Kolay gelsin, iyi çalışmalar.

Merhaba;
Ekli örnekteki gibi mi?
İnceler misiniz ?
İyi çalışmalar.

(04/06/2018, 21:32)direnist yazdı: Merhaba;
Ekli örnekteki gibi mi?
İnceler misiniz ?
İyi çalışmalar.

Hocam merhaba,

    Size karşı çok mahcubum. Bu verdiğiniz cevap ile projem ile ilgili tüm eksiklerim tamamlanmıştır. Size ve tüm Accesstr ailesine çok teşekkür ederim. 

Sorun çözülmüştür. Çok teşekkür ederim size. 
 İyi akşamlar.