[Rabeea Qbaha]

لا ليس عليك ذلك تحتاج المتغيرات الخاصه بك فقط

كود :

   Private Sub test(ByVal x As Integer, ByVal y As String, ByVal z As Boolean)
       TextBox1.text = x
       TextBox2.text = y
       TextBox1.Enabled = z
   End Sub

وتقوم باستدعائها كما ياتي 

كود :

test(1, "hello", True)

طبعا المتغيرات حسب حاجتك لها 
او يمكن تكون بدون شيئ