' Set a property of multiple controls/objects in a single step,' and return True if successful' Note: requires the SetProperty function'' Example: SetPropertyEx("Text", "OK!!!", TextBox1, Button1, Button2)Function SetPropertyEx(ByVal propertyName As String, ByVal val As Object, _ ByVal ParamArray objs() As Object) As Boolean Dim obj As Object Try For Each obj In objs SetProperty(obj, propertyName, val) Next Catch Return False End TryEnd Function
Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.























