以往在网上看到计算页面执行时间的程序，大部分都是使用C＃来实现，方法类型基本相似。而且其中大部分都是记录开始和结束时间，最后定义一个TimeSpan来计算时间差，但是在写代码的时候都是EndTime - StartTime，我没有试验这样是否可行，但是在VB.Net里面不行，因为时间变量不能使用“－”来进行计算。所以我使用了另外的函数，如下：
在Global文件中添加如下代码：
Public StartTime As System.DateTime
Public EndTime As System.DateTime
Public ts As System.TimeSpan
Sub Application_BeginRequest(ByVal sender As Object, ByVal e As EventArgs)
' 在每个请求开始时激发
StartTime = System.DateTime.Now
End Sub
Sub Application_EndRequest(ByVal sender As Object, ByVal e As EventArgs)
' 在每个请求结束时激发
EndTime = System.DateTime.Now
ts = EndTime.Subtract(StartTime)
Response.Write("<div align='center'>Page Request Time：" & ts.TotalMilliseconds.ToString() & "Millisecond</div>")
End Sub