Professional Windows -toepassingen hebben vaak de mogelijkheid om externe bestanden te openen . Een van de meest gebruikte bestanden is Microsoft Word document . Word-documenten zijn populair omdat ze zowel beeld als tekst kan bevatten . Als je VB gebruikt . NET , heb je een breed scala van vooraf gebouwde controles tot uw beschikking . Wanneer u uw VB . NET-toepassing naar een Word- bestand met afbeeldingen opent nodig , gebruik maken van een van deze controles . Instructies
1 Open Visual Studio en klik op "Bestand . " Selecteer " New Project . " Kopen van 2 Klik op " Visual Basic " en dubbelklik op " Windows Forms Application . " Een nieuw project wordt geopend . Project bestanden zal verschijnen op de rechterkant van het scherm in de Solution Navigator . Een nieuwe Windows- formulier verschijnt in het midden van het scherm .
3 Klik op de rechterbenedenhoek van het formulier . Houd de linkermuisknop ingedrukt en sleep de muis om te vergroten het formulier . Verhoog de grootte totdat het is ongeveer drie keer zo groot .
4 Klik op " File " en selecteer " Toolbox . " De Toolbox wordt geopend . Zoek de " Button ", " Microsoft WebBrowser " en " OpenFileDialog " controles in de gereedschapskist . Dubbelklik op elke controle met betrekking tot het toe te voegen aan het formulier .
5 Dubbelklik op het formulier de titelbalk aan de bovenkant van het formulier . Een code-venster opent en toont deze code : Private Sub Form1_Load
( ByVal afzender als System.Object , ByVal e als System.EventArgs ) Handles MyBase.Load
End Sub
in de volgende verklaring voor die code blok : Dim document
6
Voeg deze code voordat het " End Sub " verklaring in de vorige code blok :
Button1.Text = "Bladeren "
Met OpenFileDialog1
. Filter = " Documenten " _
" ( * . doc , * . dotx , * . dotm ) & | * doc ; * dOTX ; * DOTM "
FilterIndex = 1 Einde
Met
7 klik met de rechtermuisknop ergens in het venster code en . . . . selecteer " View Ontwerper " om het formulier te bekijken .
8 Dubbelklik op de knop controle op het formulier . De code-venster weer open
9 Voeg de volgende code voor de " End Sub " statement : . Dim fileName
als Koord
Met OpenFileDialog1
. FileName = " "
. ShowDialog ( ) fileName
= . FileName End met
Als fileName.Length dan
document = Nothing Me.WebBrowser1.Navigate
( fileName ) Eind
Als
Dit zorgt ervoor dat de vorm van een " Open bestand " dialoog venster weer te geven wanneer een gebruiker klikken op de knop .
Druk op " F5 " 10 om het project uit te voeren en de vorm . Klik op de knop . Een venster "Openen" wordt de Word-documenten op uw harde schijf te openen en weer te geven .
11 Dubbelklik op een Word-document dat beelden bevat . Het document zal
openen . |
