Microsoft KB Archive/80904

= PRB: Grid Control's Cell Blank When Using Str$ =

Article ID: 80904

Article Last Modified on 12/12/2003

-

APPLIES TO


 * Microsoft Visual Basic 2.0 Standard Edition
 * Microsoft Visual Basic 3.0 Professional Edition
 * Microsoft Visual Basic 2.0 Professional Edition
 * Microsoft Visual Basic 3.0 Professional Edition
 * Microsoft Visual Basic 1.0 Standard Edition

-



This article was previously published under Q80904



SYMPTOMS
With the Microsoft Professional Toolkit for Visual Basic Grid control, when you use the Str$ function to store numeric values in a grid cell, the cell appears blank if it is not wide enough to completely display the value.



CAUSE
This behavior occurs because of word wrapping. The Str$ function returns a string that begins with a space character. When this string does not fit in a grid cell, it wraps to the next line, breaking on the leading space so that no text remains on the first line of the cell.



WORKAROUND
To avoid the problem, use Format$ instead of Str$, or Ltrim$ with Str$. To work around the problem, change the assignment to Grid1.Text to one of the following: Grid1.Text = Format$(123456)

-or-

Grid1.Text = Ltrim$(Str$(123456)) This will eliminate the leading space, and the information in the cell will be displayed up to the width of the cell. You can also increase the width of the cell to allow all characters to be visible.



Steps to Reproduce Problem
 Start Visual Basic or, if Visual Basic is already running, choose New Project from the File menu (ALT, F, N). Form1 is created by default. From the File menu, choose Add File, and select GRID.VBX to add the Grid tool. The Grid tool appears in the Toolbox. Place a grid named Grid1 on Form1. Set the grid properties Cols and Rows each to 4. Size the grid so that you can see all the cells.  Enter the following code. To enter the code, double-click Grid1, select Click in the Procedure box, and enter the code into the code template. Sub Grid1_Click Grid1.Text = Str$(123456) Debug.Print Grid1.Text End Sub </li> Press F5 to run the program.</li> Each time you click a cell in Grid1, this code prints &quot;123456&quot; in the Immediate window, but the cell remains blank.</li></ol>

Additional query words: 2.00 3.00

Keywords: kbprb KB80904

-

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

© Microsoft Corporation. All rights reserved.