CARREGAR IMAGEM AO CLICAR
Meus amigos, como faço pra adaptar este código do VB6 para o vb2008?
Private Sub imgFotoCli_Click()
Dim FotoCli as String
CommonDialog1.Filter = [Ô]Arquivo do tipo (*.jpg)|*.jpg|Todos Arquivos (*.*)|*.*|[Ô]
CommonDialog1.ShowOpen
FotoCli = Clipboard.GetData
If FotoCli <> [Ô][Ô] Then
imgFotoCli.Picture = LoadPicture(CommonDialog1.FileName)
FotoCli = (CommonDialog1.FileName)
Else
FotoCli = (App.path & [Ô]\Fotos\Usuario.jpg[Ô])
End If
End Sub
Qual é o componente equivalente ao CommonDialog1?
E quanto ao Image? Eu não vi esse componente, só achei o PictureBox.
Desde já agradeço, estou tentando migrar do VB 6 para o 2008 mas não está sendo muito fácil.
Private Sub imgFotoCli_Click()
Dim FotoCli as String
CommonDialog1.Filter = [Ô]Arquivo do tipo (*.jpg)|*.jpg|Todos Arquivos (*.*)|*.*|[Ô]
CommonDialog1.ShowOpen
FotoCli = Clipboard.GetData
If FotoCli <> [Ô][Ô] Then
imgFotoCli.Picture = LoadPicture(CommonDialog1.FileName)
FotoCli = (CommonDialog1.FileName)
Else
FotoCli = (App.path & [Ô]\Fotos\Usuario.jpg[Ô])
End If
End Sub
Qual é o componente equivalente ao CommonDialog1?
E quanto ao Image? Eu não vi esse componente, só achei o PictureBox.
Desde já agradeço, estou tentando migrar do VB 6 para o 2008 mas não está sendo muito fácil.
Site do Macoratti ,Google e Aqui.
Pode procurar que tu vai achar.
Valeu
Pode procurar que tu vai achar.
Valeu
Tópico encerrado , respostas não são mais permitidas