VB神童教程：轻松入门Visual Basic

需积分: 9 47 浏览量更新于2024-07-26 收藏 1.17MB PDF 举报

"《跟我来学VB》是一本针对初学者设计的VB编程教程，旨在帮助读者轻松入门Visual Basic，这是一种由微软公司推出的易于学习且功能强大的编程语言。该教程的作者理解初学者在面对繁琐代码时可能遇到的困难，因此采用了不同于传统教程的教学方式。教程的核心理念是将理论与实践相结合，以直观和实例化的方式引导读者。它不从VB的历史和发展背景开始，而是直接进入实战，让学员通过编写简单的应用程序来熟悉基本操作，如编程环境设置、数据类型、变量和常量的使用等。这样做有助于激发学生的兴趣，降低学习门槛，使学习过程更加生动有趣。本书特别关注VB6.0这一版本，因为它是当时最为普及的VB版本，适合大多数初学者入手。第一章就以一个实际的项目——“跟我来学VB神童教程”为引导，带领读者编写第一个程序，以此建立起基础的编程概念。《VB神童教程》强调的是一种寓教于乐的学习方法，通过循序渐进的方式，确保学员逐步掌握VB的基础知识和技能。无论你是希望了解Windows系统背后的实现原理，还是想要开发自己的应用程序，这本书都能提供一个实用且友好的学习平台，帮助你成长为一名出色的VB开发者，尽管可能无法达到比尔·盖茨那样的成就，但足以开启编程世界的大门。"

Lengol@163.com

第 8 页共 42 页

表这个按钮的触发事件。

以此类推，

Private Sub LblShow_DbClick () 也代表一个过

程， LblShow 是个标签， DbClick 是双击事件。

另外，

Private

意为

“ 私有

”

，表明这个事件过程的类

型；

此外还有 Public 即 “ 公有 ” 事件。

Sub 表明这个过程是 “ 子程序

”

，若干个 “ 子程序 ” 共

同组成最终的应用程序。

() 里面是用来装参数的，关于参数，我们以后讲述，如

果没有参数， () 里面为空。

四、答案区：

第一题：

第一个按钮的点击事件：

Private Sub CmdChange1_Click()

LblShow.BorderStyle = 1

End Sub

第二个按钮的点击事件：

Private Sub CmdChange2_Click()

LblShow.BorderStyle = 0

End Sub

第二题：

按钮 1 ：

Private Sub Cmd1_Click()

LblShow.FontName = " 隶书 "

End Sub

按钮 2 ：

Private Sub Cmd2_Click()

LblShow.FontSize = 13

End Sub

按钮 3 ：

Private Sub Cmd3_Click()

LblShow.FontBold = True

End Sub

第三题：

按钮 1 ：

Private Sub Cmd1_Click()

LblShow.Visible = False

End Sub

按钮 2 ：

Private Sub Cmd2_Click()

LblShow.Visible = True

End Sub

vb 神童教程第二章第二节

神童教程第二章第二节

神童教程第二章第二节 ——

——

—— TextBox

TextBox

TextBox 控件

控件

在 Visual Basic 操作界面中， TextBox （文本框）控

件所代表的图标如图一：

图一

TextBox 控件主要用来显示文本或用来输入文本，如

Windows 登陆时的 “ 口令

”

窗口，或者记事本的整个编

辑区域。

双击工具箱中的文本框控件或者单击文本控件，然后用

鼠标在 VB 的工作区域拖拉，就可以创建文本框了。

如图二：

图二

文本框控件的默认名称为

TextX

（ X 为 1

、

，等

等），

命名规则为 TxtX （ X 为用户自定义的名字，如

TxtShow 、 TxtFont 、 TxtColor ，等等）

一、文本框控件的主要属性：

1 、 Text （文本）属性：

本控件最重要的属性，用来显示文本框中的文本内容，

可以在界面设置时指定，如图三：

图三

也可以在程序中动态修改，程序代码规则：

文本框控件名 .Text = " 欲显示的文本内容 "

如要在一个名为 TxtFont 的文本框控件中显示 “ 隶书

”

字样，那么输入代码：

TxtFont.Text = " 隶书 "

