|    
			
				13/12/2004, 02:38
			
			
			  | 
  |   |  |  |  Fecha de Ingreso: diciembre-2004 
						Mensajes: 32
					 Antigüedad: 20 años, 10 meses Puntos: 0 |  | 
  |  Se hace de la siguiente manera:
 Dim strPath As String
 Dim StrSelect As String
 Dim strXML As String
 Try
 
 strPath = ConfigurationSettings.AppSettings.Get("pathBD")
 Dim dbHelper As New MEDISDataHelper("MDB_Medis", strPath)
 strXML = ConfigurationSettings.AppSettings.Get("pathXML")
 StrSelect = QueryStorage.GetQueryFromXMLFile("obtenerTrascende  ncias", strXML)
 
 Dim dt As Data.DataTable = dbHelper.ExecuteSelectTable(StrSelect, "MaestroTrascendencia")
 
 ''''''''''''Hasta aquí como cargues tú los datos en el datatable o dataset, lo que tú utilices. Lo que necesitas es esto:
 (CboTrascendencia es el combobox)Al datasource le asignas el origen de datos, en el displayMember el campo del origen de datos que quieres que se te visualice y en el valuemember el valor que te interesa manejar a ti. Por ejemplo: el displaymember podría ser la descripción del campo y el valuemember, la clave primaria de la tabla de la base de datos de donde obtengas los valores de ese combobox.
 
 Me.CboTrascendencia.DataSource = dt
 Me.CboTrascendencia.DisplayMember = dt.Columns("Descripcion").ColumnName
 Me.CboTrascendencia.ValueMember = dt.Columns("Valor").ColumnName
 
 Catch ex As MEDISDataHelperException
 MsgBox("Error al Cargar los Datos.", MsgBoxStyle.OKOnly, "Error")
 End Try
     |