|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Senior Member
Iscritto dal: Aug 2004
Città: Provincia di Monza e Brianza
Messaggi: 6263
|
[Access 2k VBA] "Flashing" di un campo
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
__________________
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: Jun 2002
Città:
Provincia De VaRéSe ~ § ~ Lat.: 45° 51' 7" N Long.: 8° 50' 21" E ~§~ Magica Inter ~ § ~ Detto: A Chi Più Amiamo Meno Dire Sappiamo ~ § ~ ~ § ~ Hobby: Divertimento allo Stato Puro ~ § ~ ~ § ~ You Must Go Out ~ § ~
Messaggi: 8895
|
tutto si può volendo ti basta fare una cosa del genere
questo è per .NET ... vb6 non ce l'ho più e non ho voglia di scaricarlo dal sito TextBox1.BackColor() = System.Drawing.Color.White TextBox1.BackColor() = System.Drawing.Color.Blue ~§~ Sempre E Solo Lei ~§~
__________________
Meglio essere protagonisti della propria tragedia che spettatori della propria vita
Si dovrebbe pensare più a far bene che a stare bene: e così si finirebbe anche a star meglio. Non preoccuparti solo di essere migliore dei tuoi contemporanei o dei tuoi predecessori.Cerca solo di essere migliore di te stesso |
|
|
|
|
|
#3 |
|
Senior Member
Iscritto dal: Aug 2004
Città: Provincia di Monza e Brianza
Messaggi: 6263
|
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.
__________________
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: 17:10.



















