You could reduce the delegate-invoked code to one pair of methods for each property you want to update by doing something like:
Delegate Sub delSetText(ByVal theControl As Control, ByVal st As String)
Sub doSetText(ByVal theControl As Control, ByVal st As String)
theControl.Text = st
End Sub
Sub InvokeSetText(ByVal theControl As Control, ByVal st As String)
theControl.Invoke(New delSetText(AddressOf doSetText), theControl, st)
End Sub
then to set the text on a happyButton to "George", you would simply say InvokeSetText(happyButton, "George"). Nice and clean and easy.