อยากทราบวิธีการใช้คำสั่ง query หลายคำสั่งพร้อมกันในครั้งเดียว

Public Sub  Insert1(sql as string)
      insert data1
end sub

Public Sub  Insert2(sql as string)
      insert data2
end sub


Private Sub BtnProcess_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnProcess.Click
     Call  Insert1("query1")
     Call  Insert2("query2")
end sub