Meong's Story Storage

Hubungkan kabel seri DB 9 twisted pada kedua komputer. Buka VB 6. Buat interface berupa form Log In untuk mempermudah penggunaan aplikasi. Buat perintah untuk melakukan log in chat. Hasil perintah yang saya buat:   Buat form kedua sebagai media chatting. Program yang saya gunakan: Private Sub Command1_Click() If MSComm1.PortOpen = False Then     MSComm1.PortOpen = True End If     MSComm1.Output = Form1.Text1.Text + Form2.Text1.Text     List1.AddItem (Form1.Text1.Text + Form2.Text1.Text)     Text1.Text = "" End Sub Private Sub Command2_Click()     List1.Clear End Sub Private Sub Command3_Click()     Form2.Hide     Form1.Show     Form1.Text1.Text = "Let's Join!" End Sub Private Sub Command4_Click()     If MsgBox("Are you sure? If you're exit, the chat data will be erased", vbCritical + vbYesNo, "Exit") = vbYes Then      End     End If End Sub Private Sub Form_Load() If MSComm1