Visual Basic 学习.doc

精品文档目录第一章VB编程基础第一节 基本概念Visual Basic是微软公司推出的Basic语言编程工具，它比标准Basic语言增加了许多功能。它支持面对对象的编程，由于它是为Window这样的图形用户界面的操作系统开发的，所以它使用事件驱动的方式控制程序流程。 VisualBasic新概念：一、 VisualBasic术语 设计时：设计时是指在VB环境中建立应用程序时的时间。 运行时：运行时是指在应用程序运行期间，用户与应用程序进行交互的时间。通常我们在设计时初始化窗体和控件的属性，在运行时响应窗体和控件的事件修改它们的属性或调用它们的方法。 对象：将数据和处理该数据的过程（函数和子程序）打包在一起而生成的新的数据类型称之为对象。在VisualBasic中，所有窗体和控件都是对象。要访问对象的属性和方法，必须在对象和属性方法之间加入一个句点。例 Label1.Caption=VB学习系统Text1.SetFocus 属性：对象中的数据。 方法：对象中的过程。 窗体：窗体是可用作定制应用程序界面的窗口，或用作从用户处收集信息的对话框。你可向窗体增加控件、图形或图片来创建你的应用程序界面。窗体可单独存在，也可是多文档界(MDI)中的一个文档，即一个子窗体。 控件：控件是用户操作对象的图形表示，以便向应用程序提供信息。例如：按钮、列表框或编辑框等。有的控件没有图形表示。如：计时器、WinSocket等。 事件（Event）：事件是指窗体或控件识别的活动。事件发生在用户与应用程序交互时。如：单击控件、键盘输入、移动鼠标等。也有部分事件由系统产生，不需要用户输入。如：计时器事件。 事件驱动程序设计：当程序是事件驱动的时，应编写执行来响应由用户或系统激活的事件的代码。与过程程序设计不同，后者的程序起始于代码的第一行，并遵循定义好的路径调用所需的过程。事件驱动设计是图形用户界面的本质，即：由用户控制而代码做出响应。 二、 VB项目文件包括在VisualBasic应用程序开发中包括的所有的窗体、代码模块和定制控件的一个文件列表，以及在开发中选择的环境选项。 顶点项目由下列文件组成： 文件类型 扩展名 项目文件 *.vbp 窗体文件 *.frm 模块文件 *.bas 定制控件 *.ocx 类模块 *.cls 资源文件 *.res第二节 常量与变量一、VisualBasic数据类型 数据类型举例字节型56布尔型True False整型5367长整型4364574单精度型4362.34双精度型4652.65735745货币型$234.34日期型4/7/2000对象型Label1字符串型My homepage变体型任意值二、变量的声明Dim var As TypePublic var As TypePrivate var As Type其中： Public 定义公有变量Dim、Private 定义私有变量 三、Option Explicit 关键字在VisualBasic中用户可以不声明而直接使用变量，但容易产生错误。可以使用Option Explicit关键字强制声明变量，必需先声明再引用。Option Explicit关键字放在窗体或模块的通用声明(GenneralDeclarations)处。也可以通过设置将Option Explicit自动加到每个模块中。 四、变量的作用域局部(Local)：在过程级定义的变量，仅在声明它的过程中可见。 模块/窗体(Modudule/Form)：在模块或窗体级声明的变量，在声明它的模块或窗体中的所有过程中可见。 公有(Public)：在模块或窗体级声明的变量，在所有项目的任何过程中都可见。 五、Static 关键字普通的局部变量在过程结束后被释放，在下次执行过程时从新初始化为0。用Static声明的局部变量在过程结束后不被释放，仍保留变量的值。例：Sub P()Static I As IntegerI=I+1MsgBox A= & IEnd Sub 六、常量常量是程序中不发生变化的值。它和变量一样有三种作用域。它的定义语法如下：PublicConst conAs Type=expressionPrivateConst conAs Type=expression 内为可以缺省项七、数据类型转换VisualBasic自动完成某些数据转换，为提高运行速度，我们通常使用CType() 函数显示地转换。 VisualBasic转换函数包括： CBool：转换为Boolean类型 CByte：转换为Byte类型 CCur ：转换为Currency类型 CDate：转换为Date类型 CDbl ：转换为Double类型 CInt ：转换为Integer类型 CLng ：转换为Long类型 CSng ：转换为Single类型 CStr ：转换为String类型 CVar ：转换为Variant类型 CVErr：转换为Error类型第三节 基本语句一、赋值语句在VB中赋值语句有两种：1：对普通变量的赋值。变量表达式例 Dim a As Integer a=100*20 2：对对象变量的赋值。Set 变量表达式例Dim ex As DataBaseSet ex=OpenDataBase(File.mdb)二、If 语句If语句用于测试条件，根据测试结果执行不同的操作。格式如下：If 表达式 Then. Else.End If或：If 表达式 Then 语句1:语句2: .例If Password=123456 ThenOK=TrueElseOk=FalseEnd if三、Select Case 语句Select Case 语句用于对某一表达式的值进行多种处理。格式如下：Select Case 表达式Case 值1：.Case 值2：.Case Else.End Select四、For 循环语句For.Next用于指定次数的循环。格式有两种：1、普通的数字变量：For var=start To endStep step.Next var2、集合中的对象：For Each obj In objs.Next obj其中：obj 是对象变量。 Objs 是集合变量。 五、Do 循环语句根据某一条件来决定是否循环时我们使用Do循环。Do 循环有两种：1、当型循环（先判断后执行）Do While|Until 条件.Loop 2、直按型循环（先执行后判断）Do.Loop While|Until 条件注：While 当条件为 True 时循环。 Until 当条件为 True 时退出。六、With 语句当我们经常使用某一对象的属性、方法时，就可以使用。With语句。With语句可以使代码更简捷，并能提高运行速度。格式如下：With 对象变量.End With例With Text1 .SelStart=0 .SeiLength=Len(.Text) .SetFocusEnd With相当于：Text1.SelStart=0Text1.SeiLength=Len(Text1.Text)Text1.SetFocus第四节 子程序与函数一、子程序 执行单一活动的代码块。事件是特殊的子程序。定义方法如下：PublicSub 子程序名（参数表）.End SubPrivateSub 子程序名（参数表）.End Sub参数表格式如下：var1 As Type1,var2 As Type2,. 二、函数 与子程序的区别是它通过函数名返回值。定义方法如下：PublicFunction 函数名（参数表）As 类型.函数名值End FunctionPrivateFunction 函数名（参数表）As 类型.函数名值End Function注：在VB中一条语句在一行中写不完，使用下划线加空格连接。 三、属性过程 在ActiveX中详细介绍。第二章 用户界面设计第一节 窗体一、Form 属性Name 属性：用于在属性窗口定义对象的名称，以便在程序中引用。它只能在设计时赋值。对于任何一个可以在属性窗口设置其属性的对象必须设置该属性的值，VB自动为每一个对象给定一个缺省值。 Caption 属性：属性用于获取、设置窗体的标题。 BorderStyle 属性：用于设置窗体的边框。它常用的有两个值：普通窗体（2-Sizable）：可修改窗体的尺寸。对话框（3-FixedDialog）：不能修改窗体的尺寸。Top,Left,Width,Height 属性：它们分别表示该窗体在父窗体或屏幕的位置（Top,Left）和大小（Width,Height）。 ScaleTop,ScaleLeft,ScaleWidth,ScaleHeight 属性：它们分别表示该窗体工作区的位置和大小。 二、Form 方法1、显示一个窗体。FormX.ShowvbModal没有vbModeless表示以非模式方式显示一个窗体。带有vbModal表示以模式方式显示一个窗体。2、隐藏一个窗体。FormX.Hide隐藏窗体并不把窗体从内存中卸载，要卸载窗体需要使用语句：Unload FormX或：UnLoad Me (Me 表示当前窗体) 三、Form 事件1、Load 事件：当窗体加载到内存时发生Private Sub Form_Load(). 常把初始化代码放在此处End Sub2、Resize 事件：当窗体改变其尺寸时发生Private Sub Form_Resize(). 常在此处修改其它控件的尺寸End Sub3、Unload 事件: 当窗体从内存卸载时发生 Private Sub Form_Unload(Cancel As Integer) . 在窗体卸载前做一些扫尾工作。 如关闭文件、提示存盘等 End Sub 参数： Cancel 表示：是否放弃卸载。带进来时0，表示可以卸载。在代码中将其0，表示放弃卸载。例: Private Sub Form_Unload(Cancel As Integer) If MsgBox(你想退出吗？, vbYesNo, 退出) = vbNo Then Cancel = True End If End Sub第二节 标签控件 Label 控件主要用于在窗体中显示提示信息，常与Text控件一起使用。属性 Caption 表示标签的内容。例: Label1.Caption = N&ame: 控件在窗体中显示Name:,&号跟的字母是快捷键字母，即当我们按下Alt+A时，Label1的Click事件将会发生。这种快捷键定义方法对于菜单和许多其它控件同样适用。 Font 表示控件的字体。 ForeColor 表示控件的当前颜色。 Enabled 表示控件是否使能。 =True 使能。 =False 禁止(控件显示为灰色)。 Visible 表示控件是否可见 =True 可见。 =False 不可见。 Top,Left,Width,Height 表示控件在窗体中的位置和尺寸。事件: Click 当点击或按下快捷键时发生，常用于使和它一起使用的Text控件获得输入交点。例: Private Sub Label1_Click() Text1.SetFocus End Sub第三节 文本控件Text控件接受用户的输入的字符串数据。 属性： Text 表示用户输入的内容。例: Label1.Caption = Text1.Text 将Text1控件接收用户输入的数据通过Label1控件显示出来。 SelStart 表示用户选中一段文字的起始位置。第一个字符位置为0。 SelLength 表示用户选中文字的长度。 SelText 表示用户选中文字的内容。 例：0123456789 这时：SelStart=5,SelLength=4,SelText=5678 MultiLine 表示是否是多行输入。 =True 是多行输入。 =False 不是多行输入(缺省) 。 ScrollBars 多行情况下是否需要滚动条。 =0 没有。 =1 有水平。 =2 有垂直。 =3 水平、垂直都有。 Password 表示口令字符。Text属性返回用户输入数据，屏幕上显示该字符。方法: SetFocus 使当前控件获得输入交点。事件: KeyPress 当在控件上按下按键时发生。 Private Sub Text1_KeyPress(KeyAscii As Integer) End Sub KeyAscii 表示用户按键的ASCII码，如果在事件中将它改为0，则认为没有按键。例: 编写只允许输入数字的Text控件。 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii Asc(9) Then KeyAscii = 0 End If End Sub Change 当控件内容改变时发生。 LostFoucus 当控件失去输入交点时发生。 GotFoucus 当控件获得输入交点时发生。 通常我们在Text控件获得输入交点时全选它的内容，方便用户直接修改数据。代码如下: Private Sub Text1_GotFocus() Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) End Sub第四节 按钮、框架一、CommandButton控件CommandButton控件接受用户的命令。 属性： Caption 表示按钮所显示的内容例：Command1.Caption=&OK 事件： Click 当点击或按下快捷键时发生。 二、Frame控件Frame控件主要用于为OptionButton控件分组。 属性： Caption 表示分组所提示的内容。例：Frame1.Caption=性别:Frame2.Caption=民族 第五节 单、复选框一、CheckBox控件CheckBox控件检查某个选项是否被选中。属性: Caption 表示检查框所提示的内容。例: Check1.Caption = Windows &98: Check2.Caption = Windows &NT Value 表示检查框是否被选中。 =0 未选中。 =1 选中。例: Check1.Value = 1: Check2.Value = 0事件: Click 当点击或按下快捷键时发生。二、OptionButton控件OptionButton控件检查一个选项是否被选中，它与CheckBox的区别是：CheckBox 是多选多项。OptionButton 是多选一项。 属性： Caption 表示检查框所提示的内容。例：Option1.Caption=男:Option2.Caption=女 Value 表示检查框是否被选中。=False 未选中。=True 选中。例：Option1.Value=False:Option2.Value=True 事件： Click 当点击或按下快捷键时发生。第六节 列表框和组合框一、ListBox控件ListBox控件用于在一组列表中选择其中的一项或多项。 属性： Text 表示当前操作项内容。 ListCount 表示当前列表框中总数据项数。 ListIndex 表示当前操作项下标，第1项0。 List(i) 表示第i项表项内容。 MultiSelect 表示是否允许多选择。 Selected(i) 表示第i项是否被选中。 SelCount 表示被选中的项数。 Sort 表示是否排序。方法: AddItem 向列表框增加一项数据。 ListX.AddItem(Item As String) RemoveItem 删除第i项 ListX.RemoveItem(i As Integer)事件: Click 当点击列表框中的一项数据时发生。二、ComboBox控件ComboBox控件与ListBox基本相同，它的优点在于占用的面积小，除了可以在选项中选择外还可以输入其它数据。它的缺点是不能多选择。 属性： Text 存放从选项中选择的数据或用户输入的数据。其它方法与事件和ListBox相同。第七节 图片控件和时钟控件 一、Image控件Image控件用于显示一张图片。 属性： Picture 存放图片的数据。 通常我们使用LoadPicture函数读入一张图片。例: ImageX.Picture = LoadPicture(C:1.bmp)注: LoadPicture支持Bmp、Jpg、Gif、等多种格式图片文件。 Stretch 显示图片的方式。 =True 以控件的尺寸显示图片。 =False 以图片的原尺寸显示图片。二、Timer控件Timer控件以固定间隔时间名触发它的Timer事件。 属性： Enabled 表示是否起动计时器。=True 启动。=False 关闭。 Intertval 表示触发Timer事件的间隔时间以毫秒为单位，即：10001秒。 事件： Timer当计时器计时到间隔时间时发生。第三章 错误处理VisualBasic运行错误：某些错误只在程序在运行时发生，而且是不可避免的。例如：当我们写盘时磁盘写保护，或当我们打开文件时忘记插入软盘等。普通情况Windows操作系统会弹出一个对话框并中止程序运行。那么有没有办法可以捕获到错误，而程序自己处理错误呢？答案是有的。在VisualBasic中可以使用 On Error 语句捕获运行错误，而不会使程序因发生异常错误而退出。 一、创建错误处理器 在VisualBasic中，我们使用On Error语句创建错误处理程序。它有两种方法： 1. On Error Goto 标号 当发生错误时跳转到指定的标号。 2. On Error Resume Next 当发生错误时忽略错误，继续执行下一条语句。二、关闭错误处理器错误处理要跟踪代码是否发生运行错误，很明显会降低程序运行速度，所以我们只对可能会产生错误的部分代码进行错误跟踪，而在根本不可能产生错误的代码前关闭错误处理器。要关闭错误处理器使用：On Error Goto 0 三、错误对象Err 错误对象Err对象包含最近所发生的一次错误的信息。属性: Number 错误ID号。 Description 错误描述字符串。 Source 产生错误的应用程序，主要用于OLE编程。 例如：当我们通过OLE访问Microsoft Excel时产生了错误，这时： Err.Source = Excel.Application方法: Clear 清除错误。 Raise 引发错误。 我们使用Raise方法人为地产生一个错误，把错误传递给父过程或测试你自己编写得错误处理程序。四、退出错误处理程序当我们使用On Error Goto标号来创建一个错误处理器时，那么该标号所指的程序我们称之为错误处理程序。当我们在错误处理程序中处理完序数据后就需要返回。返回的方法有三种： 1.Resume 返回到出错的语句从新执行。 2.Rusume Next 返回到出错的语句的下一条语句继续执行。 3.Resume 标号 返回到指定标号的语句继续执行。 五、调用链中的错误处理如果一个过程没有错误处理器而又发生了错误，该错误就会传递给父过程，如果父过程也没有错误处理器，则继续向下传递，直到找到为止。如果始终未找到，则出现系统错误提示。第四章 数据库编程第一节 使用数据控件访问数据库一、VisualBasic访问数据库在VisualBasic中通过数据访问控件或数据访问对象（DAO）可以访问下列数据库： 1.Jet数据库，即Microsoft Access 2.ISAM数据库。如：dBase、FoxPro等。 3.ODBC数据库。 凡是遵循ODBC标准的客户/服务器数据库。 如：Microsoft SQL Server、Oracle二、数据控件 属性： Connect属性 指定打开的数据库类型，并且包括参数，如用户和口令等。例如: 打开Access数据库 (缺省)：Connect = Access 打开FoxPro2.5数据库：Connect = FoxPro 2.5 DatabaseName属性 确定数据控件访问哪一个数据库。注: 对于多表数据库它为具体的数据库文件名。例: Access数据库：DatabaseName = C:demo.mdb 对于单表数据库它为具体的数据库文件所在的目录，而具体文件名放在RocordSouce属性中。 例：访问FoxPro数据库文件 C:FOXSample.DBF：DatabaseName = C:fox RecordSource = sample 不带文件扩展名 RecordSource属性 确定数据控件的记录集，即：所要访问的数据内容。它可以是一个表名、存储查询名或一条SQL语句。 例: 访问RYK表所有数据。 RecordSource = RYK 访问RYK表中1982年以前出生的数据。 RecordSource = Select * from RYK where Birthday#1/1/1982# 注：当我们在运行时修改了该属性后，需要调用Refresh方法刷新记录集。 方法：Refresh方法 当我们在运行时修改了RecordSource属性后，需要调用该方法刷新记录集。 UpdateRecord方法 将绑定在数据控件上的控件的数据写入数据库中，即：当我们修改了数据后调用该方法确认修改。 CancelUpdate方法 将数据库中数据从新读到绑定在数据控件上的控件中，即：当我们修改了数据后调用该方法放弃修改。（详见绑定控件） Validate事件 当我们移动记录集记录指针时发生。 例如： 我们将记录集记录指针从记录A移动到记录B时，当产生Validate事件时，记录指针仍在记录A上。 Sub XXXX_Validate(Action As Integer, Save As Integer)其中: Action 指出如何产生了该事件，如：移动、增加、查询等。 Save 表示是否保存已修改的数据。 当我们修改了绑定在数据控件的数据，以没有调用UpdateRecord，而要移动指针时，Save=True。如果在事件中令Save=False，则放弃修改。 例: Sub XXXX_Validate(Action As Integer, Save As Integer) If Save Theni = MsgBox(Data changed,Save?, vbYesNo) If i = vbNo Then Save = False End If End Sub事件 Reposition事件 当我们移动记录集记录指针时发生。 例如：我们将记录集记录指针从记录A移动到记录B时，当产生Reposition事件时，记录指针已移到记录B上。 通常我们在该事件中显示当前的指针位置。例: Sub XXXX_Reposition() XXXX.Caption = XXXX.Recordset.AbsolutePosition + 1 End Sub三、记录集（RecordSet）记录集是记录控件所引用得整个记录的集合。 属性: BOF、EOF属性 BOF属性 当记录集记录指针指向起始之前返回True。 EOF属性 当记录集记录指针指向结尾返回True。 AbsloutePositon属性 返回当前记录集记录指针，第一条记录为0，只读属性。 BookMark属性 String类型。返回或设置当前记录集记录指针的书签，可读写。注: 程序中使用BookMark属性重定位记录指针，而不能使用AbsloutePositon属性。 NoMatch属性 当我们使用Find方法查询时如果未找到则返回True。常与BookMark属性同时使用。 例：查找Name字段中第一个姓李的人。 Dim S As String With XXXX.Recordset S = .BookMark .FindFirst Name Like 李* If .NoMatch Then MsgBox 数据未找到 .BookMark = S End If End With AddNew方法 向记录集增加一条新记录。 Delete方法 从记录集中将当前记录删除。在删除后常使用MoveNext方法移动指针。 例: With XXXX.Recordset .Delete .MoveNext If .EOF Then .MoveLast End With MoveFirst、MoveLast、MovePrevious、MoveNext方法 MoveFirst方法 将记录集指针移动到第一条记录上。 MoveLast方法 将记录集指针移动到最后一条记录上。 MovePrevious方法 将记录集指针移动到前一条记录上。 MoveNext方法 将记录集指针移动到下一条记录上。 FindFirst、FindLast、FindPrevious、FindNext FindFirst方法 在记录集中查询附合条件的第一条记录。 FindLast方法 在记录集中查询附合条件的最后一条记录。 FindPrevious方法 在记录集中查询附合条件的前一条记录。 FindNext方法 在记录集中查询附合条件的下一条记录。四、绑定控件 我们可以将普通控件绑定在数据控件上，来完成自动地显示、更新记录集的数据。 常用的可绑定的控件有： Label、Text、CheckBox、Image等。 通过设置这些控件的DataSource和DataField属性来完成绑定。 DataSource 属性表示绑定到哪一个数据控件上，程序中我们可能使用多个数据控件。 DataField 属性表示绑定到记录集的哪一个记录上。第二节 使用DAO访问数据库一、DBEngineDBEngine对象相当于Jet数据库引擎，不需要创建该对象。 方法： CreateWorkspace创建一个工作区对象。例：Dim ws As WorkspaceSet ws=DbEngine.CreateWorkspace(SpName,UserID,Password,SpType) 其中： SpName 工作区名称 String。 UserID 用户名 String。 Password 口令 String。 SpType 工作区类型。=dbUseJet Jet工作区。=dbUseODBC ODBC工作区。 二、WorkspaceWorkspace对象为用户定义一个会话，通过与之关联的用户名和口令建立一个安全级别。当不需要安全级别时可使用缺省的工作区DBEngine.Workspace(0)。 方法： OpenDatebase 打开一个数据库。 Close 关闭当前工作区。 BeginTrans 启动一个事物。 CommitTrans 提交当前事物。 RollBack 回滚当前事物。 三、打开数据库我们调用Workspace的OpenDatabase方法打开一个数据库。例：Dim db As DataBaseSet db=OpenDatabase(dbname,exc,readonly,source) 其中： dbname 数据库文件名。（对于单表数据库为路径） exc=True 表示排它地打开数据库。=False 表示可读写地打开数据库。 readonly=True 表示只读地打开数据库。=False 表示可读写地打开数据库。 source 数据源名，用于指定打开的数据库类型。例如：FoxPro 2.5、ODBC;DSN=. 四、创建记录集我们DataBase使用对象的OpenRecordSet方法打开一个记录集。例：Dim rs As RecordSetSet rs=db.OpenRecordSet(source,type) 其中： source 指定记录集的内容，它可以是一个表名、查询名或SQL语句。 type 创建记录集的类型。=dbOpenTable表型记录集。=dbOpenDynaset动态型记录集。=dbOpenSnapshot快照型记录集。五、事物处理事物是对数据库所做的一系列改变。我们完成一项任务往往需要多步操作，而当其中一步出错后，以前的所有操作应取消，这时我们必需使用事物。首先启动事物，开始执行所有操作，当所有操作全部结束时，我们就提交事物。当发生错误时，我们就回滚事物。例：On Error Goto LEBeginTransdb.ExecuteSQL语句1db.ExecuteSQL语句2.CommitTrans.LE:RollBack 六、访问ODBC数据库要访问ODBC数据库需要两步。首先需要在Windows95/98或WindowsNT的控件面板中设置ODBC数据源名（DSN）。然后在OpenDatabase方法的Source参数中使用该数据源名。例：访问Microsoft SQL Server：Source=ODBC;DSN=MyDSN;UID=sa;PWD=xx;DataBase=pubs第五章 多媒体编程第一节 MCI控件MCI控件是通过多媒体控件接口（MCI）对多媒体设备进行控制。 属性： Mode 表示当前多媒体设备的状态。 Filename 表示当前设备打开的多媒体文件名。 Command 存放对设备的命令。 DeviceType 当前设备的设备类型，MCI控件可根据文件扩展名自动设置设备类型。例：*.AVI DeviceType=AVIVideo*.WAV DeviceType=WaveAudio第二节 MCIWnd控件MCIWnd控件在MCI控件基础上更好地提供了对视频的支持。使用户在指定窗体内可以任意地放大或缩小播放窗口。除了MCI控件的几个属性外，重要的还有： 、属性： Volume 音量大小，缺省=1000。 Speed 播放速度，缺省=1000，正常速度。 Repead 是否循环播放，=True循环播放。第三节 MCI命令在程序中我们可以通过点击控件按钮来控制播放。但有时我们需要自己控制播放，如：当程序起动时自动播放一段音乐，或提供更漂亮的界面来控制等。那么我们可以使用MCI命令控制多媒体设备。 命令： Open 打开设备命令。 Close 关闭设备命令。 Play 播放命令。 Stop 停止命令。 Pause 暂停命令。 Seek 定位命令。 Record 记录命令。命令后可带参数: Notify 表示命令结束后发生事件通知用户。 Wait 表示程序必需在MCI命令执行完后再继续向下执行。 使用MCI命令非常简单，只需将MCI命令字符串赋给Command属性即可。 例: XXXX.FileName = C:sample.avi XXXX.Command = Open XXXX.Command = Play Wait XXXX.Command = Stop XXXX.Command = Close第六章 TCP/IP编程第一节 创建socket多客户服务器一、 设定端口号、开始侦听 我们可以使用控件数组创建多客户服务器，达到多个