Space Function
αααα‘ααβααααβα’ααααβαα½α αααβααΆαβα ααα½αβααβααααΆβαααβααΆαβαααααΆααββΒ α
ααΆαααβααααααα α
Space (n As Long)
αααααβαααα‘αα α
ααααβα’αααα
αααΆαααΆαααααα α
nΒ α ααααααβαααβαααβαααααβα ααα½αβααααααΆβαααα»αβααααα’ααααΒ α α’αα»ααααΆαβα²ααβααΆαβααααα n α αααΎαβαααα»αβααααΉα 65535Β α
α§ααΆα ααα α
Sub ExampleSpace
Dim sText As String,sOut As String
Dim iLen As Integer
iLen = 10
sText = "Las Vegas"
sOut = sText & Space(iLen) & sText & Chr(13) &_
sText & Space(iLen*2) & sText & Chr(13) &_
sText & Space(iLen*4) & sText & Chr(13)
msgBox sOut,0,"Info:"
End Sub