Conversion chiffres en mois

Bonjour à tous !
Svp existe t il en vb une fonction qui permet la conversion directement des chiffres (1 à 12) en mois?
exemple:1 en Janvier,2 en février
Merci

2 réponses

  1. je ne sais pas si ça existe mais tu peux créer facilement une fonction qui fait ça.

    Public Function conversion(num As Integer) As String
    Select Case num
    Case 1
    conversion = "janvier"
    Case 2
    conversion = "février"
    Case 3
    conversion = "mars"
    Case 4
    conversion = "avril"
    Case 5
    conversion = "mai"
    Case 6
    conversion = "juin"
    Case 7
    conversion = "juillet"
    Case 8
    conversion = "aout"
    Case 9
    conversion = "septembre"
    Case 10
    conversion = "octobre"
    Case 11
    conversion = "novembre"
    Case 12
    conversion = "décembre"
    Else
    conversion = "erreur"
    End Select
    End Function

    tu peux l'essayer avec une userform et deux zones de textes
    et un bouton de commande

    1 ère zone de texte pour les numéro
    2 ème pour l'affichage des mois
    bouton de commande :

    Private Sub CommandButton1_Click()
    Text2.Text = conversion(val(Text1.Text))
    End Sub

    la fonction marche bien, tu peux la copier dans ton projet pour pouvoir l'utiliser.

    time is not money, time is life
    0
    1. C'est typiquement le genre de fonction à programmer avec un tableau, quelque soit le langage. Avec un test sur la validité du numéro, pour pointer éventuellement sur la valeur erronée (selon le langage, d'indice [0] ou [13]).
      0