J'essaie de mettre en majuscule la première chaîne de lettres sentdu tableau arr. La partie du code qui ne fonctionne pas est la Rightfonction, ce qui fait que le code renvoie une erreur. Quelle pourrait être la solution?
For Each sent In arr
sent = UCase(Left(sent, 1)) & Right(sent, Len(sent) - 1)
arr(i) = sent
i = i + 1
Next
Il serait plus facile d'utiliser la Midfonction pour tout construire après la capitalisation des lettres. Cette fonction ne nécessite pas que vous spécifiiez la longueur totale:
For i = LBound(arr) To UBound(arr)
sent = arr(i)
' Capitalize the first letter, then append everything else.
sent = UCase(Left(sent, 1)) & Mid(sent, 2)
arr(i) = sent
Next
En outre, vous pouvez simplement itérer en arrutilisant icomme énumérateur. Le mélange et la mise en correspondance des mises à jour d'index à l'aide d'un énumérateur distinct peut entraîner des problèmes.
Cet article est collecté sur Internet, veuillez indiquer la source lors de la réimpression.
En cas d'infraction, veuillez [email protected] Supprimer.
laisse moi dire quelques mots