Private Sub Form_Resize()
On Error GoTo Schluss
Text2.Width = Form1.Width - "2640"
Label2.Width = Form1.Width - "2640"
Text2.Height = Form1.Height - "1020"
 
    If Form1.Height < 4890 Then
    Form1.Height = 4890
    End If
 
        If Form1.Width < 6375 Then
        Form1.Width = 6375
        End If
Schluss:

wintoolz.KeyLocker - Programm zum sicheren Verwalten von Passw?rten
wintoolz.Filmdatenbank - Verwaltungssoftware f?r Filme
wintoolz.CodeGallery - Programm zum speichern von Codeschnipseln