习题一：创建一个文本框（ TxtContent ）用来显示文本

；

按钮一（

Cmd1

），点击时文本框内容变为

“ 跟我来学 VB

Lengol@163.com

第 9 页共 42 页

神童教程

”

；按钮二（ Cmd2 ），点击时文本框内容清空

（也就是没有内容）。

答案：见答案区。

2 、 SelText （选中文本）属性：

本属性返回或设置当前所选文本的字符串，如果没有选

中的字符，那么返回值为空字符串即 "" 。

请注意，本属性的结果是个返回值，或为空，或为选中

的文本。

一般来说，选中文本属性跟文件复制、剪切等剪贴板

（在

VB 中，剪贴板用 Clipboard 表示）操作有关，如要将

文本框选中的文本拷贝到剪贴板上：

Clipboard.SetText 文本框名称

.SelText

（注意，本行没有

表示赋值的等号。）

要将剪贴板上的文本粘贴到文本框内：

文本框名称 .SelText = Clipboard.GetText （注意，本行有

表示赋值的等号。）

例：一个文本框（ TxtContent

），按钮一（

CmdCopy

）

用

于复制文本框中的选中文本；按钮二（ CmdPaste ）用于

将剪贴板上的内容粘贴到文本框内。

按钮一：

Private Sub CmdCopy_Click()

Clipboard.SetText TxtContent.SelText

End Sub

按钮二：

Private Sub CmdPaste_Click()

TxtContent.SelText = Clipboard.GetText

End Sub

3 、 SelStart 与 SelLength 属性：

SelStart ，选中文本的起始位置，返回的是选中文本的

第一个字符的位置。

SelLength ，选中文本的长度，返回的是选中文本的字

符串个数。例如：文本框 TxtContent

中有内容如下：

跟我一起学习 VB 神童教程

假设选中 “ 一起学习 ” 四个字，那么， SelStart 为 3

，

SelLength 为 4 。

4 、 MaxLength （最大长度）属性：

本属性限制了文本框中可以输入字符个数的最大限度，

默认为 0 ，表示在文本框所能容纳的字符数之内没有

限制，文本框所能容纳的字符个数是 64K ，如果超过

这个范围，则应该用其他控件来代替文本框控件。

这跟 Windows 中用记事本打开文件一样，当文件过大

，

系统会自动调用写字板来打开文件，而不是用记事本。

文本框控件 MaxLength 属性既可以在界面设置过程中

予以指定，如图四：

图四

也可以在设计时予以改变，代码如下：

文本框控件名 .Maxlength = X （ X 为阿拉伯数字，如 1 0

、

20 、 57

，等等）。

5 、 MultiLine （多行）属性：

本属性决定了文本框是否可以显示或输入多行文本，当

值为 True ，文本框可以容纳多行文本；当值为 False

，

文本框则只能容纳单行文本。

本属性只能在界面设置时指定，程序运行时不能加以改

变。如图五：

图五

6 、 PasswordChar （密码）属性：

本属性主要用来作为口令功能进行使用。例如，若希望

在密码框中显示星号，则可在 “ 属性 ” 窗口中将

PasswordChar 属性指定为 “ * ” 。这时，无论用户输

入什么字符，文本框中都显示星号。如图六：

图六

在 VB 中， PasswordChar 属性的默认符号是星号，但

你也可以指定为其他符号。但请注意，如果文本框控件

剩余41页未读，继续阅读

ou6691085123

粉丝: 0
资源: 1

VB神童教程：轻松入门Visual Basic

VB神童教程：跟我来学VB

VB神童教程：跟我来学VB(打印版)

VB教程：跟我来学VB

神童教程：跟我来学VB

VB神童教程：跟我来学VB 打印版

跟我学VB—VB_第一章_程序

vb高级编程教程和初学VB之跟我学习VB教程 汇总

跟我学VB—VB无解问题与API的解决方案

编程高手之路—跟我学VB—VB 第一章 程序

跟我学VB之三抽奖小程序.zip

最新资源

vb高级编程教程和初学VB之跟我学习VB教程汇总

编程高手之路—跟我学VB—VB 第一章程序