[VB.NET] Far comparire messaggio su picturebox in caso di assenza di immagine

[redhack]

ciao a tutti!

ehm..
il problema di gg è questo:

ho una picturebox, 2 bottoni "apri" e "crea"..
allora

cliccando su "apri" mi compare un openfiledialog in cui scelgo l'iimagine, e mi appare sulla picturebox, e premendo su "crea" mi si salva un immagine col nome immagine.bmp..

se nella picturebox non c'è nnt, allora mi deve comparire un messaggio..

ho provato a fare

 
Private sub Crea_click
Dim immagine As Image = Image.FromFile(OpenFileDialog.FileName)

if picturebox.image is nothing then
msgbox"inserire immagine" 
else
immagine.Save("c:\immagine.bmp", Imaging.ImageFormat.Bmp)

end if
end sub

ma mi dà errore..
help me please

[oregon]

"Mi dà errore ??? "

Quale errore?

Quale linguaggio?


... regolamento ...

[redhack]

ahn si

linguaggio: vb.net

errore: OpenFileDialog, mi dice che devo inserire un percorso valido..

[oregon]

Ma la OpenFileDialog la usi ? Cioe', il nome lo scegli aprendo la finestra di dialogo?

[redhack]

cliccando su apri mi si apre openfiledialog e scelogo l'immagine, e poi cliccando su crea, salva la stessa immagine però con il nome immagine.bmp, e se non apro nessuna immagine, mi devrebbe comparire un mex d'avviso..

[gibra]

Originariamente inviato da redhack
ciao a tutti!

 
Private sub Crea_click
Dim immagine As Image = Image.FromFile(OpenFileDialog.FileName)

if picturebox.image is nothing then
msgbox"inserire immagine" 
else
immagine.Save("c:\immagine.bmp", Imaging.ImageFormat.Bmp)

end if
end sub

Dovresti spiegarci che parentela hanno:

immagine e picturebox

perchè nel tuo codice non sembrano aver niente a che vedere una con l'altra...

Ciao

[oregon]

Originariamente inviato da gibra
perchè nel tuo codice non sembrano aver niente a che vedere una con l'altra...

In effetti ...

[LeleFT]

Attenzione al titolo e al linguaggio.
Nel regolamento è specificato che il linguaggio va indicato nel titolo e questo deve essere chiaro e riassuntivo dell'argomento trattato.

Ho corretto io.


Ciao.

[mardok30]

Se carichi l'immagine così è probabile che ti dia subito errore nel caso in cui tu clicchi sul tasto Annulla della OpenFileDialog. Prova con una cosa del genere:

Dim prova As New OpenFileDialog
                                Dim choice As DialogResult = prova.ShowDialog
                                If choice = DialogResult.OK Then
                                    Dim immagine As Image = Image.FromFile(OpenFileDialog.FileName)
else
messagebox.show("Nessuna immagine selezionata.")
                                End If