Puoi dichiarare le variabili al di fuori delle Routine o Funzioni(E così facendo diventano pubbliche),però quando assegni il valore devi essere all'interno di quest'ultime

dim primonumero as integer
dim secondonumero as integer

sub Page_Load(obj as object, e as eventargs)
primonumero = 5
secondonumero = 6
response.write (primonumero)
End Sub

Prova così e vedrai che funziona.
Ciao
Legnetto