message box created in vb.net

Public Sub ASP_MsgBox(ByVal Message As String)
System.Web.HttpContext.Current.Response.Write("")
End Sub