Manually setting top and left position of startup is not working - vb.net

Question

in the load event, I'm setting left and top position. What's happening is the form shows up in the default position, then goes to the location that I set manually. So it flashes at one position then immediately goes to the manual settings. (hope this makes sense.. let me know if I need to provide more info)
Dim rkCurrentUser As RegistryKey = Registry.CurrentUser
If rkCurrentUser IsNot Nothing Then
Dim rkTest As RegistryKey = rkCurrentUser.OpenSubKey("My Secret Life")
If rkTest IsNot Nothing Then
regKey = Registry.CurrentUser.CreateSubKey("My Secret Life")
Dim myLeft As Integer = 0
myLeft = regKey.GetValue("frmMainLeft", myLeft)
Dim myTop As Integer = 0
myTop = regKey.GetValue("frmMainTop", myTop)
Dim myMinutes As Integer = 0
myMinutes = regKey.GetValue("waitMinutes", myMinutes)
Me.Top = myTop
Me.Left = myLeft
regKey.Close()
rkTest.Close()
rkCurrentUser.Close()
End If
Else
MsgBox("Key doesn't exist")
regKey = Registry.CurrentUser.CreateSubKey("My Secret Life")
regKey.SetValue("waitMinutes", 0)
regKey.SetValue("frmMainLeft", Me.Left)
regKey.SetValue("frmMainTop", Me.Top)
regKey.Close()
End If
rkCurrentUser.Close(
Thanks for any help... plus I know the last character is removed.

Answer 1

Here's some sample code that illustrates the kind of thing I usually do:
Function Display() As DialogResult
Me.Icon = frmMain.Icon 'so we only change icons in one place
'other initialisation stuff goes here
RestoreFormSettings(Me) 'get form position (and size if resizable) from registry (your code)
Return Me.ShowDialog() 'show the form modally, then return dialog result
End Function
You should find that this gets rid of the flicker. I've also included what I do to ensure icon consistency across the app, and how to return a DialogResult which is one way for the calling code to know what you did in the form. To clarify, call this instead of calling frm.ShowDialog directly.