visual程序设计全版vbnet第5课_第1页
visual程序设计全版vbnet第5课_第2页
visual程序设计全版vbnet第5课_第3页
visual程序设计全版vbnet第5课_第4页
visual程序设计全版vbnet第5课_第5页
已阅读5页，还剩7页未读， 继续免费阅读

付费下载

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1Visual

Basic.NET

程序设计（5）

授课教师：柳青

电 话：67703852

办公室：学院楼B418

E-mail：2上周回顾改写“分数”菜单，当分数大于100或者小于0时出现如下对话框小Bug的修改3Visual

Basic.NET程序设计第五课SelectCase语句、状态栏Select

Case

语句（多分支结构）Select

Case

变量或表达式Case

表达式列表1语句块1Case

表达式列表2语句块2..[Case <表达式列表n><语句块n>]

[Case

Else<语句块n+1>]End

Select表达式列表与变量或表达式的类型必须相同表达式列表：表达式（如：”A”）一组用逗号分隔的值（如：2,4,6）表达式1

To

表达式2（如：90

To

100）Is

关系运算符表达式（如：Is

>=70）5多分支举例Select

Case

xCase

is

<

1y=5Case1y=1Case2To7y=2Case8，9y=3CaseElsey=4End

Select5

x<11，

x=12，

2≤x≤73，

8≤x≤94，

x>9X为整型变量y=已知坐标点(x，y)，判断其落在哪个象限代码一If

x>0

And

y>0

ThenMsgBox("在第一象限")ElseIf

x<0

And

y>0

ThenMsgBox("在第二象限")ElseIf

x<0

And

y<0

ThenMsgBox("在第三象限")ElseIf

x>0

And

y<0

ThenMsgBox("在第四象限")End

If代码二Select

Case

x,yCase

x>0

And

y>0

MsgBox(“在第一象限”)Case

x

<

0

And

y

>

0MsgBox(“在第二象限”)Case

x<0

And

y<0MsgBox(“在第三象限”)Case

x>0

And

y<0MsgBox(“在第四象限”)End

Select代码二错误：Select

Case

后不能出现多个变量；Case后不能出现变量及有关运算符。示例在“其它”中增加“判断字符”菜单，根据输入的一个字符判断该字符是字母字符、数字字符还是其它字符示例（续）增加”Select

Case判断字符”按钮，在该按钮的Click事件中用

Select

case语句实现“判断字符”菜单的功能状态栏分三栏初始宽度:120130

131选中某个菜单

菜单项控制状态栏是否显示请注意：name不同，程序做相应改变练习出现的错误和相关算法P285.1P287.6P289.3练习完成示例程序改进：对于“分数”菜单，参照样张当输入非数字时不出现任何结果对于“退出”菜单，参照样张弹出对话框增加”Select

Case分数”按钮，在该按钮的Click事件中用Selectcase语句实现分数菜单的功能（注意，只是在判

人人文库> 全部分类> 教育资料 > 课件下载

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论