FAIRE FLASHER UN TEXTE DANS UN LABEL

Public SwitchVal As Boolean

Private Sub Timer1_Timer()
    If ChangeDeTexte(SwitchVal) = True Then
        Label1.Caption = "Visual Basic c'est Cool !"
    Else
        Label1.Caption = ""
    End If
End Sub

Public Function ChangeDeTexte(Switch As Boolean) As Boolean
    Select Case Switch
        Case True
            ChangeDeTexte = True
            SwitchVal = False
        Case False
            ChangeDeTexte = False
            SwitchVal = True
    End Select
End Function

Télécharger le zip

• FAIRE UN PING (ICMP) EN VB 2005 (LE PLUS SIMPLEMENT DU MONDE)
• IMPRIMER LE CONTENU D'UN RICHTEXTBOX
• TESTEUR DE REGEX (REGULAR EXPRESSIONS)
• FORCER LE REBOOT SOUS WINDOWS NT OU WINDOWS 2000 (REDÉMARRAGE FORCÉ)
• COMPTER LES MOTS DANS UNE CHAINE DE CARACTÈRE

• DÉTECTER L'APPARIATION DES SCROLLBARS DANS UN SCROLLABLECONTROL ET TRANSFORMATION EN SLIDER
• AJOUTER N'IMPORTE QUEL RACCOURCI À VOS MENUS (HOOK CLAVIER)
• CLIQUER SUR UN LIEN JAVASCRIPT / CONTRÔLE DE INTERNET EXPLORER / REMPLIR UN FORMULAIRE AUTOMATIQUEMENT / ROBOT
• USERFORM PLEIN ÉCRAN SOUS EXCEL VBA
• LIMITER LE NOMBRE DE LIGNES DANS UN TEXTBOX

• LIVE (( TRAITEMENT DE TEXTE ))
• FLASH D'UN LABEL
• AH VALA UN BON EDITEUR DE TEXTE : NODE EDITOR (PETITE MISE A JOUR)
• FAIRE BRILLER UN TEXTE DANS UN LABEL OU TEXTBOX
• SCROLLING , DEFILEMENT DE TEXTE