Duda con consulta select en VB.NET 2008

[abuitrago81]

Hola a todos.
Les cuento, estoy realizando un proyecto y en el botón "salir" le tengo puesto que me guarde las propiedades de algunos objetos (propiedad Enabled y Visible sobretodo) en una tabla de una base de datos Access.

TABLA DATOS: (name, Enabled, Visible...) donde guardo True o False.

Bueno pues ahora lo que trato es de cargar esos datos al arrancar para que salgan los objetos como se kedaron al cerrar, pero no sé como es el codigo para hacer una select ( por ejemplo "select Enabled from datos where name = 'btnAgenda' " ), y que el valor de ese campo ( True o False ) se me guarde en una variable de tipo String, para luego poder usarla en VB e ir cargandole a cada objeto sus propiedades ( ejemplo: Me.btnAgenda.Enabled = variable ).

Soy principiante en esto y el update de guardar los datos lo hice así:

Código vb:

Public conn As OleDb.OleDbConnection
Public cmd As OleDb.OleDbCommand
...
Dim con As String = "Provider=Microsoft.JET.oledb.4.0;Data Source=C:\EstadoObjetos.mdb"
conn = New OleDb.OleDbConnection(con)
...
' Salvar btnAgenda
            If Me.btnAgenda.Enabled = True Then
                Try
                    conn.Open()
                    cmd = New OleDb.OleDbCommand("update datos set Enable = 'True' where name = 'btnAgenda'", conn)
                    cmd.ExecuteNonQuery()
                    conn.Close()
                Catch ex As Exception
                    MessageBox.Show("Error de Conexión")
                End Try
            Else
                Try
                    conn.Open()
                    cmd = New OleDb.OleDbCommand("update datos set Enable = 'False' where name = 'btnAgenda'", conn)
                    cmd.ExecuteNonQuery()
                    conn.Close()
                Catch ex As Exception
                    MessageBox.Show("Error de Conexión")
                End Try
            End If
 

[Dunderio]

has lo siguiente en el load del form.
1-carga en un datatable el resultado de todos tus controles
2-usas un select como este para llenar el datatable (dt)

select name, enable, visible from datos

3-una vez que lo tengas en memoria hace esto



for each ctl in miforma.controls
for x=0 to dt.row.count -1
if ctl.name = dt.rows(x).item(0) then
ctl.enable = dt.rows(x).item(1)
ctl.visible = dt.rows(x).item(2)
end if
next
next

saludos,

Dunderio
http://dunderio.com

[abuitrago81]

El punto 1, exactamente como se carga en un database el resultado de todos los controles??
Soy estudiante y acabamos de empezar hace 1 mes con Visual, no hemos dado conexiones a base de datos todavía ( yo he exo algo con php y mysql nada mas ).

Me gustaría si pudiera ser q me pusierais el código y en que zona se pondría, ya que viendo el código es como suelo aprender ( así hicecon el update q una vez visto un codigo que funciona entiendo q hace cada cosa ).

Gracias por contestar en cualquier caso Dunderio.