form1.frm

用vb编的网络聊天程序

VERSION 5.00
Object = "{34754227-0620-43ED-B218-C60387EA5BB9}#6.0#0"; "wswinsock.ocx"
Begin VB.Form Form1 
   Caption         =   "可视电话"
   ClientHeight    =   5685
   ClientLeft      =   2670
   ClientTop       =   2070
   ClientWidth     =   3000
   Icon            =   "Form1.frx":0000
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   ScaleHeight     =   5685
   ScaleWidth      =   3000
   Begin VB.Frame Frame4 
      BorderStyle     =   0  'None
      Caption         =   "Frame4"
      Height          =   2532
      Left            =   2232
      TabIndex        =   24
      Top             =   72
      Width           =   660
      Begin VB.CommandButton Command3 
         Caption         =   "&Dir"
         Height          =   444
         Left            =   72
         Picture         =   "Form1.frx":030A
         Style           =   1  'Graphical
         TabIndex        =   25
         Top             =   1080
         Width           =   552
      End
      Begin VB.CommandButton Command1 
         Caption         =   "&拨号"
         Height          =   444
         Left            =   72
         Picture         =   "Form1.frx":0434
         Style           =   1  'Graphical
         TabIndex        =   27
         Top             =   0
         Width           =   552
      End
      Begin VB.CommandButton Command2 
         Caption         =   "&挂机"
         Height          =   444
         Left            =   72
         Picture         =   "Form1.frx":055E
         Style           =   1  'Graphical
         TabIndex        =   26
         Top             =   540
         Width           =   552
      End
   End
   Begin VB.Frame Frame1 
      BorderStyle     =   0  'None
      Height          =   2388
      Left            =   72
      TabIndex        =   1
      Top             =   396
      Width           =   2352
      Begin VB.CommandButton Command8 
         Caption         =   "&视频"
         Height          =   444
         Left            =   144
         Picture         =   "Form1.frx":0688
         Style           =   1  'Graphical
         TabIndex        =   17
         Top             =   1836
         Width           =   552
      End
      Begin VB.CommandButton Command9 
         Caption         =   "&PiP"
         Height          =   444
         Left            =   828
         Picture         =   "Form1.frx":07B2
         Style           =   1  'Graphical
         TabIndex        =   16
         Top             =   1836
         Width           =   552
      End
      Begin VB.CommandButton Command10 
         Caption         =   "&音频"
         Height          =   444
         Left            =   1512
         Picture         =   "Form1.frx":08DC
         Style           =   1  'Graphical
         TabIndex        =   15
         Top             =   1836
         Width           =   552
      End
      Begin VB.PictureBox Picture1 
         Height          =   1776
         Left            =   0
         ScaleHeight     =   1710
         ScaleWidth      =   2115
         TabIndex        =   2
         Top             =   0
         Width           =   2172
         Begin AVPhone3.VidRnd VidRnd2 
            Height          =   624
            Left            =   1296
            Top             =   1080
            Width           =   768
            _ExtentX        =   1349
            _ExtentY        =   1111
            Control