|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Senior Member
Iscritto dal: Aug 2004
Città: Provincia di Monza e Brianza
Messaggi: 6271
|
[VB6] Progress bar che non refresha
Ciao, ho un programma in VB6 che fai dei caricamenti su DB abbastanza lunghi, ho quindi messo una progress bar per monitorarli, e fin qui, tutto ok...il problema è che dopo un pò che 'scrolla', è come se smettesse di fare il repaint, ho chiamato il refresh del form che la contiene , ma non c'è niente da fare...smette di 'progredire' e stop, anche se il caricamento va fino alla fine....cosa sbaglio ?
Grazie!
__________________
AMD Ryzen 5 7600X - Dissipatore Thermalright Assassin King 120SE - RAM Kingston Fury Beast 2x16Gb DDR5 CL30 @ 6000 - Motherboard ASROCK B650 Pro RS - NVME Kingston KC3000 2Tb - PSU FSP Hydro PRO 600w - Win 11 PRO |
|
|
|
|
|
#2 |
|
Senior Member
Iscritto dal: Nov 2005
Messaggi: 2781
|
Puoi postare il codice incriminato?
|
|
|
|
|
|
#3 |
|
Senior Member
Iscritto dal: Aug 2004
Città: Provincia di Monza e Brianza
Messaggi: 6271
|
Tutto il codice no, è impossibile, sono una serie (lunga) di calcoli, query sul db (via adodb), ecc...poi il classico miaPb.value = miaPb.value + 1 (visto che ho calcolato il pb.max con un count(*) dei record da leggere).
Ho aggiunto un mioform.refresh, ma lo fa per un pò, poi basta, si blocca.
__________________
AMD Ryzen 5 7600X - Dissipatore Thermalright Assassin King 120SE - RAM Kingston Fury Beast 2x16Gb DDR5 CL30 @ 6000 - Motherboard ASROCK B650 Pro RS - NVME Kingston KC3000 2Tb - PSU FSP Hydro PRO 600w - Win 11 PRO |
|
|
|
|
|
#4 |
|
Senior Member
Iscritto dal: Dec 2004
Messaggi: 3210
|
Così, senza vedere alcun codice :
1. Assicurati che l'attributo della Form "AutoRedraw" sia True. 2. Se con il semplice AutoRedraw a True non noti cambiamenti, allora prova ad inserire una chiamata a DoEvents nel ciclo, dopo ogni incremento del valore progressbar... Se, come penso, risolve, puoi eliminare eventuali chiamate a Refresh. |
|
|
|
|
|
#5 |
|
Senior Member
Iscritto dal: Aug 2004
Città: Provincia di Monza e Brianza
Messaggi: 6271
|
Grande , intanto che aspettavo qualche risposta, mi son messo a fare esperimenti, e penso che con DoEvents abbia risolto !!!!
Che strano comportamento!
__________________
AMD Ryzen 5 7600X - Dissipatore Thermalright Assassin King 120SE - RAM Kingston Fury Beast 2x16Gb DDR5 CL30 @ 6000 - Motherboard ASROCK B650 Pro RS - NVME Kingston KC3000 2Tb - PSU FSP Hydro PRO 600w - Win 11 PRO |
|
|
|
|
|
#6 | |
|
Senior Member
Iscritto dal: Dec 2004
Messaggi: 3210
|
Quote:
DoEvents serve proprio per scopi come questo. Se vuoi saperne qualcosa in più dai anche un'occhiata qui : http://www.hwupgrade.it/forum/showth...1954524&page=4 [ mio post #73 ]. |
|
|
|
|
|
|
#7 |
|
Senior Member
Iscritto dal: Aug 2004
Città: Provincia di Monza e Brianza
Messaggi: 6271
|
Sempre gentilissimo.
Ora mi leggo tutto per bene così aggiungo qualcosa alle mie (scarse) conoscenze di VB!
__________________
AMD Ryzen 5 7600X - Dissipatore Thermalright Assassin King 120SE - RAM Kingston Fury Beast 2x16Gb DDR5 CL30 @ 6000 - Motherboard ASROCK B650 Pro RS - NVME Kingston KC3000 2Tb - PSU FSP Hydro PRO 600w - Win 11 PRO |
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 23:13.




















