Open " Form1.vb (design) " in Visual Basic . Fare clic su "Progetto" e selezionare " Aggiungi riferimento ". Scegliere " Messenger API Type Library " nella finestra risultante.
2
Copia il pulsante "Online" in Form1.vb (Design ) . Incollare il pulsante a forma di fare due file verticali di tre.
3
modificare il testo per il primo pulsante nella seconda colonna per il secondo pulsante "Occupato ", nel prima colonna di " via", il prossimo nel corso di " Out To Lunch ", l' ultimo pulsante nella prima colonna in "Invisibile " e il pulsante finale "Offline ".
4
Scroll fino a " Nome " e modificare il relativo pulsante di seguito: . btnBusy , btnAway , btnLunch , btnAppear e btnOffline
5
Evidenziare il pulsante "Online " e selezionare " Form1.vb ". Evidenziare tutto, dalla terza fila in giù a " End Class " e cancellare. Incolla " msn.MyStatus = MessengerAPI.MISTATUS.MISTATUS_Online " nella riga sotto " Private Sub ".
6
Click " Form1.vb (design) " e selezionare il pulsante " Occupato" . Torna alla Form1.vb . Inserire lo stesso codice come avete fatto per il pulsante "Online " , invece scambiando la parola " Occupato" per "Online ". Ripetere l'operazione per ogni pulsante , scambiando il nome dei pulsanti di conseguenza.
Programmazione © www.354353.com