1 VB入门学习笔记
Caption:设置图表名称
2 VB中常见的对象:窗体和控件
属性: 对象有什么
方法: 可以做什么
2.1 对象的分类
-预定义对象: VB设计好的对象,我们可以直接拿来使用。如 VB中自带的按钮和控件等
-自定义对象: 我们自己定义的对象
创建对象的步骤:添加对象->设置属性->为该对象创建一个事件(方法)
对于属性设置的方法: 一般属性 复杂属性
一般属性的选择:
在VB中对颜色的设置:&HBBGGRR& 含义是:
&…&: 在两个&符号中设置颜色,
BB:表示蓝色
GG:表示绿色
RR:表示红色
2.2 通过backcolor编写一个程序
例子:在窗体上添加三个按钮,按钮名称分别为红色、绿色、蓝色;单击按钮,将窗体背景设置成其名称提示的颜色
对象的命名规则:
对象名 = 前缀 + 自定义名称(cmd_B)
双击按钮控件有如下代码:
Private Sub cmd_B_Click(Index As Integer)
End Sub
Sub: 是VB默认添加的事件过程,该过程不会返回任何值。
cmd_B_Click:过程的名称以控件的名加下划线加触发的事件(鼠标点击事件)
实现过程:
Private Sub cmd_B_Click(Index As Integer)
Form1.BackColor = &HFFC0C0
End Sub
Private Sub cmd_G_Click(Index As Integer)
Form1.BackColor = &H80FF80
End Sub
Private Sub cmd_R_Click(Index As Integer)
Form1.BackColor = &HFF&
End Sub
解释:
Form1:对象的名称。
BackColor:对象的属性
&HFF&: 对象的属性值(这里指的是按钮控件所在表单的颜色发生改变成为红色)
记忆:对象.属性 = 属性值
2.3 窗体属性
2.3.1 窗体边框: BorderStyle 设置对象边框样式
可选属性值有:
0- None: 没有边框
1- Fixed Single: 固定单边框 {大小不任意改变,只能最大化以及最小化的窗口}
2- Sizable: 可调节使用任意大小的窗口
3- Fixed Dialog: 固定对话框,不能最大及最小化
4- Fixed ToolWindow: windows工具窗口,不能改变尺寸
5- Sizable ToolWindow: windows工具窗口,可以改变尺寸
width: 设置宽度多少缇(1像素等于15缇)
Height:设置高度
Top: 设置窗体左上角距离顶端的距离
Left:设置窗体距离左边距离
Visible: 设置可见不可见 False表示不可见
MaxButton: False 不使用最大化按钮 true 使用最大化按钮
MinButton: False 不使用最小化按钮 true 使用最小化按钮
使用最大化按钮,最小化按钮:
不使用最大化,最小化按钮:
可以看出来此时在登录对话框右边已经没有了最小化窗口,和最大化窗口的按钮了。
2.3.2 整合案例:
有一个登录框,这个登录框是固定,不可拉伸变化的,当用户点击登录的时候,登录框消失。
步骤如下:
1 创建一个Form窗体,窗体中的框命名为登录框
点击工程->右键点击添加->点击添加窗体
2 点击打开
3 在右边属性窗口中把caption的数值修改为“登录框”,名称仍然为Form1不修改
4 然后双击按钮,输入代码
Private Sub Command1_Click()
Form1.Visible = False
End Sub
5 运行
2.3.2 窗体事件1
Load: 当窗体载入的时候发生的事情
Click:单击
dbClick:双击
在VB中注释是使用一个单引号来表示的
例如: ’ Form1.Width = Form1.Width + 3000 这个时候VB在执行代码的时候,不会去走这行代码的逻辑的
例子: 当程序运行的时候,会显示5000缇;当用户点击的时候,会显示欢迎用户’zebra‘;当用户双击的时候会显示用户退出
代码如下:
Private Sub Form_DblClick()
Form1.Print "用户退出"
End Sub
Private Sub Form_click()
Form1.Print "欢迎用户zebra"
End Sub
Private Sub Form_Load()
Form1.Width = 5000
End Sub
2.3.3 窗体事件2
不常用的窗体事件
Unload(卸载): 从当前的内存中清除一个窗体,在清除窗体的同时来执行规定的代码
Paint(绘画):当前窗体改变的时候,把窗体变化的属性显示出来,跟监视类似
Activate(活动): 当前窗口活跃的时候显示逻辑
Deactivate(非活动):当前窗口不活跃的时候显示的逻辑
此处代码的意思是:当程序运行的时候,同时显示两个窗口,当窗口一活跃的时候是白色的背景,不活跃的时候是黑色的背景
Private Sub Form_Activate()
Form1.BackColor = &HFFFFFF
End Sub
Private Sub Form_Deactivate()
Form1.BackColor = &H0&
End Sub
Private Sub Form_Load()
Form2.Visible = True
End Sub
Private Sub Form_Paint()
Form1.Print Form1.Width
End Sub
Private Sub Form_Unload(Cancel As Integer)
Form2.Visible = True
End Sub