Italian Codice corretto ?

Dim Immagine As BitmapDrawable
Dim Imm_Rnd As Int
Dim bmpImmagine As Bitmap
Sub ImageView1
Imm_Rnd = Rnd(1 , 5)
Select Imm_Rnd
Case 1:
bmpImmagine.Initialize(File.DirAssets, "1.png")
Case 2:
bmpImmagine.Initialize(File.DirAssets, "2.png")
Case 3:
bmpImmagine.Initialize(File.DirAssets, "3.gif")
Case 4:
bmpImmagine.Initialize(File.DirAssets, "4.png")
End Select
Immagine.Initialize(bmpImmagine)
Activity.Background = Immagine

Click to expand...

PakoT52 said:

Ciao a tutti stavo provando a fare un applicazione con un ImageView dove possono comparire immagini Random , ho cercato sul forum e ho trovato una discussione dove un utente aveva il mio stesso quesito solo che a lui doveva cambiare l'immagine di background . Ho preso il codice e l'ho modificato per le mie esigenze . Solo che quando installo l'applicazione nel mio dispositivo dice : Applicazione non installata . Il dispositivo è collegato tramite wireless ed ha sempre funzionato quindi pensavo che ci fosse qualcosa di sbagliato ecco il codice :

Grazie mille

Click to expand...