一、简单If条件语句
使用在称之为分支结构的特殊语句块中的条件表达式控制了程序中哪些语句被执行以及什么样的执行次序执行。“If...Then”分支结构在程序中计算条件值,并根据条件值决定下一步执行的操作。最简单的“If...Then”分支结构可以只写在一行:
If Condition Then Statement[Else statement]
注意:“If...Then”分支结构用于给程序添加逻辑控制能力。这里,“Condition”是个条件表达式,“Statement”是条件有效的V isual Basic语句。例如:
If Score>=20 Then Label1.Text="Y ou Win!"是个使用了下述条件表达式的分支结构:Score>=20
根据这个表达式的值,程序决定是否把Label1对象的“Text”属性设置为“Y ou Win!”。如果“Score”变量的值大于等于20,Visual Basic设置该属性的值,否则,Visual Basic跳过这条赋值语句,然后执行事件过程中的下一行语句。这类比较运算的结果不是“True”就是“False”,条件表达式从来不会产生模棱两可的值。
二、If...Else语句
Visual Basic还支持另一种格式的“If...Then”分支结构,该结构中包含几个条件表达式,由多行语句组成,其中包含了重要关键字“ElseIf”、“Else”以及“End If”。
If Condition1 Then
Statements
ElseIf Condition2 Then
Statements
[其他ElseIf子句及其相应的执行语句]
Else
Statements
End If这个结构中,“Condition1”首先被计算。如果这个条件表达式的值为“True”,那么这个条件表达式下的语句被执行;如果第一个条件的值不是“True”,那么计算第二个表达式(Condition2)的值,如果第二个条件的值为“True”,那么这个条件表达式下的语句块被执行(如果要判断更多的条件,那么继续增加“ElseIf”子句及该子句下的语句块);如果所有条件表达式的值都不是“True”,那么执行“Else”子句下的语句块;最后,整个结构使用“End If”关键字结束。多行“If...Then”结构特别适合于分段计算问题,比如税费方面的计算。下面的代码展示了如何使用多行“If...Then”结构来确定递进税计算问题(收入和税率的对应关系取自美国国内收入服务1997年税率表):
If AdjustedIncome<=24650 Then
'15%税段
TaxDue=AdjustedIncome*0.15
ElseIf AdjustedIncome<=59750 Then
'28%税段
TaxDue=3697+((AdjustedIncome-24650)*0.28)
ElseIf AdjustedIncome<=124650 Then
'31%税段
TaxDue=13525+((AdjustedIncome-59750)*0.31)
ElseIf AdjustedIncome<=271050 Then
'36%税段
TaxDue=33644+((AdjustedIncome-124650)*0.36)
Else
'39.6%税段
TaxDue=86348+((AdjustedIncome-271050)*0.396)
End If注意:总是可以添加更多的“ElseIf”块到“If...Then”结构中去。但是,当每个“ElseIf”都将相同的表达式比作不同的数值时,这个结构编写起来很乏味。在这种情况下可以使用“Select Case”判定结构。
三、Select Case结构
Visual Basic还支持在程序中使用“Select Case”分支结构来控制语句的执行。“Select Case”结构与“If...Else”结构相似,但在处理依赖于某个关键变量或称作测试情况的分支时效率更高。并且,使用“Select Case”结构可以提高程序的可读性。“Select Case”结构的语法如下所示:
Select Case V ariable
Case V alue1
Statements
Case V alue2
Statements
Case V alue3
Statements
...
End Select“Select Case”结构以关键字“Select case”开始,以关键字“End Select”结束。“Select Case”结构中的“V ariable”可以是变量、属性或者是表达式,“V alue1”、“V alue2”,“V alue3”可以是数值、字符串或与要测试的其他情况相关的其他值,如果其中某个值与变量相匹配,那么该“Case”子句下的语句被执行,然后Visual Basic执行“End Select”语句后面的语句。“Select Case”结构中可以使用任意多个“Case”子句,“Case”子句中也可以包括多个“V alue”值,多个“V alue”值之间使用逗号分隔。
下面示例展示了程序中如何使用“Select Case”结构打印与某人年龄相关的信息。当“Age”变量与某个“Case”值匹配时,相应的信息显示在标签对象中。
Select Case Age
case 16
Label1.Text="Y ou can drive now!"
Case 18
Label1.Text="Y ou can vote now!"
Case 21
Label1.Text="Y ou can drink wine with your meals."
Case 65
Label1.Text="Time to retire and have fun!"
End Select注意:“Select Case”结构比功能等效的“If...Then”结构更清晰易读。“Select Case”结构还支持“Case Else”子句,该子句可用于当不满足所有“Case”条件时显示信息。下面是说明“Case Else”子句用法的一个示例:
Select Case Age
Case 16
Label1.Text="Y ou can drive now!"
Case 18
Label1.Text="Y ou can vote now!"
Case 21
Label1.Text="Y ou can drink wine with your meals."
Case 65
Label1.Text="Time to retire and have fun!"
Case Else
Label1.Text="Y ou're a great age!Enjoy it!"
End Select注意:“Select Case”结构每次都要在开始处计算表达式的值,而“If...Else”结构为每个“ElseIf”语句计算不同的表达式,只有在“If”语句和每个“ElseIf”语句计算相同的表达式时,才能使用“Select Case”结构替换“If...Else”结构。
本文来自编程入门网:www.bianceng/Programming/VB_NET/200705/1268.htm教你如何用WORD文档(2012-06-27 192246)转载▼
标签:杂谈
1. 问:WORD 里边怎样设置每页不同的页眉?如何使不同的章节显示的页眉不同?
答:分节,每节可以设置不同的页眉。文件――页面设置――版式――页眉和页脚――首页不同。
2. 问:请问word 中怎样让每一章用不同的页眉?怎么我现在只能用一个页眉,一改就全部改了?
答:在插入分隔符里,选插入分节符,可以选连续的那个,然后下一页改页眉前,按一下“同前”钮,再做的改动就不影响前面的了。简言之,分节符使得它们独立了。这个工具栏上的“同前”按钮就显示在工具栏上,不过是图标的形式,把光标移到上面就显示出”同前“两个字来。
3. 问:如何合并两个WORD 文档,不同的页眉需要先写两个文件,然后合并,如何做?答:页眉设置中,选择奇偶页不同与前不同等选项。
4. 问:WORD 编辑页眉设置,如何实现奇偶页不同比如:单页浙江大学学位论文,这一个容易设;双页:(每章标题),这一个有什么技巧啊?
答:插入节分隔符,与前节设置相同去掉,再设置奇偶页不同。
简单的vb程序代码5. 问:怎样使WORD 文档只有第一页没有页眉,页脚?
答:页面设置-页眉和页脚,选首页不同,然后选中首页页眉中的小箭头,格式-边框和底
纹,选择无,这个只要在“视图”――“页眉页脚”,其中的页面设置里,不要整个文档,就可以看到一个“同前”的标志,不选,前后的设置情况就不同了。
6. 问:如何从第三页起设置页眉?
答:在第二页末插入分节符,在第三页的页眉格式中去掉同前节,如果第一、二页还有页眉,把它设置成正文就可以了
●在新建文档中,菜单―视图―页脚―插入页码―页码格式―起始页码为0,确定;●菜单―文件―页面设置―版式―首页不同,确定;●将光标放到第一页末,菜单―文件―页面设置―版式―首页不同―应用于插入点之后,确定。第2 步与第三步差别在于第2 步应用于整篇文档,第3 步应用于插入点之后。这样,做两次首页不同以后,页码从第三页开始从1 编号,完成。
7. 问:WORD 页眉自动出现一根直线,请问怎么处理?
答:格式从“页眉”改为“清除格式”,就在“格式”快捷工具栏最左边;选中页眉文字和箭头,格式-边框和底纹-设置选无。
8. 问:页眉一般是---------,上面写上题目或者其它,想做的是把这根线变为双线,WORD 中修改页眉的那根线怎么改成双线的
答:按以下步骤操作去做:
●选中页眉的文字,包括最后面的箭头●格式-边框和底纹●选线性为双线的●在预览里,点击左下小方块,预览的图形会出现双线●确定▲上面和下面自己可以设置,点击在预览周围的四个小方块,页眉线就可以在不同的位置。
9. 问:Word 中的脚注如何删除?把正文相应的符号删除,内容可以删除,但最后那个格式还在,应该怎么办?
答:步骤如下:1、切换到普通视图,菜单中“视图”――“脚注”,这时最下方出现了尾注的编辑栏。2、在尾注的下拉菜单中选择“尾注分隔符”,这时那条短横线出现了,选中它,删除。3、再在下拉菜单中选择“尾注延续分隔符”,这是那条长横线出现了,选中它,删除。
4、切换回到页面视图。尾注和脚注应该都是一样的。
10. 问:Word 里面有没有自动断词得功能常常有得单词太长了,如果能设置下自动断词就好了
答:在工具―语言―断字―自动断字,勾上,word 还是很强大的。
11. 问:如何将word 文档里的繁体字改为简化字?
答:工具―语言―中文简繁转换。
12. 问:怎样微调WORD 表格线?WORD 表格上下竖线不能对齐,用鼠标拖动其中一条线,可是一拖就跑老远,想微调表格竖线让上下对齐,请问该怎么办?
答:选定上下两个单元格,然后指定其宽度就可以对齐了,再怎么拉都行pressAlt,打开绘图,其中有个调整坐标线,单击,将其中水平间距与垂直间距都调到最小值即可。打开绘图,然后在左下脚的绘图网格里设置,把水平和垂直间距设置得最小。
13. 问:怎样微调word 表格线?我的word 表格上下竖线不能对齐,用鼠标拖动其中一条线,可是一拖就跑老远,我想微调表格竖线让上下对齐,请问该怎么办?
答:可以如下操作:●按住ctl 键还是shift,你have a try●double click the line, try it )●打开绘图,设置一下网格(在左下角)。使水平和垂直都为最小,试一把!?●press Alt
14. 问:怎么把word 文档里已经有的分页符去掉?
答:先在工具――选项――视图――格式标记,选中全部,然后就能够看到分页符,delete 就ok了。
15. 问:Word 中下标的大小可以改的吗
答:格式―字体
16. 问:Word 里怎么自动生成目录啊
答:用“格式样式和格式”编辑文章中的小标题,然后插入-索引和目录
17. 问:Word 的文档结构图能否整个复制论文要写目录了,不想再照着文档结构图输入一遍,有办法复制粘贴过来吗?
答:可以自动生成的,插入索引目录。
18. 问:做目录的时候有什么办法时右边的页码对齐?比如:1.1 标题..........11.2 标题 (2)
答:画表格,然后把页码都放到一个格子里靠右或居中,然后让表格的线条消隐就可以了,打印出来就很整齐。
19. 问:怎样在word 中将所有大写字母转为小写?比如一句全大写的转为全小写的答:格式-更改大小写-小写
20. 问:在存盘的时候,出现了问题,症状如下:磁盘已满或打开文件过多,不能保存,另开新窗口重存也不管用。如何解决?