VB- Changes in Resolution

[natncm70]

Hello,
Previously, my system is in 1024 X 768 pixels resolution. Now I want the systen resolution is in 800 X 600 pixels.
If I changed above resolution(800 X 600), some of the screens part is hided.So what should I do for that.
Please help me.

Regards
R.N.Chandramohan

 

[dsi]

You will need to resize your form to accomodate the new resolution. That's the only way I know how to do it, but someone else may have another solution.

 

[JustinEzequiel]

just found out that user forms in Word 97 (what I have) have a ZOOM property.


Dim nZoom As Single
Dim sInput As String

sInput = InputBox$("Zoom", , "100&quot
If (StrPtr(sInput) = 0) Then Exit Sub

nZoom = CSng(sInput)

UserForm1.Zoom = nZoom
UserForm1.Height = UserForm1.Height * (nZoom / 100)
UserForm1.Width = UserForm1.Width * (nZoom / 100)
UserForm1.Show