اضافه كردن به مقدار يك تكت باكس

با سلام خدمت دوستان
یک سوال : میخام بدونم بعد از این که مقادیر رو در تکست باکس ها وارد کردیم و
کلید ثبت رو زدیم فیلد اول ما که کد اشتراک هست به چه صورت در مرحله بعدی ثبت یک واحد بهش اضافه شده و نشون داده میشه؟
اگه دوستان راهنمایی کنید ممنون می شم.

text1=text+1
و می تونی با این دستور همه مقادیر TextBox رو برابر صفر قرار بدی
For Each frmany In Me.Controls
If TypeOf frmany Is TextBox Then
frmany.Text = Empty
End If
Next frmany