Det finns en mängd olika sätt att överföra information mellan olika Visual Basic-applikationer . Dessa varierar i komplexitet från att helt enkelt kopiera information till urklipp används ofta av klipp-och - klistra in operationer för att inrätta komplexa server /klient /interface relationer . Ett bra medelväg är " namngivna pipe " som möjliggör både envägs-och tvåvägskommunikation mellan applikationer med enkla strängar . Instruktioner
1
Skapa ett nytt projekt genom att klicka på " File ", " Nytt projekt " från huvudmenyn . När du blir tillfrågad , ge den namnet " PipeServer . " Håll alla andra inställningar på sina standardinställningar och klicka på " OK . "
Du kommer att presenteras med ett tomt fönster i Graphical User Interface ( GUI ) designer .
2
Lägg till en knapp på din gränssnittet genom att dra " knappen " ikonen från komponenterna listan till vänster och släppa den på ditt fönster .
Eftersom detta är en enkel tutorial , du behöver inte oroa dig byta namn på den eller skräddarsy texten .
3
Dubbelklicka på knappen . Detta kommer att ta dig ur den grafiska formgivaren och i källkoden redaktör för din ansökan . Det kommer också att skapa en händelse när användaren klickar på din knapp
Lägg denna kod till denna händelse : .
Dim rör Som New System.IO.Pipes.NamedPipeServerStream ( " testPipe " , IO.Pipes.PipeDirection.Out ) pipe.WaitForConnection ( ) katalog
Dim sw As New System.IO.StreamWriter ( pipe ) sw.AutoFlush = Truesw.WriteLine ( " Vi sänder dessa data " )
Going rad för rad , skapar detta en ny PipeServer och namnger den " testPipe . " det förklarar att denna ansökan endast kan skriva ut information på röret och inte läsa den igen .
p Det stannar till vänta ett klientprogram för att ansluta till den . Så snart detta sker , öppnas en StreamWriter , vilket kommer att göra det lättare att skriva information till röret . Den berättar StreamWriter att automatiskt skriva information till röret så snart emot det , och det skriver en enkel sträng till röret för att läsas av kunden .
Som avslutar servern .
4
Öppna en ny kopia av Visual Basic och skapa ett nytt projekt som heter " PipeClient . " Precis som tidigare , de förvalda alternativen är tillräckliga .
5
Lägg en textruta genom att dra " textruta " ; . ikon från listan Komponenter i ditt fönster
6
Lägg en knapp genom att dra den från listan Komponenter
7
dubbelklicka på knappen för att gå till . . källkod redaktör och skapa en händelse
Lägg denna kod till denna händelse :
Dim rör som New System.IO.Pipes.NamedPipeClientStream ( " localhost " , " testPipe " ) rör . Anslut ( ) katalog
Dim läsare Som New System.IO.StreamReader ( pipe ) Dim
uppgifter som sträng
uppgifter = reader.ReadLine ( ) katalog
TextBox1.Text = uppgifter
Going rad för rad , öppnar detta en PipeClient och med samma pipa namn som du använt i servern , ansluter den till detta rör .
p Det öppnar en StreamReader att göra det enkelt att läsa data från röret i strängar , och den läser en enda rad från röret . Det ändrar sedan textrutan för att visa strängen det emot från servern .
8
Klicka på den gröna pilarna i båda projekten att köra varje program på samma gång . Efter de båda kör , klicka på knapparna i varje program . Ordern ingen roll .
Inom en kort tid , strängen " Vi sänder dessa data . " Ska visas i textrutan för PipeClient ansökan .
