Space Function

āĻāĻ•āϟāĻŋ āύāĻŋāĻ°ā§āĻĻāĻŋāĻˇā§āϟ āĻĒāϰāĻŋāĻŽāĻžāĻŖ āĻ¸ā§āĻĨāĻžāύ⧇āϰ āϏāĻŽāĻ¨ā§āĻŦā§Ÿā§‡ āĻ—āĻ āĻŋāϤ āĻ¸ā§āĻŸā§āϰāĻŋāĻ‚ āĻĒā§āϰāĻĻāĻžāύ āĻ•āϰ⧇āĨ¤

āϏāĻŋāύāĻŸā§āϝāĻžāĻ•ā§āϏ:

Space (n As Long)

āĻĒā§āϰāĻĻāĻžāύ āĻŽāĻžāύ:

āĻ¸ā§āĻŸā§āϰāĻŋāĻ‚

āĻĒā§āϝāĻžāϰāĻžāĻŽāĻŋāϟāĻžāϰ:

n: āϏāĻ‚āĻ–ā§āϝāĻžāϏ⧂āϚāĻ• āĻāĻ•ā§āϏāĻĒā§āϰ⧇āĻļāύ āϝāĻž āĻ¸ā§āĻŸā§āϰāĻŋāĻ‚ āĻ āĻĢāĻžāρāĻ•āĻž āĻ¸ā§āĻĨāĻžāύ⧇āϰ āϏāĻ‚āĻ–ā§āϝāĻž āύāĻŋāĻ°ā§āĻĻ⧇āĻļ āĻ•āϰ⧇ āĻĨāĻžāϕ⧇āĨ¤ n āĻāϰ āϏāĻ°ā§āĻŦā§‹āĻšā§āϚ āĻ…āύ⧁āĻŽā§‹āĻĻāĻŋāϤ āĻŽāĻžāύ āĻšāϞ⧋ 65535āĨ¤

Error codes:

5 Invalid procedure call

āωāĻĻāĻžāĻšāϰāĻŖ:

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