Criação de um aplicativo em Visual Basic é uma tarefa bastante fácil, que pode ser realizado mesmo na versão free " Express" do Visual Basic. O requisito mais importante é que você deve usar um serviço de hospedagem de imagem que suporta o protocolo FTP para transferência de arquivos através da internet. No início de 2010, alguns exemplos de serviços que suportam este recurso são VillagePhotos ea versão Pro do Photobucket . Coisas que você precisa
Básico anfitrião Visual de Imagens que suporte FTP

Visualizar Mais instruções
1

Adicionar um botão, uma caixa de texto e um rótulo. Isso pode ser feito por encontrar cada componente , por sua vez na lista de componentes no lado esquerdo da tela e arrastá-los para a janela vazia no Visual Basic GUI designer.Change o texto do botão para " Localizar Imagem ", de esquerda clicando no botão e encontrar o "Text" propriedade na caixa de propriedades no lado inferior direito da screen.Change o nome da caixa de texto para " ImageBox " alterando a propriedade "Name" em sua caixa de propriedades. Altere a propriedade texto do rótulo de "Imagem ". A caixa de texto irá realizar a localização da imagem eo botão irá abrir um navegador de arquivos que permite ao usuário selecionar uma imagem.
2

Adicione um OpenFileDialog da lista os componentes do lado esquerdo. < Br >
3

Adicione mais duas caixas de texto e rótulos que acompanham . Nomeie a caixas " usernameBox " e " pwBox ". Altere as propriedades de texto dos rótulos de "username" e "password ". Isso pode ser feito selecionando um de cada vez e mudar o "Texto" ou "nome" propriedades dos componentes em sua caixa de propriedade.
4

Adicionar um botão , arrastando-o a partir da lista componentes. Altere o texto para "Upload ".
5

Clique duas vezes no " Encontre Imagem" botão para criar uma ação para quando o botão é clicado. Isso vai puxar você para fora da interface GUI design e no editor de código-fonte . Digite o código : OpenFileDialog1.ShowDialog () = imageBox.Text OpenFileDialog1.FileNameThis irá apresentar ao usuário uma caixa de diálogo sempre que ele aperta o botão " Localizar Imagem ", que vai convidá-lo para selecionar um arquivo de imagem em seu disco rígido. O caminho eo nome completo da imagem será colocada na caixa de texto ao lado do botão , a qual chamamos de " ImageBox " na Etapa 1.
6

Clique na aba " Design" para voltar ao design de interface GUI e dê um duplo clique no botão " upload" para criar uma ação para fazer o upload da imagem. Isto irá levá-lo de volta para o editor de código-fonte e criar automaticamente uma nova função de ação para você . Digite este código na função : username = Dim usernameBox.TextDim password = servidor pwBox.TextDim = " ftp://ftp.photobucket.com/" My.Computer.Network.UploadFile ( imageBox.Text , servidor e OpenFileDialog1.SafeFileName , username, password ) Altere o servidor para o dado a você pelo seu serviço de hospedagem de imagem , se o seu host não é Photobucket .