vsvb编程实例.docx
- 文档编号:2929798
- 上传时间:2022-11-16
- 格式:DOCX
- 页数:17
- 大小:150.61KB
vsvb编程实例.docx
《vsvb编程实例.docx》由会员分享,可在线阅读,更多相关《vsvb编程实例.docx(17页珍藏版)》请在冰豆网上搜索。
vsvb编程实例
VS2008--VB编程实例
VS2008——VB编程实例(入门教程)
1.VB(VisualBasic)的发展
微软公司在1991年推出了建立在Window开发平台基础上的开发工具——。
随着Window操作平台的不断完善,微软公司也相继推出了VisualBasic2.0、和,这些版本主要用于在环境中的16位计算机上开发应用程序。
1997年微软公司推出了VisualBasic5.0可以在Window9x或者WindowNT环境中32位计算机上开发应用程序。
1998年又推出,它的功能更加完善。
1.关键字:
关键字是指系统使用的具有特定含义的字符。
常用的关键字有:
Dim、Private,Sub,Public,End,If,Else,Form,Me,Single,As,Integer,Unload,Do,While,MessageBox,For,Next等。
2.标识符:
标识符是指编写代码时定义的名称。
在VB中所有的常量、变量、模块、函数、类、对象及其属性都有各自的名称,这些名称就是标识符。
例如:
工程1:
一个工程的标识符。
Form1:
一个窗体的标识符。
Class1:
一个类模块的标识符。
Module1:
一个模块的标识符。
数据类型
类型名称
存储空间
变长字符型
String
10字节加字符串长度
定长字符型
String
字符串长度
整数型
Integer
2字节
长整型
Long
4字节
单精度型(双精度型)
Single(Double)
4字节(8字节)
字节型
Byte
1字节
布尔型
Boolean
2字节
日期型
Date
8字节
对象型
Object
4字节
变体型
Variant
按需分配
4.常用数据类型:
(String)
PublicClassForm1
PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
DimstrAAsString
strA="Helloworld"
Label1.Text=strA
EndSub
EndClass
上面代码是在VS2008-VB类里建立了Window窗体应用程序,并在窗体上添加一个标签控件(Label1),用关键字Dim声名一个字符型变量strA并赋值“Helloworld”,再把它赋给标签(Label1)。
图1、执行结果
数值型可分为5种,Integer,Long,Single,Double,Byte。
PublicClassForm1
PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
DimItAsInteger,ltAsLong,stAsSingle,dtAsDouble,btAsByte
It=123
lt=12345678
bt=9
TextBox1.Text=It
TextBox2.Text=lt
TextBox3.Text=st
TextBox4.Text=dt
TextBox5.Text=bt
EndSub
EndClass
上面代码是对5种数值型数据声名和赋值并在窗体里显示出来(在窗体里添加5个文本框[TextBox]控件)。
4.3布尔型:
又称逻辑类型。
变量值只是True/False,Yes/No,On/Off等。
PublicClassForm1
PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
Label1.Text="欢迎参加到VB学习队伍中来!
"
Label2.Visible=False
Button1.Text="Yes"
Button2.Text="No"
EndSub
PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)Handles
led=True
Label2.Visible=True
Label2.Text="我很喜欢VB语言编程"
EndSub
PrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)Handles
Label1.Enabled=False
Label2.Visible=True
Label2.Text="我对它不感兴趣"
EndSub
EndClass
上面代码是在VS2008-VB类中建立Window窗体应用程序项目,并在窗体中添加2个标签控件(Label1,Label2)和2个按钮控件(Button1,Button2)并添加了2个按钮的单击事件。
在窗体触发连接事件中把Label2的可视属性设置为假(False[布尔型])………
图3、执行结果图4、按Yes键结果
图5、按No键结果
PublicClassForm1
PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
DimmydateAsDate
mydate=#1/1/2015#
Me.Visible=False
MsgBox(mydate)
Me.Close()
EndSub
EndClass
上面代码是声明日期型变量,并赋值和用信息框显示它。
图6、显示日期
5.记录类型:
用户自定义类型也称记录类型。
PublicStructureMy_data
DimnameAsString
DimxhAsString
DimxbAsString
DimscoreAsString
EndStructure
PublicClassForm1
PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
DimmtAsMy_data
mt.name="张大山"
mt.xb="男"
mt.xh="201403001"
mt.score="优"
Me.Visible=False
MsgBox("姓名:
"&mt.name&Chr(10)&"性别:
"&mt.xb&Chr(10)&_
"学号:
"&mt.xh&Chr(10)&"成绩:
"&mt.score)
Me.Close()
EndSub
EndClass
上面代码显示了记录类型的定义和显示过程。
图7、显示记录类型
上面用的是结构体记录类型,下面的代码用类(方法)实现记录类型。
PublicClassForm1
ClassMy_class
DimlxAsInteger
DimlyAsInteger
DimrxAsInteger
DimryAsInteger
Subsetlx(ByValvalAsInteger)
lx=val
EndSub
Subsetly(ByValvalAsInteger)
ly=val
EndSub
Subsetrx(ByValvalAsInteger)
rx=val
EndSub
Subsetry(ByValvalAsInteger)
ry=val
EndSub
Functiongetdata()
getdata=(rx-lx)*(ry-ly)
EndFunction
EndClass
PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsrgs)HandlesMyBase.Load
DimmtAsMy_class
mt=NewMy_class
mt.setlx(10)
mt.setly(10)
mt.setrx(150)
mt.setry(200)
EndSub
EndClass
在窗体中添加标签控件(Label1)用来显示类(方法)计算结果。
图8、显示类(方法)记录类型
PublicClassForm1
Enummy_color
m_rod=190
m_green=90
m_blue=165
EndEnum
PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
Label1.Text="My_color"
Label2.Text="m_rod"
Label3.Text="m_green"
Label4.Text="m_blue"
EndSub
EndClass
图9、显示枚举类型数据
变量相当于一个容器,它对应着计算机内存的存储单元,因此它可以保存数据。
7.1.变量命名规则:
(1)变量只能由英文、汉字、数字及下划线组成。
(2)变量名必须由英文字母或汉字开头,最后一个符号可以是数据类型声明符,如Dima%。
(3)变量名长度可达255个字符,有效字符为40个。
(4)VB中的关键字不能作为变量名。
(5)不能在变量名中出现标点符号、空格或者嵌入!
、@、#、$、%、&等字符。
(6)在变量有效的范围内不能用同名命名变量。
(7)变量名不区分大小写。
(1)显式声明变量:
使用声明语句声明变量。
DimmydataAsInteger
Privatem_pAsString
Publicm_colorAsByte
StaticitLenghtAsInteger
(2)隐式声明变量:
不声明直接使用变量。
a=153
itWidth=35
一个变量被声明后,只在声明它的区域内有效。
例如在一个过程内声明的变量,只在该过程内有效;一个在模块的通用声明声明的变量,只在该模块内的所有过程中有效;用Public语句声明的变量,不仅对于同一模块内的所有过程有效,甚至对于整个应用程序的所有过程也都有效。
8、常量的声明
当程序中需要重复使用一个其值始终不发生改变的量时,可用#Const语句来声明常量。
#Const
9、运算符
在VB中有4种运
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vsvb 编程 实例