| Home  | Casa  | Hardware  | Networking  | Programmazione  | Software  | Domanda  | Sistemi  |   
Programmazione  
  • C /C + + Programming

  • Computer Programming Languages

  • Delphi Programming

  • Java Programming

  • Programmazione Javascript

  • PHP /MySQL Programmazione

  • Perl Programming

  • Python Programming

  • rubino Programmazione

  • Nozioni di base di Visual Programming
  •  
    Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> Content
    Come fare una Chat Room in Visual Basic Express
    Avere la conoscenza di come creare una chat room utilizzando Microsoft Visual Basic Express è possibile risparmiare tempo quando è necessario creare un'applicazione di chat room . Visual Basic Express è disponibile gratuitamente a tutti coloro che sono interessati a creare applicazioni utilizzando VB.NET . Una chat room coinvolge due applicazioni, il server e il client . Il server gestisce tutte le connessioni client , e l'applicazione client si connette gli utenti alla sala server per inviare i messaggi . Istruzioni
    1

    Avviare Microsoft Visual Basic Express e quindi fare clic su "Nuovo progetto ". Nel riquadro a sinistra dello schermo , selezionare " Applicazione console . " Fare clic su " OK ".
    2 Premere

    "Ctrl " + " A ", quindi premere "Elimina ". Copia e incolla il seguente codice nel tuo " Module1.vb " per creare il programma server :

    Importazioni System.Net.Sockets

    Imports System.Text

    Module Module1

    Dim clientsList As New Hashtable

    Sub Main ( ) per

    Dim serverSocket As New TcpListener ( 8888 ) per

    Dim clientSocket Come TcpClient

    dim infiniteCounter As Integer

    dim contatore As Integer

    serverSocket.Start ( ) per

    msg ( " Chat Server è iniziato .... " ) per

    contatore = 0

    infiniteCounter = 0

    infiniteCounter = 1 To 2

    infiniteCounter = 1

    contatore + = 1

    clientSocket = serverSocket.AcceptTcpClient ( ) per

    Dim bytesFrom ( 10024 ) As Byte Dim

    dataFromClient As String Dim

    NetworkStream Come NetworkStream = _

    clientSocket.GetStream ( ) per

    networkStream.Read ( bytesFrom , 0 , CInt ( clientSocket.ReceiveBufferSize ) ) per

    dataFromClient = System.Text.Encoding.ASCII.GetString ( bytesFrom ) per

    dataFromClient = _

    dataFromClient.Substring ( 0 , dataFromClient.IndexOf ( " $ " ) ) per

    clientsList ( dataFromClient ) = clientSocket

    broadcast ( dataFromClient + " Iscritto " , dataFromClient , False ) per

    msg ( dataFromClient + " Iscritto chat " ) per

    Dim client As New handleClinet

    client.startClient ( clientSocket , dataFromClient , Sub

    Previous :

    next :
      Articoli Correlati
    ·Come modificare il carattere per TreeView in Vb.Net 
    ·Come faccio a leggere una riga di testo per le molte va…
    ·Come formattare un intero in valuta in VB.NET 
    ·Come fare gli URL andare in un Browser in Visual Basic 
    ·Come fare una scatola di visualizzazione di testo Come …
    ·Come scrivere un file batch per copiare un file 
    ·Come convertire manualmente FoxPro per VB6 
    ·Come cercare nel Registro di sistema in VB6 
    ·Come per inserire, aggiornare e Delete in VB.NET 
    ·Nozioni di base di Visual Basic 
      Articoli in evidenza
    ·Come inserire numeri interi in ordine crescente utilizz…
    ·Come nascondere un file di estensione PHP 
    ·Come accedere alle colonne di DataSet 
    ·Che cosa è l' inizializzatore statico in Java 
    ·Come ottenere la successiva stringa di input da in Java…
    ·Java Tutorial sul metodo casuale 
    ·Come utilizzare Apache Felix 
    ·Come confrontare le versioni dei file con VBS 
    ·Come al sovraccarico di un puntatore in C + + 
    ·Progetti Mega in Java 
    Copyright © Conoscenza Informatica http://it.wingwit.com