Modificare l'opacità di un'immagine: differenze tra le versioni
Vai alla navigazione
Vai alla ricerca
(Creata pagina con "Per modificare l'opacità di una immagine, si può adottare la seguente modalità. <SUP>[nota 1]</sup> ===Usare il Metodo ".Opacity()" della Classe ''Ima...") |
Nessun oggetto della modifica |
||
| Riga 14: | Riga 14: | ||
PictureBox1.Image = im<FONT Color=red>.Opacity</font>(0.5) | PictureBox1.Image = im<FONT Color=red>.Opacity</font>(0.5) | ||
End | |||
===Usare la Proprietà ".Opacity" della Classe ''Paint''=== | |||
La Proprietà ".Opacity" della Classe ''Paint'' accetta valori in virgola mobile compresi fra 0.00 e 1.0 . | |||
<BR>Se il valore di tipo Float è uguale a 0.00, allora l'immagine diventa completamente trasparente. Se invece è uguale a 1.0, allora il suo grado di opacità è immodificato. | |||
Esempio: | |||
Public Sub Form_Open() | |||
Dim im As Image | |||
im = Image.Load("<FONT Color=darkgreen>''/percorso/del/file/immagine''</font>") | |||
With '''Paint''' | |||
.Begin(im) | |||
<FONT Color=red>.Opacity</font> = 0.2 | |||
.End | |||
End With | |||
PictureBox1.Image = im | |||
End | End | ||
Versione delle 12:00, 26 nov 2024
Per modificare l'opacità di una immagine, si può adottare la seguente modalità. [nota 1]
Usare il Metodo ".Opacity()" della Classe Image
Il Metodo ".Opacity()" della Classe Image accetta valori in virgola mobile compresi fra 0.00 e 1.0 .
Se il valore di tipo Float è uguale a 0.00, allora l'immagine diventa completamente trasparente. Se invece è uguale a 1.0, allora il suo grado di opacità è immodificato.
Esempio:
Public Sub Form_Open()
Dim im As Image
im = Image.Load("/percorso/del/file/immagine")
PictureBox1.Image = im.Opacity(0.5)
End
Usare la Proprietà ".Opacity" della Classe Paint
La Proprietà ".Opacity" della Classe Paint accetta valori in virgola mobile compresi fra 0.00 e 1.0 .
Se il valore di tipo Float è uguale a 0.00, allora l'immagine diventa completamente trasparente. Se invece è uguale a 1.0, allora il suo grado di opacità è immodificato.
Esempio:
Public Sub Form_Open()
Dim im As Image
im = Image.Load("/percorso/del/file/immagine")
With Paint
.Begin(im)
.Opacity = 0.2
.End
End With
PictureBox1.Image = im
End
Note
[1] Vedere anche questa pagina: Impostare l'opacità di un disegno in una DrawingArea