ادغام سه دستور در یک دستور

[نسرین2000]

سلام
من توی برنامه ام سه تا دستور insert دارم که اطلاعات را در سه جدول وارد می کند و این سه دستور با یک دکمه اجرا می شوند حالا می خوام این سه دستور ادغام بشوند و دستور ادغام شده رو درون try و catch بذارم تا اگر اروری داره مشخص بشه . به چه صورت باید عمل کنم ؟
دستوراتم به شرح زیر است :
Dim objcommand As SqlCommand = New SqlCommand("insert into guest (guest_id , first_name , last_name , father_name , no_shenasnameh , no_meli , shoghl , date_tavalod , mahale_tavalod , phone , address) values (@guest_id , @first_name , @last_name , @father_name ,@no_shenasnameh ,@no_meli, @shoghl ,@date_tavalod , @mahale_tavalod , @phone , @address)", objconnection)
objsuite.CommandText = " insert into suite (guest_id ,tedad_suite,no_suite, date_vorood , date_khorooj ,modat_eghamat, moaref , pishpardakht , pay_night, takhfif , pardakht) values ( @guest_id ,@tedad_suite,@no_suite, @date_vorood , @date_khorooj ,@modat_eghamat, @moaref , @pishpardakht , @pay_night, @takhfif , @pardakht)"
objcommandhamrah.CommandText = "insert into hamrah(guest_id ,first_name,last_name, nesbat) values(@guest_id,@first_nameh,@last_nameh,@nesbat) "

[hamed.alinejad]

ببین میتونی از توابع استفاده که اینطوری که هر دستور رو توی یه تابع بنویسی و داخل دکمه هر سه تابع رو صدا بزنی

مثلا یه تابع به شکل
sub in1()
insert into .....
end sub

sub in2()
insert ....
end sub

, و توی رویداد دکمه هم میتونی هر سه تا رو باهم اینطوری فراخوانی کنی
call in1
call in2

یا اگه خواستی بعد از in1 تابع in2 اجرا بشه میتونی اخر تابع in1 بنویسی call in1