Creare un nuovo progetto facendo clic su " File ", " Nuovo progetto " dal menu principale . Quando richiesto , dare il nome di " PipeServer . " Tieni tutte le altre impostazioni ai valori predefiniti e fare clic su "OK".
Ti verrà presentato con una finestra vuota nella Graphical User Interface ( GUI) di design .
2
Aggiungere un pulsante per l'interfaccia trascinando l'icona " tasto " dalla lista componenti a sinistra e rilasciandolo sulla vostra finestra .
Poiché si tratta di un semplice tutorial , non è necessario preoccuparsi di rinominarlo o personalizzando il testo .
3 fare doppio clic sul pulsante . Questo vi porterà fuori dalla GUI designer e dentro l'editor di codice sorgente per l'applicazione. Sarà inoltre possibile creare un evento per quando l'utente fa clic con il pulsante
Aggiungi questo codice per l'evento : .
Dim tubo come nuovo System.IO.Pipes.NamedPipeServerStream ( " testPipe " , IO.Pipes.PipeDirection.Out ) pipe.WaitForConnection ( ) per
Dim sw As New System.IO.StreamWriter ( pipe) sw.AutoFlush = Truesw.WriteLine ( " Stiamo inviando questi dati " )
linea per linea Going, questo crea un nuovo PipeServer e lo nomina " testPipe . " si dichiara che questa applicazione può scrivere solo informazioni verso il tubo e non leggerlo indietro .
poi si ferma per attendere per un'applicazione client per connettersi ad esso . Non appena questo accade , si apre uno StreamWriter , che renderà più facile scrivere le informazioni per il tubo . Racconta la StreamWriter per scrivere automaticamente le informazioni per il tubo , non appena lo riceve , e si scrive una stringa semplice al tubo di essere letto da parte del cliente .
Che termina il server .
4
Aprire una nuova copia di Visual Basic e creare un nuovo progetto denominato " PipeClient . « Proprio come prima , le opzioni di default sono sufficienti .
5
Aggiungere una casella di testo trascinando la " Casella di testo " , . icona dalla lista componenti nella finestra
6
Aggiungi un pulsante trascinandolo dalla lista componenti
7
fare doppio clic sul pulsante per andare al . . editor di codice sorgente e creare un evento
aggiungere questo codice a quell'evento :
Dim tubo come nuovo System.IO.Pipes.NamedPipeClientStream ( " localhost " , " testPipe ") il tubo . Connect ( ) per
Dim reader As New System.IO.StreamReader ( pipe ) per
dati Dim As String
dati
= reader.ReadLine ( ) per
TextBox1.Text = dati
linea per linea Going, questo apre un PipeClient e , utilizzando lo stesso nome di pipe , come si è utilizzato nel server , si connette a questo tubo .
si apre una StreamReader per rendere più facile la lettura dei dati dal tubo in stringhe e legge una singola riga dal tubo . Si passa quindi la casella di testo per visualizzare la stringa ricevuta dal server.
8
Clicca le frecce verdi in entrambi i progetti da eseguire ogni applicazione allo stesso tempo . Dopo che sono entrambi in esecuzione , fare clic sui pulsanti in ogni applicazione . L'ordine non ha importanza.
In breve tempo , la stringa " Stiamo inviando questi dati . " Dovrebbe comparire nella casella di testo dell'applicazione PipeClient .
Programmazione © www.354353.com