Como funcionan las clases?

18/08/2006 - 01:05 por mikicazares | Informe spam
hola
Tengo problemas con una clase que hice que realiza un DataGrid general,
y con ello poder instanciarlo de diferentes partes del projecto.
esta es la clase:

Public Class DtaGrid
Inherits DataGrid
Dim Grid As New DataGrid
Public Function CreatDataGrid() As DataGrid
Grid.Font = New System.Drawing.Font _
("Tahoma", 8.0F, System.Drawing.FontStyle.Regular, _
System.Drawing.GraphicsUnit.Point, CType(0, System.Byte))
Grid.BorderStyle = BorderStyle.Fixed3D
Grid.CaptionFont = New System.Drawing.Font _
("Tahoma", 8.0F, System.Drawing.FontStyle.Regular, _
System.Drawing.GraphicsUnit.Point, CType(0, System.Byte))
Grid.CaptionVisible = True
Grid.ColumnHeadersVisible = True
Grid.Dock = DockStyle.None
Grid.Enabled = True
Grid.RightToLeft = RightToLeft.No
Grid.RowHeadersVisible = True
Grid.RowHeaderWidth = 15
Grid.TabStop = False
Grid.Visible = True
Grid.ReadOnly = False
Return Grid

End Function
end class

aqui todo bien
desde un Form hago lo siguiente Dim DgBancos As New DtaGrid y luego
en el load de la forma
Me.Controls.Add(DgBancos.CreatDataGrid)
sql = "Select BanCveNum,BanNombre from bancos"
Mycommand.CommandText = sql
Mycommand.Connection = Conexion.ConectarNovaCheq()
MyDataAdapter.SelectCommand = Mycommand
MyDataAdapter.Fill(MidataSet, "bancos")
DgBancos.DataSource = MidataSet
DgBancos.Width = 376
DgBancos.Height = 200
DgBancos.location = New Point(16, 48)
Conexion.DesconectarNovaCheq()
Pero no me muestra nada, no hace nada, que puede seer

saludos
Nacho
 

Leer las respuestas

#1 Carlos Gómez
18/08/2006 - 12:22 | Informe spam
Te falta agregar tu dataGrid al formulario, ya que es el formulario el
responsable de mostrarlo:

me.Controls.Add(TuDataGrid)

Preguntas similares