INSERIR IMAGEM DE ARQUIVO NO FORM...

XYKOVIEIRA 15/01/2010 11:37:06
#331990

Tenho um project que roda no VB5, onde há um form com dois controles de imagem (Image1 e Image2), e um botão de comando, para visualizar essas imagens. O código do botão é bem simples:
Private Sub cmdVisualizar_Click()
Set Image1.Picture = LoadPicture([Ô]C:\Foto1[Ô])
Set Image2.Picture = LoadPicture([Ô]C:\Foto2[Ô])
End Sub
Essas imagens (jpge) estão armazendas (para teste) em C:\Foto1 e C:\Foto2.
Entretanto, ao clicar no botão <Visualizar>, aparece a segte. msg:
[Ô]Run-time Error [ô]53[ô] - File not found: [ô]C:\Foto1[ô]
Alguém pode ajudar? Agradeço a colaboração.
ASHKATCHUP 15/01/2010 11:47:04
#331992
Você precisa colocar a extensão do arquivo.
LIZANDER 15/01/2010 12:00:11
#332000 Resposta escolhida
Apenas complementando a informação dada pelo ASHKATCHUP, você também pode verificar se o arquivo existe, para caso alguém delete o arquivo, não dê erro no programa.

If Dir([Ô]C:\Foto1.jpg[Ô]) <> [Ô][Ô] Then
Set Image1.Picture = LoadPicture([Ô]C:\Foto1.jpg[Ô])
End If
XYKOVIEIRA 15/01/2010 12:34:24
#332010

Obrigado. Funcionou conforme desejado.
Abraços.
Tópico encerrado , respostas não são mais permitidas
Voltar