Response 在*.vb里不起作用。还要加命名空间
-------------------------------------
Imports System.Web.HttpContextCurrent.Response.Redirect("sign_wc.aspx")

解决方案 »

  1.   

    全部代码如下:
    ==================================================================================
    Public Class WebForm1
        Inherits System.Web.UI.Page
        Protected WithEvents RadioButton1 As System.Web.UI.WebControls.RadioButton
        Protected WithEvents RadioButton2 As System.Web.UI.WebControls.RadioButton
        Protected WithEvents btn As System.Web.UI.WebControls.Button
        Protected WithEvents RadioButton3 As System.Web.UI.WebControls.RadioButton#Region " Web 窗体设计器生成的代码 "    '该调用是 Web 窗体设计器所必需的。
        <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()    End Sub    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
            'CODEGEN: 此方法调用是 Web 窗体设计器所必需的
            '不要使用代码编辑器修改它。
            InitializeComponent()
        End Sub#End Region    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            '在此处放置初始化页的用户代码    End Sub    Private Sub btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn.Click        If RadioButton1.Checked Then
                Current.Response.Redirect("sign_index.asp")
            ElseIf RadioButton2.Checked Then
                Current.Response.Redirect("sign_wc.aspx")
            ElseIf RadioButton3.Checked Then
                Current.Response.Redirect("sign_sc.aspx")
            End If    End SubEnd Class