Differenze tra le versioni di "Pseudo-ProgressBar in un'applicazione 'a riga di comando'"
Da Gambas-it.org - Wikipedia.
| Riga 1: | Riga 1: | ||
| − | Se si | + | Se si scrivendo un'applicazione ''a riga di comando'' (quindi senza supporto grafico), per ottenere in console/Terminale un ''effetto'' simile ad una ''ProgressBar'', può essere utilizzata una soluzione, che adopera ovviamente caratteri, simile alla seguente: |
'''Public''' Sub Main() | '''Public''' Sub Main() | ||
Versione delle 08:58, 8 mar 2016
Se si scrivendo un'applicazione a riga di comando (quindi senza supporto grafico), per ottenere in console/Terminale un effetto simile ad una ProgressBar, può essere utilizzata una soluzione, che adopera ovviamente caratteri, simile alla seguente:
Public Sub Main()
Dim b As Byte
Do
Write #File.Out, CStr(b) & "\x20"
b += 5
Loop Until b = 105
Print
Write #File.Out, "="
b = 0
Do
Sleep 0.3
Write #File.Out, String(Len(CStr(b)) + 1, "=")
b += 5
Loop Until b = 100
End
