شما باید یک خروجی برای تابع در نظر بگیرید و گرنه این تابع بدرد نمیخود
شکل کامل این گونه است
Public Function Leave(txtName As String)as string
dim Tx as string =val( txtName) * 2
return tx
End Function
و بعد در یک جای دیگه استفاده می کنید مثل
sub Button1_click(..)...
textbox1.text=leave(textbox1.text)
end sub
پاسخ با نقل قول