VBA
Conversion d'autres types en chaînes
Recherche…
Remarques
VBA convertira implicitement certains types en chaîne si nécessaire et sans travail supplémentaire de la part du programmeur, mais VBA fournit également un certain nombre de fonctions de conversion de chaînes explicites, et vous pouvez également écrire vos propres fonctions.
Les trois fonctions les plus fréquemment utilisées sont CStr , Format et StrConv .
Utilisez CStr pour convertir un type numérique en chaîne
Const zipCode As Long = 10012
Dim zipCodeText As String
'Convert the zipCode number to a string of digit characters
zipCodeText = CStr(zipCode)
'zipCodeText = "10012"
Utilisez Format pour convertir et formater un type numérique en chaîne
Const zipCode As long = 10012
Dim zeroPaddedNumber As String
zeroPaddedZipCode = Format(zipCode, "00000000")
'zeroPaddedNumber = "00010012"
Utiliser StrConv pour convertir un tableau d'octets de caractères à un octet en chaîne
'Declare an array of bytes, assign single-byte character codes, and convert to a string
Dim singleByteChars(4) As Byte
singleByteChars(0) = 72
singleByteChars(1) = 101
singleByteChars(2) = 108
singleByteChars(3) = 108
singleByteChars(4) = 111
Dim stringFromSingleByteChars As String
stringFromSingleByteChars = StrConv(singleByteChars, vbUnicode)
'stringFromSingleByteChars = "Hello"
Convertit implicitement un tableau d'octets de caractères multi-octets en chaîne
'Declare an array of bytes, assign multi-byte character codes, and convert to a string
Dim multiByteChars(9) As Byte
multiByteChars(0) = 87
multiByteChars(1) = 0
multiByteChars(2) = 111
multiByteChars(3) = 0
multiByteChars(4) = 114
multiByteChars(5) = 0
multiByteChars(6) = 108
multiByteChars(7) = 0
multiByteChars(8) = 100
multiByteChars(9) = 0
Dim stringFromMultiByteChars As String
stringFromMultiByteChars = multiByteChars
'stringFromMultiByteChars = "World"
Modified text is an extract of the original Stack Overflow Documentation
Sous licence CC BY-SA 3.0
Non affilié à Stack Overflow
