问asp.net为复选框存储cookie/会话

EN

  <asp:CheckBox ID="cb1" runat="server"  />

  Protected Sub cb1_CheckedChanged(sender As Object, e As EventArgs) Handles cb1.CheckedChanged
    Dim SE_cb1 As Boolean = Nothing
    SE_cb1 = If(cb1.Checked = True, 1, 0)
    Session("SE_cb1") = SE_cb1

End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
      If Not Session("SE_cb1") Is Nothing Then cb1.Checked = If(Session("SE_cb1") = 1, True, False)

    end sub