vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Sch?tzen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2020
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Label auf PictureBox kopieren 
Autor: Rippler
Datum: 29.08.20 22:25

Dim NeuLbl As Label             'Variable für Label-Erstellung
 
Dim Z_Time As Integer           'Zähler für die Uhrzeit-Labels
Dim Z_Date As Integer           'Zähler für die Datum-Labels
 
Dim LbTimeX As Long            'Label-Uhrzeit-X-Position
Dim LbTimeY As Long            'Label-Uhrzeit-Y-Position
Dim LbTimeB As Long            'Label-Uhrzeit-Breite
Dim LbTimeH As Long            'Label-Uhrzeit-Höhe
 
Private Sub Command1_Click()
 
        'Zähler bei jedem Aufruf +1
    Z_Time = Z_Time + 1
 
        'Neues Label
    Set NeuLbl = Form1.Controls.Add("VB.Label", "Lbl" & Z_Time)
 
        With NeuLbl
                    'Hintergrundfarbe, Border-Styl, Schrift-Styl
            .BackColor = &H8000000F
            .BorderStyle = 1
            .Font = "Schriftart: Arial, 8 pt, fett"
                    'Label Beschriftung
            .Caption = Time
                    'Label in Container
            Set .Container = Picture1
                    'Label auf aktuelle Position setzen
            .Move LbTimeX, LbTimeY, LbTimeB, LbTimeH
                    'Label sichtbar schalten
            .Visible = True
 
        End With
 
        Set NeuLbl = Nothing
 
            'Label-Y-Position nachstellen.
        LbTimeY = LbTimeY + 300
End Sub
 
Private Sub Form_Load()
 
        'LabelUhrzeit XY Start-Koordinaten festlegen
    LbTimeX = 50
    LbTimeY = 100
        'Label-Uhrzeit Breite/Höhe festlegen
    LbTimeB = 1200
    LbTimeH = 285
 
End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Label auf PictureBox kopieren126Landrover27.08.20 22:35
Re: Label auf PictureBox kopieren55Souffleurlos28.08.20 13:58
Re: Label auf PictureBox kopieren46Landrover28.08.20 16:55
Re: Label auf PictureBox kopieren47Souffleurlos28.08.20 18:18
Re: Label auf PictureBox kopieren43Landrover29.08.20 00:25
Re: Label auf PictureBox kopieren45Souffleurlos29.08.20 19:20
Re: Label auf PictureBox kopieren43Landrover29.08.20 19:35
Re: Label auf PictureBox kopieren47Rippler29.08.20 22:25
Re: Label auf PictureBox kopieren39Landrover31.08.20 10:59

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2020 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel