Erstellen einer Anwendung in Visual Basic ist eine ziemlich einfache Aufgabe, die auch in der freien " Express "-Version von Visual Basic erreicht werden kann. Die wichtigste Voraussetzung ist, dass Sie ein Bild Hosting -Dienst, der das FTP-Protokoll zur Übertragung von Dateien über das Internet unterstützt. Ab Anfang 2010 sind einige Beispiele für Dienste, die diese Funktion unterstützen VillagePhotos und die Pro-Version von Photobucket . Things You
Visual Basic Bildergalerie Bild Host, FTP
unterstützt brauchen anzeigen Weitere Anweisungen
1
Fügen Sie eine Schaltfläche , ein Textfeld und ein Etikett . Dies kann durch Feststellung jede Komponente wiederum in der Komponenten -Liste auf der linken Seite des Bildschirms und ziehen Sie sie in das leere Fenster in der Visual Basic GUI designer.Change den Text der Schaltfläche getan werden, um " Bild suchen " nach links Maustaste auf die Schaltfläche und das Finden der Eigenschaft "Text" in der Infobox auf der rechten unteren Seite des screen.Change der Name des Textfeld " ImageBox " durch die Veränderung der Eigenschaft "Name" in seiner Eigenschaft box . Ändern Sie den Text der Bezeichnung Eigenschaft auf " Bild ". Das Textfeld wird halten Sie die Position des Bildes und die Schaltfläche öffnet sich ein Datei-Browser , um dem Benutzer ein Bild auswählen .
2
Hinzufügen eines OpenFileDialog aus der Komponenten -Liste auf der linken Seite.
3
Fügen Sie zwei weitere Textfelder und zugehörigen Etiketten. Nennen Sie die Boxen " usernameBox " und " pwBox . " Ändern Sie die Text -Eigenschaften der Etiketten auf " Benutzername " und " Passwort ". Dies kann durch Auswahl der Reihe nach aus und die Änderung der "Text" oder "Name" Eigenschaften der Komponenten in ihr Eigentum Box erfolgen.
4
Fügen Sie eine Schaltfläche bewegen indem sie sie von der Liste der Komponenten . Ändern Sie den Text auf "Datei hochladen ".
5
Doppelklicken Sie auf das " Bild suchen ", um eine Aktion für , wenn diese Schaltfläche geklickt erstellen. Dies wird ziehen Sie aus der GUI -Design-Schnittstelle und in den Quellcode -Editor. Den Code eingeben: OpenFileDialog1.ShowDialog () = imageBox.Text OpenFileDialog1.FileNameThis wird der Benutzer mit einem Dialog zu präsentieren , wenn er drückt die " Bild suchen "-Taste , die ihn einladen, um eine Image-Datei auf seiner Festplatte wählen . Der vollständige Dateiname und Pfad des Bildes wird dann in das Textfeld neben der Schaltfläche , die wir mit dem Namen " ImageBox " in Schritt 1 platziert werden.
6
Klicken Sie auf die Registerkarte "Entwurf" , um zum GUI -Design-Schnittstelle und doppelklicken Sie auf die Schaltfläche "Hochladen" , um eine Aktion für das Hochladen des Bildes zu erstellen. Dies bringt Sie zurück in den Quellcode -Editor und erstellt automatisch eine neue Action-Funktion für Sie. Geben Sie diesen Code in der Funktion : Dim username = password = usernameBox.TextDim pwBox.TextDim server = " ftp://ftp.photobucket.com/" My.Computer.Network.UploadFile ( imageBox.Text , Server & OpenFileDialog1.SafeFileName , Benutzername, Passwort ) Ändern Sie den Server auf der einen , die Sie von Ihrem Bild Hosting , wenn Ihr Rechner ist nicht Photobucket .