如何在 vb 中创建警报弹出消息？

Question

当我单击按钮时，如何在 vb 中创建弹出警报消息？

这是我的页面加载代码，如下所示：

Imports System.Net.Mail
Imports System.IO
Imports System.Text
Public Class locker
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Request.IsAuthenticated Then
            WelcomeBackMessage.Text = "Welcome back!"
        

             AuthenticatedMessagePanel.Visible = True
            AnonymousMessagePanel.Visible = True
        Else
            AuthenticatedMessagePanel.Visible = False
            AnonymousMessagePanel.Visible = True
        End If

        Dim ident As FormsIdentity = CType(User.Identity, FormsIdentity)
        Dim authTicket As FormsAuthenticationTicket = ident.Ticket
        WelcomeBackMessage.Text = "Welcome, " & User.Identity.Name & "!"

    End Sub


    Protected Sub send_Click(sender As Object, e As EventArgs) Handles send.Click
              <<<<----------popup message coded here------------>>>>>>>>>
    End Sub
End Class

Answer 1

如果你想弹出消息框，只需在按钮代码中添加以下代码即可：

onclientclick="javascript:alert('Congratulations!');"

或者在后面的代码中：

Response.Write("<script language=""javascript"">alert('Congratulations!');</script>")