codice:
<script runat="server">
sub sei_lento (sender As Object, e As System.EventArgs)
        Dim i = 0, k = 0
        Dim StartTime, EndTime As DateTime
        Dim Tempo As TimeSpan
        Dim MilliSecondi As Double

	StartTime = Now
'esegui una qualsiasi operazione
        For i = 1 To 1000000
		k = k + 1
        Next
'finite tutte le operazioni
        EndTime = Now
        Tempo = EndTime.Subtract(StartTime)
        MilliSecondi = Tempo.Ticks / 10000
        Response.Write("Millesecondi: " & MilliSecondi)
end sub
</script>
<form runat="server">
<asp:button runat="server" onclick="sei_lento" text="conta il tempo" />
</form>