Skapa ett program i Visual Basic är en ganska lätt uppgift som kan genomföras även i det fria " Express " version av Visual Basic . Det viktigaste kravet är att du måste använda en bild webbhotell som stöder FTP-protokollet för att överföra filer över Internet . I början av 2010 , några exempel på tjänster som stödjer denna funktion är VillagePhotos och Pro-versionen av Photobucket . Saker du behöver Review, Visual Basic värd Review, Bild som stöder FTP
Visa fler instruktioner
1
Lägg en knapp , en textruta och en etikett . Detta kan göras genom att hitta varje komponent i turordning i listan Komponenter på vänster sida av skärmen och dra dem till den tomma fönster i Visual Basic GUI designer.Change texten på knappen " Sök Bild " med vänster - klicka på knappen och hitta den " text " egendom i fastigheter rutan på den nedre högra sidan av screen.Change namnet på textrutan till " Imagebox " genom att ändra " namn " egendom i sin egenskap rutan . Ändra etikettens text-egenskap till " Bild ". Textrutan kommer att hålla placeringen av bilden och knappen kommer att ta upp en filhanterare för att låta användaren välja en bild .
2
Lägg till ett OpenFileDialog från komponenterna listan till vänster .
3
Lägg två textrutor och medföljande etiketter . Namnge rutorna " usernameBox " och " pwBox . " Ändra textegenskaperna på etiketter som " username " och "password ". Detta kan göras genom att välja dem en i taget och ändra " Text " eller "namn" egenskaperna hos komponenterna i deras egendom rutan . Lägg en knapp genom att dra den från listan Komponenter
4
. Ändra sin text till " Ladda upp".
5
Dubbelklicka på " Sök Bild " -knappen för att skapa en åtgärd för när denna knapp klickas . Detta kommer att dra dig ur det grafiska designen gränssnittet och i källkoden redaktör . Ange koden : OpenFileDialog1.ShowDialog ( ) imageBox.Text = OpenFileDialog1.FileNameThis presenterar användaren med en dialogruta varje gång han trycker på " Hitta Image" som kommer att bjuda in honom att välja en bildfil på sin hårddisk . Den fullständiga filnamnet och sökvägen till bilden kommer då att placeras i textrutan bredvid knappen , som vi heter " Imagebox " i steg 1 . Klicka på " Design "-fliken för att återgå till
6
GUI design gränssnitt och dubbelklicka på " Ladda upp " -knappen för att skapa en åtgärd för att ladda upp bilden . Detta kommer att ta dig tillbaka till källkod redaktör och automatiskt skapa en ny åtgärd funktion för dig . Ange denna kod i funktionen : Dim användarnamn = usernameBox.TextDim lösenord = pwBox.TextDim server = " ftp://ftp.photobucket.com/" My.Computer.Network.UploadFile ( imageBox.Text , server & OpenFileDialog1.SafeFileName , användarnamn , lösenord ) Ändra servern till en som du fått av din bild webbhotell , om din dator är Photobucket .
