فرم با فاصله 200 پیکسلی از هر طرف

[y.saied]

سلام دوستان ، خسته نباشین
میخوام فرم با فاصله 200 پیکسلی از هر طرف در وسط مونیتور نمایش داده بشه

[sina_saravi1]

سلام
کافیه این کد رو به فرمت اضافه کنی


Private Sub Form_Load()
Me.Width = Screen.Width - 400
Me.Height = Screen.Height - 400
Me.Left = 200
Me.Top = 200
End Sub

[parselearn]

دوستمون گفتن 200 پيكسلي



Private Sub Form_Load()
Me.Width = Screen.Width - (400*15)
Me.Height = Screen.Height - (400*15)
Me.Left = 200*15
Me.Top = 200*15
End Sub

[sina_saravi1]

دوستمون گفتن 200 پيكسلي



Private Sub Form_Load()
Me.Width = Screen.Width - (400*15)
Me.Height = Screen.Height - (400*15)
Me.Left = 200*15
Me.Top = 200*15
End Sub


ممنون از راهنماییتون
ولی ممکنه همیشه عدد 15 نباشه(بستگی به مانیتور و... داره)
به جای 15 باید بنویسید


Screen.TwipsPerPixelX
Screen.TwipsPerPixelY