Cómo especificar el atributo de fuente de datos de DataGrid en VB durante la operación
La propiedad DataSource del control DataGrid de VB se puede cambiar mientras el programa se está ejecutando.
Utilice la instrucción Set para implementar:
La instrucción Set asigna una referencia de objeto a una variable o propiedad.
El código del objeto de datos ADO es el siguiente: Private?Sub?Command1_Click()
Dim?sql?As?String
Dim?l?As? Entero
p>Dim?i?As?Integer
Dim?fieldName()?As?String
sql?=?"select?gyh_riqi,sum (shuju1)?as ?hj?from?jishijilu?where?gyh_riqi='"?&?"1000-061210"?&?"'?group?by?gyh_riqi"
cn.ConnectionString?= ?"Provider=Microsoft .Jet.OLEDB.4.0;Data?Source="?&?App.Path?&?"\wd.mdb;Persist?Security?Info=False"
cn.Open
rs.CursorLocation?=?adUseClient
rs.Open?sql,?cn,?adOpenDynamic,?adLockOptimistic
Set?DataGrid1.DataSource?=? rs
End?Sub
El código de control de datos ADO es el siguiente: Private?Sub?Form_Load()
Adodc1.ConnectionString?=?"Provider= Microsoft.Jet.OLEDB.4.0; Data?Source=D:\Program?Files\Microsoft?Visual?Studio\VB98\BIBLIO.MDB;Persist?Security?Info=False"
Adodc1.RecordSource? =?"select?*?from ?Authors"
Adodc1.Refresh
Establecer?DataGrid1.DataSource?=?Adodc1
End?Sub