VB6.0快速入门与精通(含100例)(2)

名 As 变量类型”的方法，一般在程序中使用的到的变量都应该有变量声明，如上例中的a、b、i分别被定义为整型和字符串型变量，VB中的变量类型有以下几种：

数据类型 说明

Byte 二进制数 Boolean 真假值 Integer 整数 Long 长整型 Single 实数

Double 双精度型 Currency 货币

Date 日期和时间 Object 对象 String 字符串 Variant 可变类型

控制结构和循环结构是程序设计中常见的两种结构。

计算机在运行程序的时候，执行语句的顺序是从上向下的。 有些简单程序可以只用单向流程来编写，但稍微复杂的程序就要靠控制语句来控制程序执行的流程。控制结构主要有两种，分支结构和循环结构。 分支结构：分支结构事实上是一种选择，在不同的条件下选择执行不同的程序段。实现分支结构的语句有很多，最常用的是if??then??else??。例如：

??

if 条件 then {程序段一} else

{程序段二} end if ??

如果条件满足了，电脑将执行程序段一中的语句，然后跳过程序段二，执行下面的语句。如果条件不满足，电脑将跳过程序段一种的语句，执行程序段二，然后继续执行下面的语句。

循环结构：循环结构就是让电脑反复的执行某一程序段落干次。 用Do??Loop可以循环重复执行一语句块，且重复次数不定。 在已知循环次数的条件下，用For??next可以反复执行统一语句块。 以上两种结构你可以参照图中所示的代码，仔细体会一下，今天就讲这么多了，下节我们就要进入实例式的控件学习。

简单的文本框TEXTBOX的例子 文本框控件（TextBox)是VB中最常用的控件。它是显示和输入文本的容器，相当于一个文字编辑器，提供了所有基本的文字处理功能，例如文本的编辑等。在下面这个小程序中，我们能看到文本框控件（TextBox)的最基本的属性。

为了学习方便，提供的源码已经作了详细的中文注释，看看源码框中的代码：

Option Explicit'--------------------------------------' TextBox的常用属性的例子'--------------------------------------' 洪恩在线 求知无限'--------------------------------------'------名称-------------作用------------' CmdClear 清除文本框内容按钮' TextAll 文本框

这个例子的两个窗体界面如下：

主窗体窗体（FormBack）

我们首先新建一个标准的EXE工程。添加两个窗体，并把TextBox、Button、Label控件放置在窗体上。各文本框的名称如下表：

文本框名称 会员编号文本框 密码文本框 姓名文本框 名称属性 TextID TextPassWord TextName 文本框名称 电子邮件文本框 个人介绍文本框 会员信息文本框 名称属性 TextMail TextResume TextAll

在属性窗口中将TextPassWord的PassWordChar属性设为*；TextResume的Multiline属性设为

Ture,ScrollBars属性设为2 -Vertical；TextAll文本框的Multiline属性设为为Ture, ScrollBars属性设为2 -Vertical，Appearance属性设为为0 - Flat。

下一步我们为FormTxtBox窗体中“确定”(CmdOK)和“清除”(CmdClear)按钮的Click事件中添加相应的程序。 其中：

TextID.Text = \是把会员编号文本框中的内容清空，其它语句与此类似。 FormBack.TextAll.Text = LblID.Caption & \

该语句设置FormBack窗体中TextAll文本框的文本。vbNewLine是换行显示标志。“ _”是续行标志，当语句一行写不下时使用此标志，但要注意：前面要加空格。

代码写好之后，我们就可以保存工程，然后按“Ctrl+F5”键，测试检验一下我们的程序了。

简单的列表框ListBox的例子

列表框（ListBox）控件表示一个选项清单，用户可能用鼠标选择其中一个或者几个选项。

列表框的特点是：列表框中的项目是通过程序插入到其中的，用户无法向清单中输入数据，当选择其中的项目，并在用户单击一个按钮或者执行某个操作时，由应用程序完成对指定项目的具体操作。下面这个例子充分说明了列表框的这个特点，并介绍了列表框（ListBox）的常用属性。 为了学习方便，提供的源码已经作了详细的中文注释，看看源码框中的代码：

Option Explicit'--------------------------------------' 简单的列表框ListBox的例子'--------------------------------------' 洪恩在线 求知无限'--------------------------------------'------名称-------------作用------------' List1、List2 列表框' LefttoRightCmd 移动所选项目到另一个列表框（

这个例子包含一个窗体，窗体中有两个列表框（List1、List2）和八个按钮，界面如下：

窗体（FormListBox）

我们首先新建一个标准的EXE工程，添加一个窗体，并把列表框和按钮控件添加到窗体上。各按钮控件的名称如下表： 按钮名称 删除所选项目（左） 增加新项目（左） 名称属性 List1movecmd List1addcmd 按钮名称 删除所选项目（右） 增加新项目（右） 名称属性 List2movecmd List2addcmd 清除弄表（左） 右箭头 List1clearcmd lefttorightcmd 清除列表（右） 左箭头 List2clearcmd Righttoleftcmd List1列表框 Sorted属性设为“False” ' List2列表框 Sorted属性设为“True” ' MultiSelect属性设置为2 ' 即List2控件中的项目总是排序的

在属性窗口中，将List1列表框 Sorted属性设为“False”；List2列表框 Sorted属性设为“True”，MultiSelect属性设

置为2，即List2控件中的项目总是排序的。 下一步我们为各控件添加相应的程序。 其中：

List1.AddItem \是将“China”添加到列表框中。

List1.ListIndex 返回的是列表框List1中当前选择项目的索引号码。 List1.ListCount 返回的是列表框List1中项目总数。

List1.ListCount - 1 返回列表框List1中最后一个项目的索引号。 List1.Selected() 返回的是一个项目的选择状态，返回的是布尔值。

代码写好之后，我们就可以保存工程，然后按“Ctrl+F5”键，测试检验一下我们的程序了。在这个小程序中，包含了列表框中的一般常用属性和方法。

CommomDialog使用的例子

CommonDialog控件是常用的一个控件，它为我们提供了打开、另存为、字体、颜色、打印、帮助等几种类型的标准对话框，本例演示了所有这些类型的对话框的使用方法。 为了学习方便，提供的源码已经作了详细的中文注释，看看源码框中的代码：

'-------------------------------------------' 通用对话框使用方法全解'-------------------------------------------' 洪恩在线 求知无限'-------------------------------------------'------名称-----------------作用-------------' CdlTest 通用对话框' CmdOpen “打开”对话框按钮' CmdSave “另存为”对话框按钮

这个例子包含一个窗体，窗体中有两个列表框（List1、List2）和八个按钮，界面如下：

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库VB6.0快速入门与精通(含100例)(2)在线全文阅读。