[عبد الرحمن]

اذا كنت لابد تستخدم متغير string فهاذا التعديل
Dim x As String = "button1"
MsgBox(Me.Controls(x).Text)

لكن الافضل هذا
Dim x As Button = Button1
MsgBox(x.Text)