Há uma variedade de maneiras de passar informações entre diferentes aplicações de Visual Basic. Estes variam em complexidade de simplesmente copiar informações para a área de transferência comumente usado por operações de cortar e colar para a criação de relações de cliente /servidor /interface complexas. Um bom meio termo é o " pipe ", que permite tanto one-way e comunicação bidirecional entre aplicativos usando cordas simples. Instruções
1
Crie um novo projeto , clicando em " Arquivo", " New Project " no menu principal. Quando solicitado , dar-lhe o nome de " PipeServer . " Mantenha todas as outras configurações como padrão e clique em "OK ".
Você será presenteado com uma janela em branco no Graphical User Interface (GUI) designer.
2
Adicionar um botão para sua interface , arrastando o ícone "Botão " na lista de componentes do lado esquerdo e soltando-o em sua janela.
Como este é um tutorial simples , você não precisa se preocupar com a renomeá-lo ou personalizando o texto .
3
clique duas vezes no botão. Isto irá levá- lo para fora do designer gráfico e no editor de código-fonte de sua aplicação. Ele também irá criar um evento para quando o usuário clica com o botão
Adicione este código para o evento : .
Dim tubo As New System.IO.Pipes.NamedPipeServerStream ( " testPipe " , IO.Pipes.PipeDirection.Out ) pipe.WaitForConnection ()
Dim sw As New System.IO.StreamWriter (pipe) sw.AutoFlush = Truesw.WriteLine ( " Estamos enviando esses dados " ) < br >
indo linha por linha, o que cria uma nova PipeServer e nomes que " testPipe . " ele declara que esta aplicação só pode escrever informações para o tubo e não lê-lo de volta.
depois pára para esperar por um aplicativo cliente para se conectar a ele . Assim que isso acontecer, ele abre um StreamWriter , o que tornará mais fácil para gravar as informações para o tubo . Conta a StreamWriter para escrever automaticamente a informação para o tubo assim que a recebe , e escreve uma string simples para o tubo a ser lido pelo cliente.
Isso termina o servidor.
4
Abra uma nova cópia do Visual Basic e crie um novo projeto chamado " PipeClient . " assim como antes , as opções padrão são suficientes .
5
Adicione uma caixa de texto , arrastando a " Caixa de texto " ,. . ícone da lista de componentes em sua janela
6
Adicionar um botão , arrastando-o a partir da lista componentes
7
clique duas vezes no botão para ir para o . editor de código -fonte e criar um evento
Adicione este código para o evento :
Dim tubo As New System.IO.Pipes.NamedPipeClientStream ( "localhost ", " testPipe ") tubo . Connect ( )
Dim reader As New System.IO.StreamReader (pipe)
dados Dim As String
data = reader.ReadLine ()
TextBox1.Text = dados
indo linha por linha, isso abre um PipeClient e, usando o mesmo nome de tubo que você usou no servidor, ele se conecta a este tubo.
ele abre uma StreamReader para torná-lo fácil de ler os dados do tubo em cordas, e ele lê uma única linha do tubo . Em seguida, ele muda a caixa de texto para exibir a seqüência que recebeu do servidor.
8
Clique nas setas verdes em ambos os projetos para executar cada aplicativo ao mesmo tempo . Depois que eles estiverem em execução , clique nos botões em cada aplicação. A ordem não importa.
Dentro de um curto espaço de tempo , a string " Estamos enviando esses dados. " Deve aparecer na caixa de texto do aplicativo de PipeClient .