То есть что-то вроде:
Dim Con As Control
Set Con = Me("ИмяКонтрола")
Con("НапримерСвойствоVisible") = False
Или VB не позволит так низко опуститься? (сорри за каламбур)
Function CallByName(Object As Object, ProcName As String, CallType As VbCallType, Args() As Variant)
Member of VBA.Interaction
VbCallType
VbMethod = 1
VbGet = 2
VbLet = 4
VbSet = 8
Call CallByName(Con, "НапримерСвойствоVisible", VbLet, False)
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 47