Hi Bugz.
Here's some code so we can test the relative speeds of VB6 and VB.NET. Can you run it on VB6 and VB.NET and let me know the results (as well as CPU speeds of each machine)?

Just for reference, it ran in 13.5 seconds on my computer: VB6, AMD XP1600+.

Feel free to change any of the tests if you want.

Make sure to change the Long/Double datatypes in VB.NET if needed - I seem to remember Microsoft changed Long to Integer or something. Just as long as the test is fair...

VB Code:
  1. Declare Function GetTickCount Lib "kernel32.dll" () As Long
  2. Sub Main()
  3. 'Program to test relative speed of VB6 vs VB.NET
  4. 'Tests mathematical operations
  5. 'Coded 10.8.02
  6.  
  7. Dim x As Long
  8. Dim z As Double
  9. Dim start As Long
  10.  
  11. MsgBox "Press OK to begin mathematical operations. Tests should take <1 minute."
  12.  
  13. start = GetTickCount
  14.  
  15. 'Basic operations, integer & floating point
  16. For x = 0 To 10000000
  17.     z = 17 + 56 / (9 * 263) - 78 / (2.2 * 9)
  18. Next
  19.  
  20. 'Rnd
  21. For x = 0 To 1000000
  22.     z = Rnd
  23. Next
  24.  
  25. 'Trig functions
  26. For x = 0 To 10000000
  27.     z = Sin(23.5687)
  28.     z = Cos(23.5687)
  29.     z = Tan(23.5687)
  30.     z = Atn(23.5687)
  31. Next
  32.  
  33. 'Sqr
  34. For x = 0 To 10000000
  35.     z = Sqr(2315.126)
  36. Next
  37.  
  38. 'Exp & log
  39. For x = 0 To 10000000
  40.     z = Exp(22.561)
  41.     z = Log(22.561)
  42. Next x
  43.  
  44. MsgBox (GetTickCount() - start) / 1000 & " seconds elapsed."
  45. End Sub