Oprettelse af en ansøgning i Visual Basic er en forholdsvis nem opgave, der kan udføres , selv i den gratis " Express " version af Visual Basic. Det vigtigste krav er, at du skal bruge et billede hosting service, der understøtter FTP-protokollen til at overføre filer over internettet. Fra begyndelsen af 2010 , er nogle eksempler på tjenester, der understøtter denne funktion VillagePhotos og Pro version af Photobucket . Ting du skal
Visual Basic
Billede vært, der understøtter FTP
Vis Flere Instruktioner
1
Tilføj en knap , en tekstboks og en etiket. Dette kan gøres ved at finde hver komponent i tur i komponenterne listen på venstre side af skærmen og trække dem ind i den tomme vindue i Visual Basic GUI designer.Change teksten på knappen til " Find billede " af venstre - at klikke på knappen og finde den "Text " ejendom i ejendomme boksen i nederste højre side af screen.Change navnet tekstboksen til " imageBox " ved at ændre "Name " ejendom i sin ejendom kassen. Ændre etikettens tekst ejendom til "Image ". Tekstboksen vil holde placeringen af billedet og knappen vil bringe op en fil browser til at lade brugeren vælge et billede .
2
Tilføj en OpenFileDialog fra komponenter på listen til venstre . < Br >
3
Tilføj yderligere to tekstbokse og medfølgende mærkater . Navngiv kasserne " usernameBox " og " pwBox ". Skift tekstegenskaberne af de mærkater, " brugernavn" og "password ". Dette kan gøres ved at vælge hver enkelt efter tur og ændre "Tekst" eller "navn" egenskaber af komponenterne i deres ejendom kassen.
4
Tilføj en knap ved at trække det fra komponenter listen. Ændre sin tekst til "Upload ".
5
Dobbeltklik på "Find Image" -knappen for at oprette en handling , når der klikkes på knappen. Dette vil trække dig ud af GUI design interface og i kildekoden editor. Indtast koden : OpenFileDialog1.ShowDialog () imageBox.Text = OpenFileDialog1.FileNameThis vil præsentere brugeren med en dialogboks , hver gang han trykker "Find Image" knap, der vil invitere ham til at vælge en billedfil på sin harddisk. Den fulde filnavn og en sti af billedet vil så blive placeret i tekstfeltet ved siden af knappen , som vi kaldte " imageBox " i trin 1. .
6
Klik på " Design " fanen for at vende tilbage til GUI design interface og dobbeltklik på "Upload" -knappen for at oprette en handling for at uploade billedet. Dette vil tage dig tilbage til kildekoden editor og automatisk oprette en ny handling -funktion for dig. Indtast denne kode i funktionen : Dim brugernavn = usernameBox.TextDim password = pwBox.TextDim server = " ftp://ftp.photobucket.com/" My.Computer.Network.UploadFile ( imageBox.Text , server & OpenFileDialog1.SafeFileName , brugernavn, adgangskode) Skift server til den du har fået af dit billede hosting service , hvis din host ikke er Photobucket .
