عدم اجرای Thread هنگام فراخوانی ساب از ماژول!!!

[vb.net.33]

با سلام

من یک ساب نوشتم که تو یه ماژول گذاشتمش.

و اون ساب اینه منظور از Base نام فرم هست:

Public Sub nnh()
Base.Text = "%%%%"
End Sub

و در داخل کد کلیک یه دکمه این کد رو نوشتم که اجرا نمیشه!!!


CheckForIllegalCrossThreadCalls = False
t1 = New System.Threading.Thread(AddressOf nnh)
t1.Start()

[vb.net.33]

اساتید لطفا راهنمائی کنید.خیلی شدید نیاز دارم.

[مرتضی تقدمی]

سلام
کدها را به این شکل تغییر دهید :



Public Sub nnh(ByVal newform As Form)
newform.Text = "%%%%"
End Sub




CheckForIllegalCrossThreadCalls = False
t1 = New System.Threading.Thread(AddressOf nnh)
t1.Start(Me)


موفق باشید