Environment.TickCount : Environment « System « VB.Net by API






  1. VB.Net by API
  2. System
  3. Environment

Environment.TickCount

  

Option Strict On

Public Module TimerFunction
   Public Sub Main()
      Dim starttime, endtime As Integer
      starttime = Environment.TickCount
      For ctr As Integer = 0 to 10000000

      Next
      endtime = Environment.TickCount
      Console.WriteLine("Elapsed time is {0} milliseconds", endtime - starttime)
   End Sub
End Module








Related examples in the same category

1.Environment.CommandLine
2.Environment.CurrentDirectory
3.Environment.Exit
4.Environment.ExitCode
5.Environment.GetCommandLineArgs
6.Environment.GetLogicalDrives
7.Environment.HasShutdownStarted
8.Environment.MachineName
9.Environment.NewLine
10.Environment.OSVersion
11.Environment.ProcessorCount
12.Environment.SpecialFolder.CommonProgramFiles
13.Environment.SpecialFolder.Favorites
14.Environment.StackTrace
15.Environment.SystemDirectory
16.Environment.UserDomainName
17.Environment.UserInteractive
18.Environment.UserName
19.Environment.Version
20.Environment.WorkingSet