Protected Sub Btnconfermaversamento_Click(sender As Object, e As System.EventArgs) Handles Btnconfermaversamento.Click
        If data1.Text = "" Then
            lbavviso.Text = "Primo periodo della tassa non inserito"
            Dim avviso As String
            avviso = "<script type='text/javascript'>" & _
                  "$(function () {" & _
                    "$('#dialog-message').dialog({" & _
                        "modal: true," & _
                        "width:300," & _
                        "buttons: {" & _
                            "Uscita: function () {" & _
                            "$(this).dialog('close');" & _
                            "}" & _
                        "}" & _
                     "});" & _
                    "});" & _
             "</script>"
            ClientScript.RegisterClientScriptBlock(Me.GetType(), "scriptKey", avviso, False)
           exit sub
end if
.........

    End Sub