Hvordan lage en link i Visual Basic

Hvordan lage en link i Visual Basic


Hyperkoblinger i programmene gjør det svært enkelt for folk å gå direkte fra et program til en webside, som vanligvis er lastet med standard nettleser. Du kan opprette en hyperkobling i et program i nesten alle språk, så lenge du har tilgang til et API (Application Programming Interface), som vil gi deg muligheten til å kalle funksjoner som ber operativsystemet til å utføre visse oppgaver. Visual Basic har også denne evnen: Alt du trenger å gjøre er å skape en viss kontroll som vil kalle Windows API når klikket.

Bruksanvisning

1 Start en ny Visual Basic-prosjekt. Merke det som du ønsker.

2 Gå til «skjemavisning," hvis du ikke er der allerede, ved å klikke på det lille ikonet som viser et vindu. Det er vanligvis midt ikonet øverst i høyre panel.

3 Opprett en etikett kontroll som kalles "Label1" på skjemaet: Du kan gjøre dette ved å klikke på ikonet med bokstaven "A" på den og deretter dra en boks i skjemaet rundt området der du ønsker å ha etiketten.

4 Klikk på etiketten du nettopp opprettet; bla ned til "Text" i Properties panelet, og skrive hva teksten du ønsker å merke skal inneholde. Du kan også endre tekstfarge og understreker det å gjøre det se ut som en hyperkobling.

5 Gå til "Code view." Ikonet for kodevisning er til venstre for ikonet for skjemavisningen.

6 Erklærer den importerte funksjon for skall utførelsen fra Windows API, som vist i følgende kode (understrekene er obligatorisk, fordi de indikerer at koden fortsetter videre til neste linje):

Private Declare Function ShellExecute Lib "shell32.dll" Alias ​​"ShellExecuteA" (ByVal hwnd As Long,


ByVal lpOperation As String,
ByVal lpFile As String,
ByVal lpParameters As String,
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long

7 Gå tilbake til skjemavisning og dobbeltklikk på etiketten du opprettet tidligere - dette vil ta deg tilbake til kodevisning; flytte markøren til den klikkhendelsen funksjon for "Label1." Denne funksjonen kalles vanligvis "Label1_Click ()".

8 Sett inn følgende kode mellom erklæringen av funksjon og "End Sub":

ShellExecute Form1.hwnd, "åpen", "http: //www.ehow.com&#8221 ;," "," ", SW_SHOW Eller SW_NORMAL

Hvis du ga skjemaet et annet navn enn "Form1," endre navnet på riktig måte. Du kan også endre eksempel nettsiden til noen du foretrekker.

9 Bygg din søknad og kjøre den for å sikre at det fungerer riktig.