VB学习笔记

本文介绍了VB入门学习的内容,包括窗体和控件等预定义对象,属性的设置,如颜色用十六进制(&HBBGGRR&)表示,以及如何通过Backcolor属性改变窗体背景色。文章还详细讲解了不同窗体边框样式设置,并通过实例展示了如何在按钮点击事件中改变窗体背景。此外,讨论了窗体的Load、Click、DblClick等事件处理及其在实际编程中的应用。
摘要由CSDN通过智能技术生成

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
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值