How to add new column into datagrid in VB6

Question

0.00/5 (No votes)

See more:

I have a datagrid with 4 column as below:
A B C D

I want to when application is loaded, my datagrid will added a new column F into front column B asw below:

A F B C D

can you help me?
thanks.

Posted 19-Dec-10 16:42pm

ngthtra

Updated 20-Dec-10 14:39pm

v5

Add a Solution

3 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

MortezaShoja · Answer 1 · 2010-12-20T22:25:00

VB

You can use this code for Show All Datas in your database :rose:  :) 



Private SqlCon As New System.Data.SqlClient.SqlConnection("server=.;user id=sa;pwd=sqlmaster;data source=.;database=ParsContract")

Private tbl As New DataTable
Private dvw As DataView
Private b As Boolean
Private cmd As New SqlClient.SqlCommand("SELECT * FROM Personalinfo", sqlcon)


sqlcon.Open()
Dim sdr As SqlClient.SqlDataReader = cmd.ExecuteReader
Dim fc As Integer
While (sdr.Read)
    'populating columns
    If Not b Then
        For fc = 0 To sdr.FieldCount - 1
            tbl.Columns.Add(sdr.GetName(fc))
        Next
        b = True
    End If
    'populating rows
    Dim row As DataRow = tbl.NewRow
    For fc = 0 To sdr.FieldCount - 1
        row(fc) = sdr(fc)
    Next
    tbl.Rows.Add(row)
End While
dvw = New DataView(tbl)
Me.dgrPersonalInfo.DataSource = dvw
sqlcon.Close()

Wild-Programmer · Answer 2 · 2010-12-19T17:39:00

Solution 1

VB

Set col = DataGrid1.Columns.Add(0)
col.FieldName = "abc"
col.Caption = "xyz"

Posted 19-Dec-10 17:39pm

Wild-Programmer

Comments

ngthtra 20-Dec-10 3:07am

I don't understand parameter "col".what is it and how declare?

Wild-Programmer 20-Dec-10 3:10am

col is variable. "dim col as Column"

ngthtra 20-Dec-10 4:00am

but col don't have property FieldName,I found but don't see it.
and Set col = DataGrid1.Columns.Add(0) have error "mismatch"

rajchinna123 19-Dec-12 4:30am

Compiler Error Object Required??
Now What I Do

Sarphus · Answer 3 · 2013-09-24T04:01:00

If you get type mismatch it probably means you have more than one object in your project that is called "Column". I am trying to get around that issue right now in a project that has a custom datagrid object as well as a DAO data grid and ADO data grid. When I declare something as type "Column" intellisense finds 4 objects called column.

I got passed the type mismatch error by decalring my column object as a variant so it gets typed when I set the column to the datagrid's column add. I'm not sure why I don't see the column when I run the code though. I'm still working through issues similar to what you are.

How to add new column into datagrid in VB6

3 solutions

Solution 2

Solution 1

Solution 3

Add your solution here

Preview 0