- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
基本数据类型是由Visual Basic 6.0提供给读者的数据类型,读者无须重新定义就可以直接用来声明变量或常量。 1.数值型数据类型 2.字符型数据类型 3.逻辑型数据类型 4.日期型数据类型 5.枚举型数据类型 变体型数据类型 【范例2-1】变长字符型和固定字符型的区别 01 Option Explicit 02 变长字符型与定长字符型的区别 03 Private Sub Form_Load() 04 Dim str1 As String * 5 定义定常字符串 05 Dim str2 As String 定义变长字符串 07 str1 = 123456 定常字符串赋值 08 str2 = 123456 变长字符串赋值 10 Print Chr(13) 输出空行 也可以直接使用Print 11 Print 定长字符型: + str1 + Chr(13) 输出结果 12 Print 变长字符型: + str2 13 End Sub 【范例2-2】 在数据库应用程序设计中,公司的职员是非常常见的一种客观实体。在进行程序设计时,必须对职员进行定义,然后才能让计算机进行处理。可是基本数据类型中并没有这样一种现成的数据类型供我们使用,那么就必须自己定义“职员”这样一种数据类型。 Private Type Employee 04 empName As String 职员姓名 05 empAge As Integer 职员年龄 06 empAddr As String 职员住址 07 End Type 【范例2-3】局部变量的生存周期 01 Private Sub cmdDisplay_Click() 02 Const dateRem As Date = #1/10/2008# 定义常量dateRem 03 cmdDisplay.Caption = dateRem 显示常量dateRem值 04 End Sub 05 06 Private Sub cmdError_Click() 07 cmdError.Caption = dateRem 使用dateRem 08 End Sub 【范例2-4】 01 普通局部变量与静态局部变量的区别 02 Private Sub cmdCount_Click() 03 Dim count1 As Integer 定义普通局部变量count1 04 Static count2 As Integer 定义静态局部变量count2 05 count1 = count1 + 1 当鼠标单击按钮计数时 06 count2 = count2 + 1 count1和count2都自行加一 07 lbCount1.Caption = 普通局部变量计数值: count1 显示普通变量的结果 08 lbCount2.Caption = 静态局部变量计数值: count2 显示静态变量结果 09 End Sub 运算符 Visual Basic 6.0中提供了很多运算符,主要包括算术运算符、字符串运算符、逻辑运算符和关系运算符4种。 【范例2-5】连接符“”和“+”的区别 01 字符连接演示 02 Private Sub Form_Load() 04 Print 100 + 100 连接字符串100与数值100 05 Print 100 + 100 连接字符串100与100 07 Print ABC 100 连接字符串ABC与数值100 08 Print ABC XYZ 连接字符串ABC与字符串XYZ 09 Print ABC + DEF 连接字符串ABC与字符串DEF 11 Print ABC + 100 错误连接方式 12 End Sub 【范例2-6】“Is”运算符的使用方法 01 Is运算符的演示 02 Private Sub Form_Load() 03 Dim boolResult As Boolean 定义布尔值变量 04 Dim cmdA As CommandButton 定义一个命令按钮对象 05 Set cmdA = Command1 c
文档评论(0)