Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - scrollbar
Forum - Visual Basic 6 - scrollbar

Avatar
henry63 (Normal User)
Newbie


Messaggi: 8
Iscritto: 06/09/2009

Segnala al moderatore
Postato alle 11:48
Venerdì, 15/01/2010
Ciao a tutti,(sono un principiante), il mio problema e' questo,
vorrei usare una scrollbar orrizzontale per spostarmi progressivamente
da un record ad un altro in un db. considerando che all'avvio il db
e' posizionato sull'ultimo record.
Come posso fare? tenendo presente che non ho mai usato questo
tipo di controllo. grazie a tutti.

PM Quote
Avatar
Alfonso (Ex-Member)
Guru


Messaggi: 688
Iscritto: 30/09/2009

Segnala al moderatore
Postato alle 12:20
Venerdì, 15/01/2010
Se sei connesso al database con un controllo Data, hai già tutto quello che ti occorre, altrimenti ci devi dire come ti connetti al database e che tipo di database.

Ultima modifica effettuata da Alfonso il 15/01/2010 alle 12:21
PM Quote
Avatar
henry63 (Normal User)
Newbie


Messaggi: 8
Iscritto: 06/09/2009

Segnala al moderatore
Postato alle 16:47
Venerdì, 15/01/2010
il database e' access, e mi connetto cosi':
Dim dbs As Database, rst As Recordset
Set dbs = OpenDatabase("Db.mdb").

    
    

PM Quote
Avatar
Alfonso (Ex-Member)
Guru


Messaggi: 688
Iscritto: 30/09/2009

Segnala al moderatore
Postato alle 17:30
Venerdì, 15/01/2010
Per cui usi una Sql per recuperare i dati? Hai una form che ti mostra i dati risultato della sql? Qual'è il campo Id con cui fai la selezione?
Mostra la sql.

PM Quote
Avatar
henry63 (Normal User)
Newbie


Messaggi: 8
Iscritto: 06/09/2009

Segnala al moderatore
Postato alle 15:46
Domenica, 17/01/2010
Adesso ho inserito un controllo data e con le freccie del controllo mi sposto
come voglio, ma per curiosita'se volessi comunque usare una scrollbar come potrei fare
dato che sui testi non ho trovato nulla.

PM Quote
Avatar
Alfonso (Ex-Member)
Guru


Messaggi: 688
Iscritto: 30/09/2009

Segnala al moderatore
Postato alle 17:18
Domenica, 17/01/2010
Certo che ci vogliono le pinze per avere delle informazioni...

Se usi il controllo Data presumo tu abbia una istruzione
Codice sorgente - presumibilmente Visual Basic 6

  1. Set TuoRecorset = TuoDatabase.OpenRecordset(TuaSql, dbOpenDynaset)
  2. Set Data1.Recordset = TuoRecordSet


Se la TuaSql  estrae tutti i record dell'archivio, presumo tu abbia una griglia dove li vedi e la griglia dispone già di una scrollbar.

Se la TuaSql estrae un solo record e tu hai un maschera con tot label o textbox dove si vedono i dati, allora nella TuaSql avrai la proposizione WHERE.
Per Es:
Codice sorgente - presumibilmente Plain Text

  1. Codice = 5
  2. TuaSql=  "SELECT  ..... WHERE ID=" & Codice


A questo punto, dopo aver settato opportunamente le proprietà della scrollbar, cliccandoci sopra non fai altro che incrementare o decrementare il Codice
Codice sorgente - presumibilmente VB.NET

  1. Private Sub VScroll1_Change()
  2.    Codice=VScroll1.value
  3.    TuaSql=  "SELECT  ..... WHERE ID=" & Codice
  4.    Set TuoRecorset = TuoDatabase.OpenRecordset(TuaSql, dbOpenDynaset)
  5.    Set Data1.Recordset = TuoRecordSet
  6. End Sub



Se non è così dai più informazioni.
Ciao

PM Quote