Microsoft KB Archive/170723

= OFF97: Removing Preceding Space for Values Converted to Strings =

PSS ID Number: 170723

Article Last Modified on 11/24/2003

-

The information in this article applies to:

 Microsoft Visual Basic for Applications, when used with:  Microsoft Access for Windows 95 7.0

 Microsoft Access 97

 Microsoft Word 97 for Windows

 Microsoft Excel 97 for Windows</li></ul>

 Microsoft PowerPoint 97 for Windows</li></ul> </li></ul>

-

<div class="notice_section">

This article was previously published under Q170723

<div class="notice_section">

For a Microsoft Office XP version of this article, see 290359.

For a Microsoft Office 98 version of this article, see 186107.

<div class="summary_section">

SUMMARY
The Microsoft Visual Basic for Applications Str function returns the string representation of a numeric value represented as (n). Positive numbers and zeros are converted to a string with a leading space character.

This article discusses methods that can be used to remove the preceding space for values converted to strings.

<div class="moreinformation_section">

MORE INFORMATION
Microsoft provides examples of Visual Basic for Applications procedures for illustration only, without warranty either expressed or implied, including, but not limited to the implied warranties of merchantability and/or fitness for a particular purpose. The Visual Basic procedures in this article are provided 'as is' and Microsoft does not guarantee that they can be used in all situations. While Microsoft support professionals can help explain the functionality of a particular macro, they will not modify these examples to provide added functionality, nor will they help you construct macros to meet your specific needs. If you have limited programming experience, you may want to consult one of the Microsoft Solution Providers. Solution Providers offer a wide range of fee-based services, including creating custom macros. For more information about Microsoft Solution Providers, call Microsoft Customer Information Service at (800) 426-9400.

The following macro code example converts a numeric value to a string value. The variable "lastName" is then joined with "empcode" and stored in the variable "license": lastName = "Peterson" empcode = Str(1234) license = lastName & empcode 'Result is: Peterson 1234 The following macro code example converts a numeric value to a string value, and then removes the leading space that was automatically added by Str using the LTrim$ function. The variable "lastName" is then joined with "empcode" and stored in the variable "license": lastName = "Peterson" empcode = Str(1234) empcode = LTrim$(empcode) license = lastName & empcode 'Result is: Peterson1234 In Microsoft Visual Basic for Applications, you can convert numeric values to string values with the Visual Basic for Applications CStr function. The function will drop the leading space automatically without the need for using the Trim$ function, as in the following example: lastName = "Peterson" empcode = CStr(1234) license = lastName & empcode 'Result is: Peterson1234 The Str function is used to convert a numeric value to a string. This can be useful when using the MsgBox statement to concatenate text and a numeric variable. Note that the leading space that is generated by the Str function makes it unnecessary to add an extra space between the two values in the MsgBox statement. For example: sValue = Str(457) MsgBox "Total sales equal" & sValue ' Result is: Total sales equal 457 The correct syntax for concatenating text and the contents of a numeric variable is as follows: MsgBox "Total sales equal " & 457 ' Result is: Total sales equal 457

-or-

MsgBox "Total sales equal" & Str(457) ' Result is: Total sales equal 457

-or-

MsgBox "Total sales equal " & CStr(457) ' Result is: Total sales equal 457

Additional query words: offcon vba vbe vb

Keywords: kbcode kbinfo kbprogramming KB170723

Technology: kbAccess700 kbAccess95Search kbAccess97 kbAccess97Search kbAccessSearch kbExcel97Search kbExcelSearch kbExcelWinSearch kbPowerPt97 kbPowerPt97Search kbPowerPtSearch kbVBASearch kbWord97 kbWord97Search kbWordSearch kbZNotKeyword2 kbZNotKeyword3 kbZNotKeyword6

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© 2004 Microsoft Corporation. All rights reserved.