VisualBasic高手语法整理篇..doc

下载文档 降价啦

6
0
约1.2万字
约 12页
2017-01-12 发布于重庆
举报
版权申诉
保障服务

VisualBasic高手语法整理篇..doc

1、本文档共12页，可阅读全部内容。
2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。

VisualBasic高手语法整理篇.

1 分支结构条件表达式、变量、常数都可以（1） If 条件 Then 语句块 End If （2） If 条件 Then 语句块1 Else 语句块2 End If （3） If 条件1 Then 语句块1 ElseIf 条件2 Then 语句块2 ElseIf 条件N Then 语句块N Else 语句块N+1 End If 嵌套If语句-------（实际很少用）（4） If 条件1 Then If 条件2 Then 语句块1-1 Else 语句块1-2 End If 其他语句 Else 语句块2 End If （1）Select Case 变量名或表达式 Case 表达式1 比较具体值是否相等语句块1 相等则执行本语句块 Case 表达式2 (1) Case 2,4,6,8,10 语句块2 (2) Case 1 To 10 Case 表达式N (3) Case Is 20 语句块N (4) Case ab , ef Case Else (5) Case ab To ef 语句块N+1 (6) Case 2,4,1 To 10,Is 20,ab To ef End Select 要点 1，Select 语句可以嵌套 2，只有当 If ElseIf 语句中每个表达式都相同时才能用Select语句代替例：Sub 多重判断() 见VBA57页 If Range(“A1”) 0 Then Range(“B1”) = “小于零” ElseIf Range(“A1”) = 0 Then Range(“B1”) = “等于零” ElseIf Range(“A1”) 0 Then Range(“B1”) = “大于零” End If End Sub Sub 多重判断() Select Case Range(“A1”) Case Is 0 Range(“B1”) = “小于零” Case Is = 0 Range(“B1”) = “等于零” Case Is 0 Range(“B1”) = “大于零” End Select End Sub （2） IIF (条件，条件为真的值，条件为假的值）若条件为真，则取第一个值（条件为真的值）否则条件为假，则取第二个值（条件为假的值） 2 循环结构（1） For 计数