PDA

View Full Version : [Access 2k VBA] "Flashing" di un campo


Spike79
27-01-2006, 10:05
Ciao, è possibile far si che un campo di una maschera venga evidenziato da una specie di 'flash' (come ad es succede alle applicazioni in attesa sulla taskbar) ?
Dopo che modifico il contenuto di questo campo (via codice VBA), vorrei infatti farlo notare all'utente....avevo pensato di selezionare tutto e deselezionare un paio di volte, ma mi pare una 'pezza'....esiste qualcosa di già codificato in Access 2000 ?
thanx

Fenomeno85
27-01-2006, 10:27
tutto si può volendo ti basta fare una cosa del genere :D

questo è per .NET ... vb6 non ce l'ho più e non ho voglia di scaricarlo dal sito :D

TextBox1.BackColor() = System.Drawing.Color.White
TextBox1.BackColor() = System.Drawing.Color.Blue

~§~ Sempre E Solo Lei ~§~

Spike79
27-01-2006, 10:40
FATTO!
intanto che aspettavo la risp, mi è venuta un'idea....ho fatto una sub così:

Private Sub Flash(campo As Control, secondi As Integer)
Dim i As Integer

For i = 0 To secondi
campo.BackColor = vbBlack
campo.ForeColor = vbWhite
Repaint
Sleep 500

campo.ForeColor = vbBlack
campo.BackColor = vbWhite
Repaint
Sleep 500
Next i

End Sub

dove "Sleep" è una chiamata così:
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

mi basta passare il nome del campo e i secondi di flashing e ci pensa lui.
(ovviamente è ottimizzabile, però non è malaccio)
Grazie lo stesso della risposta.