vb lee y accede a la base de datos para dibujar curvas en tiempo real

¿Quieres dibujar una curva que cambie con el tiempo, o simplemente quieres leer y dibujar una curva a la vez? Tengo una curva que se puede completar de una vez y una curva en la que se puede hacer clic y dibujar. También quiero saber

Private Sub Form_Load()

Set cnn = New ADODB.Connection

cnn.Open " Provider = Microsoft.Jet.OLEDB.4.0 ; Fuente de datos=" amp..0 ;Fuente de datos=" amp App.Path amp "\data.mdb"

Establecer primero = Nuevo ADODB.Recordset

primero. Abra "seleccionar * de recopilar", cnn, adOpenKeyset, adLockPessimistic

If rst.MoveNext

End Sub

Private Sub Timer1_Timer()

Hacer mientras no sea la primera línea (Val(Text2.Text * 15), Val(Text1.Text * 16)) - (Val(Text4.Text * 15), Val (Text3.Text * 16)), vbRed

Texto1 .Text = Texto3.Text

Texto2.Text = Texto4.Text

rst.MoveNext

Bucle

Fin del subtítulo