There are two problems. First of all, a single dot doesn't show up well in windowed mode for some reason. Secondly, you are drawing one dot in a random place on every loop cycle.
Here is a similar program that draws 50 random dots that stay in one place:
Public Shared Sub GameLoop()
Dim dotpoints(0 To 49) As System.Drawing.Point
'Set to FullScreen so Dots are easier to see
DarkGDK.Display.FullScreen = True
'Get the random placement for each Dot
For counter = 0 To 49
dotpoints(counter).X = Core.Random(640)
dotpoints(counter).Y = Core.Random(480)
Next
'
' Loop continuously until StopGDKLoop is called, or the ESC key is pressed.
'
While DarkGDK.Engine.LoopGDK()
'Actually place our Dots
For counter = 0 To 49
DarkGDK.Basic2D.Drawing.Dot(dotpoints(counter).X, dotpoints(counter).Y, Color.White)
Next
' Tell DarkGDK.NET to render our default camera display
DarkGDK.Core.Sync()
End While
End Sub
Design documents?!? What design documents??? I thought we were just going to wing it!!!