www.pconline.com.cn:请问：vs.net 2003 有关变量传递的问题（有代码），谢谢大家！

Private Sub Rad_Btn_Lst_windows_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Rad_Btn_Lst_windows.SelectedIndexChanged
'清除不用的RadioBottonList列表
Me.BtnSave.Enabled = True
Me.Rad_Btn_List_Kithe.Visible = False
Me.Rad_Btn_List_Subject.Visible = False
Me.Rad_Btn_Lst_flip.Visible = False

Me.test1.Text = Me.Rad_Btn_Lst_windows.SelectedItem.Value
If Me.Rad_Btn_Lst_windows.SelectedItem.Value = "1" Then
Me.Rad_Btn_Lst_flip.Visible = True
End If
If Me.Rad_Btn_Lst_windows.SelectedItem.Value = "2" Then
Me.Rad_Btn_List_Kithe.Visible = True
End If
If Me.Rad_Btn_Lst_windows.SelectedItem.Value = "3" Then
Me.Rad_Btn_List_Subject.Visible = True
End If

End Sub

Private Sub Rad_Btn_List_Kithe_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Rad_Btn_List_Kithe.SelectedIndexChanged
' Dim tag As String '此标记用来解释3个二级RadioBottonList的值该做什么样的处理
tag = Me.Rad_Btn_List_Kithe.SelectedItem.Value.ToString
'Response.Write(tag)

End Sub

Private Sub Rad_Btn_List_Subject_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Rad_Btn_List_Subject.SelectedIndexChanged
' Dim tag As String '此标记用来解释3个二级RadioBottonList的值该做什么样的处理
tag = Me.Rad_Btn_List_Subject.SelectedItem.Value.ToString
'Response.Write(tag)
End Sub

Private Sub Rad_Btn_Lst_flip_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Rad_Btn_Lst_flip.SelectedIndexChanged
'Dim tag As String '此标记用来解释3个二级RadioBottonList的值该做什么样的处理
tag = Me.Rad_Btn_Lst_flip.SelectedItem.Value.ToString
'Response.Write(tag)
End Sub

Private Sub BtnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSave.Click
if tag<>"" then '！！！！！怎样取到tag变量的值？

end if
End Sub

'问题是要将上面三个Rad_btn_lst事件中的任一个tag值传送到BtnSave过程当中来