Show MessageBox after returning from DAL Method in 3-Tier Project

Public Function insertbyid(ByVal id As String) As Boolean
       Dim con As New SqlConnection()
       Dim cmd As New SqlCommand()
       Try
           Try
               con.ConnectionString = DBConnectionString
               con.Open()
               cmd.CommandText = "insert into yuvapriya where ID = '" & id & "'"
               cmd.CommandType = CommandType.Text
               cmd.Connection = con
               cmd.ExecuteNonQuery()
               Dim bool As Boolean
               Dim dt As DataTable
               Dim db As database
               If Not String.IsNullOrEmpty(id) Then
                   bool = db.executequery("UPDATE yuvapriya SET name = '" & emp.name & "',education = '" & emp.education & "',age = '" & emp.age & "',address = '" & emp.address & "',phonenum = '" & emp.phonenum & "',postcode = '" & emp.postcode & "' ,Email = '" & emp.email & "' WHERE id = '" & id & "'")
                   dt = db.getdt("select * from EmergencyContactDetails where yuvaid = '" & emp.emid & "'")
                   If dt.Rows.Count > 0 Then
                       bool = db.executequery("UPDATE EmergencyContactDetails SET Name = '" & emp.emname & "',Relationship = '" & emp.emrelationship & "',Address = '" & emp.emaddress & "',PostCode = " & emp.empostcode & ",HomeTelephone = " & emp.emhometelephone & ",WorkTelephone = " & emp.emworktelephone & ",PersonalMobile = " & emp.empersonalmobile & ",WorkMobile = " & emp.emworkmobile & " WHERE yuvaid = " & emp.emid)
                   Else
                       bool = db.executequery("INSERT INTO EmergencyContactDetails ([yuvaid],[Name],[Relationship],[Address],[PostCode],[HomeTelephone],[WorkTelephone],[PersonalMobile],[WorkMobile]) VALUES('" & emp.emyuvaid & "', '" & emp.emname & "', '" & emp.emrelationship & "', '" & emp.emaddress & "', '" & emp.empostcode & "', '" & emp.emhometelephone & "', '" & emp.emworktelephone & "', '" & emp.empersonalmobile & "', '" & emp.emworkmobile & "')")
                   End If

                   dt = db.getdt("select * from WorkHistory where yuvaid = '" & emp.whid & "'")
                   If dt.Rows.Count > 0 Then
                       bool = db.executequery("UPDATE WorkHistory SET Organization = '" & emp.whorganization & "',Designation = '" & emp.whdesignation & "',FromDate = '" & emp.whfromdate & "',ToDate = '" & emp.whtodate & "',Comments = '" & emp.whcomments & "' WHERE yuvaid = " & emp.whid)
                   Else
                       bool = db.executequery("INSERT INTO WorkHistory ([yuvaid],,[Organization],[Designation],[FromDate],[ToDate],[Comments]) VALUES('" & emp.whyuvaid & "', '" & emp.whorganization & "', '" & emp.whdesignation & "', '" & emp.whfromdate & "', '" & emp.whtodate & "', '" & emp.whcomments & "')")
                   End If
               Else
                   bool = db.executequery("INSERT INTO yuvapriya (name,education,age,address,phonenum,postcode,Email) VALUES('" & emp.name & "', '" & emp.education & "', '" & emp.age & "', '" & emp.address & "', '" & emp.phonenum & "', '" & emp.postcode & "', '" & emp.email & "')")
                   dt = db.getdt("select * from EmergencyContactDetails where yuvaid = '" & emp.emid & "'")
                   If dt.Rows.Count > 0 Then
                       bool = db.executequery("UPDATE EmergencyContactDetails SET Name = '" & emp.emname & "',Relationship = '" & emp.emrelationship & "',Address = '" & emp.emaddress & "',PostCode = " & emp.empostcode & ",HomeTelephone = " & emp.emhometelephone & ",WorkTelephone = " & emp.emworktelephone & ",PersonalMobile = " & emp.empersonalmobile & ",WorkMobile = " & emp.emworkmobile & " WHERE yuvaid = " & emp.emyuvaid)
                   Else
                       bool = db.executequery("INSERT INTO EmergencyContactDetails ([yuvaid],[Name],[Relationship],[Address],[PostCode],[HomeTelephone],[WorkTelephone],[PersonalMobile],[WorkMobile]) VALUES('" & emp.emyuvaid & "', '" & emp.emname & "', '" & emp.emrelationship & "', '" & emp.emaddress & "', '" & emp.empostcode & "', '" & emp.emhometelephone & "', '" & emp.emworktelephone & "', '" & emp.empersonalmobile & "', '" & emp.emworkmobile & "')")
                   End If
                   dt = db.getdt("select * from WorkHistory where yuvaid = '" & emp.whid & "'")
                   If dt.Rows.Count > 0 Then
                       If Not emp.whfromdate = String.Empty Then

                       End If
                       bool = db.executequery("UPDATE WorkHistory SET Organization = '" & emp.whorganization & "',Designation = '" & emp.whorganization & "',FromDate = '" & emp.whfromdate & "',ToDate = '" & emp.whtodate & "',Comments = '" & emp.whcomments & "' WHERE yuvaid = " & emp.whid)
                   Else
                       bool = db.executequery("INSERT INTO WorkHistory ([yuvaid],[Organization],[Designation],[FromDate],[ToDate],[Comments]) VALUES('" & id & "', '" & emp.whorganization & "', '" & emp.whdesignation & "', '" & emp.whfromdate & "', '" & emp.whtodate & "', '" & emp.whcomments & "')")
                   End If
               End If
               If bool Then
                   MessageBox.Show("success")
               End If
               MessageBox.Show("please enter the name")
           Catch ex As Exception
           Finally
               If cmd IsNot Nothing Then
                   cmd.Dispose()
                   cmd = Nothing
               End If
               If con IsNot Nothing Then
                   con.Dispose()
                   con = Nothing
               End If
           End Try
           Return True
       Catch ex1 As Exception
           Return False
       End Try
   End Function