Hej !!

Kan någon hjälpa mig hur jag skall få ett
program att täcka hela skärmen.

Eller vet ni någon bra länk om detta !!

Tacksam för svar !!!

Sätt Borderstyle = none på formuläret.

sedan:

Private Sub Form_Load()
Me.Move 0, 0, Screen.Width, Screen.Height
End Sub


/johan/

Tack Johan !!!

Kanske bättre att maximera det. Typ:

Me.WindowState = vbMaximized

Ger förvisso olika resultat.

Textrutan visas som helskärm
<code>
Me.Move 0, 0, Screen.Width, Screen.Height
Text1.Width = ScaleWidth
Text1.Height = ScaleHeight
</code>


Textrutan visas bara i ena hörnet (där den ritades i designläge)
<code>
Me.WindowState = vbMaximized
Text1.Width = ScaleWidth
Text1.Height = ScaleHeight
</code>

Varför inte använda ReSize Eventet istället?
<code>
Private Sub Form_Load()
Me.WindowState = vbMaximized
End Sub

Private Sub Form_Resize()
Text1.Move ScaleLeft, _
ScaleTop, _
ScaleWidth, _
ScaleHeight
End Sub
</code>
Move metoden är effektivaer än att använda Left och topp. Left och top i sig själva gör en move.