我定义一个message类代码如下 Public Class MessageBox Dim p As System.Web.UI.Page = New System.Web.UI.Page Public Sub voidShow(ByVal message As String) Dim script As String = "<script> alert(’" + message + "’)</script>" p.Response.Write(script) End Sub

End Class 引用时代码为 Dim m As MessageBox = New MessageBox m.voidShow("ss") 为什么提示错误: 响应在此上下文中不可用。