- 1、本文档共76页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
2. 给变量赋值 使用“=”(该符号有时称作“赋值运算符”)给变量赋值,如下例所示。 a = 42 这行代码有一个值42,把它存储在先前声明的名为a的变量中。 3. 使用变量 【例2-6】 已知圆半径,显示圆面积。 新建工程,在窗体Form1上添加一个命令按钮Command1,为它添加下列代码: Private Sub Command1_Click() Dim r As Single, s As Single 声明变量r,s r = 1.5 给变量r赋值 s = 3.14159 * r * r 使用r,计算圆面积,赋值给变量s Print s 在窗体上显示变量s的值 End Sub 给变量赋值时需要注意变量的数据类型,如果部分代码改为 Dim r As Integer r = 1.5 则可能会出现不是你预想的结果,因为变量r被声明为整数,而1.5是浮点数,不能在r中存放,系统将对1.5进行舍入转化为整数2后存入变量r中,从而失去了精度。 4. 变量的初始值 在程序中声明了变量后,变量将自动获取一个初始值,数值类型变量的初始值为0,变长字符串的初始值为空字符串(即),定长字符串用空格填充,逻辑性变量的初始值为False。 5. 强制变量声明 如果在程序中没有声明变量,但是又使用了这个变量,这是一种不好的习惯,所以变量一定要“先声明,后使用”。 为了能让Visual Basic检查出这种情况,可以选择菜单“工具|选项”,在出现的对话框中,选择“编辑器”选项卡,勾选“要求变量声明”,这样今后在打开新的代码代码窗口时,会在顶部自动添加语句“Option Explicit”, Visual Basic会检查代码中用到的变量是否经过声明。当然,你也可以自己在代码窗口顶部手工输入“Option Explicit”,起到一样的效果。 6. 实验设计一个程序,实现简单计算的功能,运行界面如图所示。 4.3 常用内部函数 Visual Basic提供有大量的内部函数,内部函数是Visual Basic中设置好的具有特定功能的函数,通常带有一个或几个参数,并返回一个返回值。通过使用内部函数,可以方便地完成各种复杂运算。 1. 转换函数 2.数学函数 3.日期函数 4.时间函数 5. 随机函数Rnd与随机数语句 (1)Rnd函数:得到一个0~1(不包含1)的随机数,它是一个单精度数值。 (2)Randomize语句:初始化随机函数发生器。 【例2-9】 新建窗体,为窗体的Click事件添加以下代码: Private Sub Form_Click() Print Rnd 在窗体上显示一个随机数 End Sub 运行程序,用鼠标单击窗体,就会显示出一个随机数,接着多单击窗体几次,显示出一系列没有规则的数值。 记住显示的这一系列数值,然后关闭程序,重新运行程序,再用鼠标多次单击窗体,发现显示出的数值与第一次完全相同。这表明当程序开始运行时,随机数发生器被重置为固定的初始状态。为了能使每次程序运行时产生的随机数序列不相同,可以这样修改上面的代码: Private Sub Form_Click() Randomize 初始化随机数发生器,产生新的随机数序列 Print Rnd End Sub 技巧:Rnd*10能产生0~10(不包含10)的随机数,如果要产生1~100的整数,可以用表达式Int(Rnd*100+1)来获取。如果要产生[a,b](其中a,b为整数,且ab)区间上的随机整数,可以采用表达式Int(Rnd*(b-a+1)+a)来实现。 6.字符串函数 (1)Len(x):返回字符串x的长度(字符个数)。如Len(学习Vb)返回 4。 (2)取子串函数: Left(x,n) :返回字符串x最左边n个字符所组成的字符串。 Right(x,n):返回字符串x最右边n个字符所组成的字符串。 Mid(x,m,n):返回字符串x的第m个字符开始的n个字符所组成的字符串。 如字符串s=abcdef,则Left(s,2)返回ab,Right(s,2)返回ef,Mid(s,2,3)返回bcd。 (3)去空格函数: LTrim(x):返回去掉字符串x左边空格后的字符串。 RTrim(x):返回去掉字符串x右边空格后的字符串。 Trim(x):返回去掉字符串x左右两边空格后的字符串 如字符串s= abc ,则LTrim(s)返回abc ,RTrim(s)返回 abc,Trim(s)返回abc。 (4)大小写转换函数: LCase(x):返回将字符串x中所有
您可能关注的文档
最近下载
- 第一章 2.2 水量平衡.ppt
- 《GB/T 19326-2022锻制支管座》.pdf
- 2022年11月陕西省从优秀村社区干部中考试录用200名乡镇街道机关公务员上岸冲刺卷I含答案详解版(3套).docx VIP
- 2020年银行业从业人员职业操守和行为准则.pdf VIP
- 转预备党员思想汇报【银行】.pdf VIP
- 【新教材】人教版(2024)七年级上册英语Unit 4 My Favourite Subject教案.docx
- 米厂恒温仓库工程设计方案.docx
- 2024年党校入党积极分子培训考试必考重点知识汇编(共160题).doc VIP
- 《世界经典神话与传说故事》 测试题及答案.pdf
- 智能制造设备安装与调试职业技能等级标准(2021年).pdf
文档评论(0)