VB语言基础重要知识点16

本节知识涉及案例

打字后需要能停下来

我们在每次考试中最最重要的是文件保存！文件保存不好，意味着将对自己的成果带来重大损失。在文件保存的时候，我们最为容易产生保存错误的是工程文件的保存。当项目进行移植以后，我们再次打开工程文件的时候，会发现没有与form窗体文件关联好，这是重大的保存失误。

那么，如何检验工程文件是否保存成功？

其实方法很简单，只要把VB软件关掉， 然后在项目中打开vbp工程文件，如果此时显示窗体正常才是正确的保存。

1.事件

在每一次软件开发过程，发现有大部分同学在制作软件的过程中，还是有很多同学对于学习过的事件还不是很好理解运用。

窗体启动事件最最基础和重要的：

form_load这个sub过程。

举例：

Private Sub Form_Load()

'这里通常写的是初始化的一些配置。

End Sub

2.符号

还有一个重要的符号，在开发过程中肯定多次运用到等于号这个重要的符号。

举例等于号在这里的作用：

Form1.Caption = "电视机"

作用：赋值。

赋值的过程：就是把值给一个变量。

写法：

变量=值

实际上就是把右侧的值赋给左侧的自定义变量。

程序运行过程中，我们可以对某个量重新赋值的就是变量。

3.控件

载入图片的控件，我们在进行项目移植以后，有的同学会发现自己的图片在界面中消失了。这是什么原因呢？我们该如何解决？

image控件在载入图片之前，一定要先把图片复制到项目目录下面，否则，容易在将项目移植到另一台电脑的时候会发生图片失踪的情况。

4.重要属性

backstyle 设置背景风格。

transparent表示透明。

5.重要函数

字符串长度获取函数len函数。

使用格式：

len(字符串) 结果会返回字符串的长度。

6.重要的跳出

exit sub表示退出事件过程，执行完这条代码以后，这条代码后面的代码就不被执行，因为已经退出了sub

7.密码控件

如何设置密码？

使用textbox控件，设置属性passwordchar的值为"*"即可实现。

8.下拉控件

如何将下拉列表添加一项？

使用combobox控件的additem属性就可以添加一项。

qq登录界面题目部分源码：

Dim a As IntegerPrivate Sub Command1_Click()Form2.ShowEnd Sub
Private Sub Form_Load()Combo1.AddItem "22887651"End Sub
Private Sub Text1_Change()
Text1.PasswordChar = "*"End Sub

自动打字案例，打完后需要停下来。

案例源码：

Dim s As StringDim a As Integer
Private Sub Form_Load()Form1.Caption = "电视机"s = "我们全是宇宙的帅哥~！！！"a = 1
End Sub
Private Sub Timer1_Timer()
If a > Len(s) Then    Timer1.Enabled = False    Exit SubEnd If
Label1.Caption = Left(s, a)a = a + 1Label2.Caption = aEnd Sub