اکسنا | آموزش تخصصی و رایگان اکسس

Sub CalculateTotal()
    ' محاسبه مجموع
End Sub

Sub CalculateTotal()
    ' محاسبه مجموع دیگری
End Sub

   Sub CalculateTotal()
       ' محاسبه مجموع
   End Sub

   Sub CalculateTotal2()
       ' محاسبه مجموع دیگری
   End Sub
   

   ' کنترل‌ها در فرم
   Dim txtName As TextBox ' اولین TextBox
   Dim txtName2 As TextBox ' دومین TextBox