Exercício 2
Data de publicação: Mar 30, 2014 9:18:20 PM
Tratamento de erros 02
Implemente um programa em Vbasic que permita:
- Iniciar uma nova imagem (limpar a PictureBox)
- Abrir um ficheiro de imagem já existente (esta imagem terá de estar dentro da pasta \bin\debug)
- Guardar um novo ficheiro de imagem
Tudo isto deverá estar preparado para avisar dos erros sem que o programa seja interrompido.
Esta implementação deverá ser feita através das funções On Error Goto ou Try.
Caso o nome da imagem inserido na TextBox não exista, deverá surgir a seguinte mensagem:
Quando a nova imagem for gravada deverá surgir a seguinte mensagem:
Limpar imagem
PictureBox1.Image = Nothing
Abrir imagem
nomefich = TextBox1.Text
PictureBox1.Image = Image.FromFile(nomefich)
Guardar imagem
nomefich = TextBox1.Text
PictureBox1.Image.Save(nomefich)