Also, in the registry if you save "[objectname] [propertyname] [propertyvalue] " then you can use:
vb Code:
Private Sub SetObjProp(objName As String, objProp As String, objPropValue As String) CallByName Me.Controls(objName), objProp, VbLet, objPropValue End Sub
So if you do:
vb Code:
Call SetObjProp("Text1", "Text", "It worked!")
Then Text1.Text will equal "It worked!".




Reply With Quote