Populating the DataGrid 
Author Message
 Populating the DataGrid


Here is my code from the project I am doing now.  You need to make some changes
for the columns.  

Dim rs As Recordset
Dim GridRow as Integer
Dim Count As Integer

'Make sure the query returned at least one record
If rs.RecordCount > 0 Then

    'Get a count of records in the recordset and display it on the form.
    Count = rs.RecordCount
    lblCount.Caption = Count

    'Initialize the grid
    With grdValues
         .Row = Count + 1
         .Row = 0:
         .Col = 0: .Text = "Order ID"
         .Col = 1: .Text = "Order Date"
         .Col = 2: .Text = "Required Date"
         .Col = 3: .Text = "Shipped Date"
    End With

    'Populate the grid
    For GridRow = 1 To Count
        With grdValues
            .Row = GridRow
            .Col = 0: .Text = rs![OrderID]
            .Col = 1: .Text = rs![OrderDate]
            .Col = 2: .Text = rs![RequiredDate]
            .Col = 3: .Text = rs![ShippedDate]
        End With
    Next GridRow
End If    

Tue, 29 May 2001 03:00:00 GMT  
 [ 2 post ] 

 Relevant Pages 

1. Populate a datagrid with notes.

2. Can ADO be used to populate a Datagrid?

3. How to populate a Datagrid

4. Using a List class to populate a datagrid

5. how to populate the datagrid changes to dataset?

6. Need help populating a datagrid from a recordset in VB6

7. Help me populating a DataGrid with a recordset

8. populating a datagrid control VB6

9. Populating VB6 datagrid

10. Populate an Datagrid with text from an .txt file

11. Populating a datagrid from a recordset

12. How to populate a Datagrid from SQL with a Server Side cursor


Powered by phpBB® Forum Software