[RESOLVED] Center screen - stupid problem

[Tamgovb]

Hi All.

I have the monitor of LCD. So when I will use this following code then my form is not on a screen centrally but in a bottom of the right corner of my screen.

Option Explicit
 
  Private Sub CenterForm(pobjForm As Form)
 
           With pobjForm
 
               .Top = (Screen.Height) / 2
 
               .Left = (Screen.Width) / 2
 
          End With
 
End Sub
 
Private Sub Form_Load()
CenterForm Me
 
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'  Me.Top = (Screen.Height) / 2 ' here the same
'  Me.Left = (Screen.Width) / 2
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
End Sub

How to make it correctly? Thanks in advance

[gavio]

Set .StartUpPosition to 2 - CenterScreen at design time.

Or:

'...
.Top = (Screen.Height - pobjForm.Height) / 2
.Left = (Screen.Width - pobjForm.Width) / 2
'...

[randem]

try:

obj.Top = (Screen.Height / 2) - (obj.Height / 2)
    obj.Left = (Screen.Width / 2) - (obj.Width / 2)

[RhinoBull]

... and finally:

Form1.Move (Screen.Width - Form1.Width) / 2, (Screen.Height - Form1.Height) / 2

[RhinoBull]

@gavio: you need to use form's full size and NOT scale size.

[Pradeep1210]

... and finally:

Form1.Move (Screen.Width - Form1.Width) / 2, (Screen.Height - Form1.Height) / 2

Whenever precision is not a concern (as in this case), we should use \ instead of /. This makes our programs a bit faster.

Form1.Move (Screen.Width - Form1.Width) \ 2, (Screen.Height - Form1.Height) \ 2

Pradeep

[RhinoBull]

Whenever precision is not a concern (as in this case), we should use \ instead of /.

That's irrelevant, Pradeep - position/size are Integers anyway...

[gavio]

@gavio: you need to use form's full size and NOT scale size.

Edited my post

[Pradeep1210]

That's irrelevant, Pradeep - position/size are Integers anyway...

That's why we should use \ instead of using / as the result would be same, but fast.

I read somewhere that \ is the fastest and / the slowest in terms of arithmetic operators.


Pradeep

[RhinoBull]

I read somewhere that \ is the fastest and / the slowest in terms of arithmetic operators.

If it is then it could be by 1/1000th of a nanosecond... so please...

[Pradeep1210]

If it is then it could be by 1/1000th of a nanosecond... so please...

Actually I never meant how much we would gain or loose.

I just meant that we should improve our programming habits. Most programmers tend to use the / everytime, whether they are dealing with precision digits or not.

As a rule we should always consider \ instead of / unless precision is a big concern to us.

Remember a bucket fills drop by drop


Pradeep

[Tamgovb]

thanks guys, it fine works for me

[RhinoBull]

...I just meant that we should improve our programming habits...

So how is it an improvement?

[Pradeep1210]

Ohh.. sorry. They tend to use / everytime instead of \.


Pradeep


Edited and corrected the post.

[gavio]

http://www.persistentrealities.com/v...em=7&t=vbfibre...