Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Image erzeugen
Autor: Manfred44
Datum: 28.01.22 15:32
So etwa sollte es sein Option Explicit Dim n% ' n initialisieren Private Sub Form_Load() n = 1 End Sub Private Sub imgNeu_Click(Index As Integer) Dim h If n >= 10 Then Exit Sub Load imgNeu(n) imgNeu(n).Top = imgNeu(n - 1).Top + imgNeu(0).Height + 120 imgNeu(n).Visible = True ' Formular vergrößeren h = imgNeu(n).Top + imgNeu(n).Height + 120 Height = h + Height - ScaleHeight n = n + 1 End Sub

Image erzeugen	519	Manfred44	01.09.21 15:59
Re: Image erzeugen	240	-Franky-	02.09.21 07:28
Re: Image erzeugen	205	Manfred44	28.01.22 15:32

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen