IBM Lotus Symphony
|
Renvoie le nombre spécifié de caractères se situant le plus à gauche dans une expression de type chaîne de caractères.
Left (Text As String, n As Long)
Chaîne de caractères
Text : expression de type chaîne de caractères dans laquelle les caractères se situant le plus à gauche sont à renvoyer.
n : expression numérique spécifiant le nombre de caractères à renvoyer. Si n = 0, une chaîne de caractères de longueur zéro est renvoyée. La valeur maximale autorisée est 65 535.
L'exemple suivant convertit une date de format AAAA.MM.JJ en une date de format MM/JJ/AAAA.
Sub ExampleUSDate
Dim sInput As String
Dim sUS_date As String
sInput = InputBox("Insérez une date au format international 'AAAA-MM-JJ'")
sUS_date = Mid(sInput, 6, 2)
sUS_date = sUS_date & "/"
sUS_date = sUS_date & Right(sInput, 2)
sUS_date = sUS_date & "/"
sUS_date = sUS_date & Left(sInput, 4)
MsgBox sUS_date
End Sub