fikir vermesi açısından başka ve kısa bir yaklaşımda benden
kodun çalışması için
kodun içindeki txtkontrol cümlesini form elemanlarının özelliklerindeki (im) yada diğer adı ile (tag) olan kısma yazın
Public Sub textlerikilitle()
Dim Ctlr As Control
On Error Resume Next
For Each Ctlr In Form.Controls
If Ctlr.Tag = "txtkontrol" Then
Ctlr.visible= True
End If
Next
End Sub
Public Sub textleriac()
Dim Ctlr As Control
On Error Resume Next
For Each Ctlr In Form.Controls
If Ctlr.Tag = "txtkontrol" Then
Ctlr.visible = False
End If
Next
End Sub