codice:
<%@ Page Language="VB" Debug="True" %>

<Script runat="server">
	Dim Var1 as String
	'------------------------------------------------------------
	Sub Page_Load(Obj as Object, E as EventArgs)
	'........
	End Sub
	'------------------------------------------------------------
	Sub Click_Bottone(Obj as Object, E as EventArgs)
	Var1 = "Visite"
	Page_Load(Obj, E) 'così ti ripete l'evento Page_Load
	DataBind() 'Superfluo in questo caso
	End Sub
	'------------------------------------------------------------
</Script>
Non è carino ma funziona...