Differenze tra le versioni di "Spostare la barra indicatrice di una ProgressBar con il mouse"

Da Gambas-it.org - Wikipedia.
 
Riga 1: Riga 1:
 
Per spostare manualmente con il mouse la barra colorata che indica il valore di una ''ProgressBar'', si può adottare il seguente semplice codice:
 
Per spostare manualmente con il mouse la barra colorata che indica il valore di una ''ProgressBar'', si può adottare il seguente semplice codice:
  '''Public''' Sub ProgressBar1_MouseDown()
+
  Public Sub ProgressBar1_MouseDown()
 
   
 
   
 
   ProgressBar1.Value = Mouse.X / ProgressBar1.W
 
   ProgressBar1.Value = Mouse.X / ProgressBar1.W
 
   
 
   
  '''End'''
+
  End
 
E' possibile anche far scorrere la barra colorata spostando il mouse mentre si tiene premuto con il tasto sulla ''ProgressBar'':
 
E' possibile anche far scorrere la barra colorata spostando il mouse mentre si tiene premuto con il tasto sulla ''ProgressBar'':
  '''Public''' Sub ProgressBar1_MouseMove()
+
  Public Sub ProgressBar1_MouseMove()
 
   
 
   
 
   ProgressBar1.Value = Mouse.X / ProgressBar1.W
 
   ProgressBar1.Value = Mouse.X / ProgressBar1.W
 
   
 
   
  '''End'''
+
  End

Versione attuale delle 13:14, 22 giu 2024

Per spostare manualmente con il mouse la barra colorata che indica il valore di una ProgressBar, si può adottare il seguente semplice codice:

Public Sub ProgressBar1_MouseDown()

  ProgressBar1.Value = Mouse.X / ProgressBar1.W

End

E' possibile anche far scorrere la barra colorata spostando il mouse mentre si tiene premuto con il tasto sulla ProgressBar:

Public Sub ProgressBar1_MouseMove()

 ProgressBar1.Value = Mouse.X / ProgressBar1.W

End