Upplösning

3 svar · 354 visningar · startad av gundeman 26 aug. 2001

gundemanMedlem sedan jan. 200167 inlägg

Trådstart26 aug. 2001 15:59#1

Hur får jag mitt program att känna av villken upplösning användaren använde. Tex om upplöningen är 640*480 skall form3 laddas och om upplösningen är 1024*768 skall form 4 laddas

fredrikMedlem sedan dec. 19991 072 inlägg

28 aug. 2001 11:00#2

Du får fram skärmupplösningen mha "screen".
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#666600">
Dim lngWidth As Long
Dim lngHeight As Long
lngWidth = Screen.Width / Screen.TwipsPerPixelX
lngHeight = Screen.Height / Screen.TwipsPerPixelY
MsgBox "Upplösningen är: " & lngWidth & "*" & lngHeight

gundemanMedlem sedan jan. 200167 inlägg

28 aug. 2001 18:11#3

Tack!
Blir det typ såhär sen:
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#666600">
If lngWidth=640 And lngHeight=480 then
form3.show
else
form4.show

fredrikMedlem sedan dec. 19991 072 inlägg

29 aug. 2001 07:02#4

Japp, så blir det.