+ Rispondi al Thread
Visualizzazione dei risultati da 1 a 2 su 2

Discussione: colorare una label

  1. #1
    sal21 non è in linea Scolaretto
    Post
    464

    colorare una label

    Sto usando quest afunzione:
    codice:
    Sub LOOP_LABEL(MMYYYY)
    
        Dim DTM As Date, N As Long
        Dim CTL As Control
    
        For Each CTL In Me.Controls
            If TypeName(CTL) = "Label" And CTL.Name Like "G*" Then
                N = CTL.Caption
                DTM = DateSerial(Right(MMYYYY, 4), Left(MMYYYY, 2), N)
                Call IsWeekEnd(DTM)
                If D = True Then
                CTL.ForeColor = vbRed<errore
                End If
            End If
        Next CTL
    
    End Sub
    se si verifica la condizione D=true vorrei colorare in font della label in rosso... ma ho errore

  2. #2
    L'avatar di AntonioG
    AntonioG non è in linea Moderatore Globale Ultimo blog: Commodore 64 e Codemotion
    Luogo
    Roma
    Post
    16,400
    Blogs
    5
    Ma cosa è D?

    E di quale errore parli?
    Avvisi generali e importanti, a pena CHIUSURA thread e/o BAN
    Il crossposting è vietato.
    Le richieste di "pappa pronta" sono vietate.
    Utilizzate i tag CODE per il codice.
    Leggere il Regolamento per chiarimenti PRIMA di creare nuovi thread.
    Utilizzare sempre i PM per comunicare con i moderatori.
    Non mi contattate in PM per problemi di software, usate il forum

+ Rispondi al Thread

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi