.net - una - poner encabezado a un datagridview

En vb.net, cómo obtener los nombres de columna de una tabla de datos

Question

Así que creo una tabla de datos de una tabla que no puedo ver directamente (es decir, usando la administración del servidor sql). Quiero encontrar los nombres de las columnas que están en la tabla de datos, ¿cuál sería la forma correcta de hacerlo?

Answer 1

Mirar

For Each c as DataColumn in dt.Columns
''... = c.ColumnName
Next

o:

dt.GetDataTableSchema (...)

Answer 2

Puede recorrer la colección de columnas de la tabla de datos.

VB

Dim dt As New DataTable()
For Each column As DataColumn In dt.Columns
Console.WriteLine(column.ColumnName)
Next

DO#

DataTable dt = new DataTable();
foreach (DataColumn column in dt.Columns)
{
Console.WriteLine(column.ColumnName);
}

¡Espero que esto ayude!

Answer 3

Esta es la forma de recuperar un Nombre de columna de una DataColumn:

MyDataTable.Columns(1).ColumnName 

Para obtener el nombre de todos los DataColumns dentro de su DataTable:

Dim name(DT.Columns.Count) As String
Dim i As Integer = 0
For Each column As DataColumn In DT.Columns
name(i) = column.ColumnName
i += 1
Next

Referencias

• Tabla de datos (MSDN)
• Columna de datos (MSDN)

Answer 4

¿Tiene acceso a su base de datos? De ser así, simplemente ábrala y busque la columna y use una llamada SQL para recuperar la que necesita.

Un pequeño ejemplo en un formulario para recuperar datos de una tabla de base de datos:

El formulario contiene solo un GataGridView llamado DataGrid

Nombre de la base de datos: DB.mdf

Nombre de tabla: DBtable

Nombres de columna en la tabla: Nombre como varchar (50), Edad como int, Género como bit.

Private Sub DatabaseTest_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Public ConString As String = "Data Source=./SQLEXPRESS;AttachDbFilename=C:/Users/{username}/documents/visual studio 2010/Projects/Userapplication prototype v1.0/Userapplication prototype v1.0/Database/DB.mdf;" & "Integrated Security=True;User Instance=True"
Dim conn As New SqlClient.SqlConnection
Dim cmd As New SqlClient.SqlCommand
Dim da As New SqlClient.SqlDataAdapter
Dim dt As New DataTable
Dim sSQL As String = String.Empty
Try
conn = New SqlClient.SqlConnection(ConString)
conn.Open() ''connects to the database
cmd.Connection = conn
cmd.CommandType = CommandType.Text
sSQL = "SELECT * FROM DBtable" ''Sql to be executed
cmd.CommandText = sSQL ''makes the string a command
da.SelectCommand = cmd ''puts the command into the sqlDataAdapter
da.Fill(dt) ''populates the dataTable by performing the command above
Me.DataGrid.DataSource = dt ''Updates the grid using the populated dataTable
''the following is only if any errors happen:
If dt.Rows.Count = 0 Then
MsgBox("No record found!")
End If
Catch ex As Exception
MsgBox(ErrorToString)
Finally
conn.Close() ''closes the connection again so it can be accessed by other users or programs
End Try
End Sub

Esto buscará todas las filas y columnas de su tabla de base de datos para su revisión.
Si solo quiere recuperar los nombres simplemente cambie la llamada a sql con: "SELECT Name FROM DBtable" de esta manera, DataGridView solo mostrará los nombres de las columnas.

No soy más que un novato, pero recomendaría encarecidamente deshacerse de estos autogegadores de generación automática. Al usar SQL tienes acceso completo a tu base de datos y lo que sucede.
Además, una última cosa, si su base de datos no usa SQLClient, simplemente cámbiela a OleDB.

Ejemplo: " Dim conn As New SqlClient.SqlConnection " pasa a ser: Dim conn As New OleDb.OleDbConnection

Answer 5

'' i modify the code for Datatable
For Each c as DataColumn in dt.Columns
For j=0 To _dataTable.Columns.Count-1
xlWorksheet.Cells (i+1, j+1) = _dataTable.Columns(j).ColumnName
Next
Next

Espero que esto pueda ser de ayuda!