Contenu du snippet
Faites des programmes "jolis" avec des titre qui ont des majuscules !
=)
=)
Source / Exemple :
Public Sub Majuscule_A_La_Date(TrucBibuleChouette As Label) Dim Restant_Date As Long Restant_Date = Len(Format$(Now, "dddd d mmm yyyy - hh:mm:ss")) TrucBibuleChouette.Caption = UCase$(Left(Format$(Now, "dddd d mmm yyyy - hh:mm:ss"), 1)) & Right(Format$(Now, "dddd d mmm yyyy - hh:mm:ss"), Restant_Date - 1) 'PS : mettez dans un Timer (par ex. : "Majuscule_A_La_Date Label1") pour mettre à jour toutes les secondes, et vous avez la date et l'heure qui changent avec les secondes ! =) End Sub
A voir également
- Mettez une majuscule à vos titre
- Mettez à jour includepath - Forum - C / C++ / C++.NET
- Majuscule js - Guide
- Sql like majuscule minuscule - Forum - SQL
- Premiere lettre en majuscule js - Guide
- Effectuer une recherche sans tenir compte des majuscules/minuscules ✓ - Forum - SQL
- Messages postés
-
4030
- Date d'inscription
- mardi 13 mai 2003
- Statut
- Modérateur
- Dernière intervention
- 23 décembre 2008
22Pour muadib et quelques autres qui ne comprennent pas, ce code met une majuscule à la date (Dimanche)
au lieu de (dimanche)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.