Vb_程序的选择结构select_case结构PPT课件

合集下载

最新Vb_程序的选择结构select_case结构教学内容

最新Vb_程序的选择结构select_case结构教学内容
Case Is < 0: MsgBox "有两个共轭复根 "
End Select End If End Sub
内容小结
1.熟记select case语句书写结构,理解执行过程。 2. 注意select case 语句中表达式细节 3. Select case 语句应用环境,与if语句的转换
此课件下载可自行编辑修改,仅供参考! 感谢您的支持,我们努力做得更好! 谢谢!
Case 0: Picture1.Print "X1=X2="; -B / (2 * A)
Case Is > 0 X1 = (-B + Sqr(Delta)) / (2 * A) X2 = (-B - Sqr(Delta)) / (2 * A) Picture1.Print "X1="; X1, "X2="; X2
End Select
【例3】求一元二次方程ax2+bx+c=0的解 。
分析:
(1) 如果a=0;b=0,则方程无解,提示重新输入系数; b0,则 x=-c/b
(2) 如果a0; b2-4ac=0 ,则有两个相等的实根 b2-4ac>0, 则有两个不等的实根 b2-4ac<0, 则有两个共轭复根
Private Sub Command1_Click() A = Val(Text1.Text): B = Val(Text2.Text)
C = Val(Text3.Text): Picture1.Cls If A = 0 Then
If B = 0 Then MsgBox "系数为零,请重新输入"
Else X = -C / B: Picture1.Print "X="; X

VB列表选择控件.PPT课件

VB列表选择控件.PPT课件
第4章 列表选择控件
16.01.2021
-
第2章 编程基础知识
4.1 实训项目一 ListBox控件和CheckedListBox 控件的使用
4.2 实训项目二 ComboBox控件的 4.3 实训项目三 DomainUpDown控件和
NumericUpDown控件的使用 4.4 实训项目四 ListView控件的使用 4.5 实训项目五 TreeView控件的使用
ListBox控件和CheckedListBox控件的使用。
16.01.2021
-
1. 本实例所用到的主要控件——ListBox控件
属性 Items
说明 存放列表框中的选项集合
MultiColumn 设置该列表框是否允许多列显示
ColumnWidth 设置每一列的宽度
SelectionMode 设置一次可以选择多少列表项。有4个值,分别为(1) None:无法选择任何一项;(2)One:只能选择一项(默 认);(3)MultiSimple:可在列表中不连续点选多项: (4)MultiExtended:可以通过鼠标的拖动选择连续的项
16.01.2021
-
2. 本实例所用到的主要控件——CheckedListBox 控件
表4-3 CheckedListBoxt控件的特有属性和方法
项目名称
类别
说明
CheckOnClick SetItemChecked
属性 方法
设置当第一次选取列表项时是否马上打勾,当属 性值为True时表示单击马上打勾,当属性值为 False时则必须双击才能打勾
事件 双击控件时,触发该事件
SelectedItemChanged 事件 改变控件的选定项时,触发该事件

VB教程---选择结构

VB教程---选择结构

练习:
1.求闰年(能被4整除,不能被100整除的年,或者是能够被
400整除的年是闰年。)(用if双分支语句做)
Year=val(text1.text) If year mod 4 =0 and year mod 100 <> 0 or year mod 400 =0 then Msgbox (“是闰年!”) Else MsgBox (“这不是闰年!”) End If
If语句复合结构的一般形式
在Else块中嵌套If结构的形式
例:求a、b、c中三个实数的最大值、最小值。 a、b、c三值从三个文本框中输入,当单击命令按钮时将结果 显示 在窗体上
例:求a、b、c中三个实数的最大值、最小值。 a、b、c三值从三个文本框中输入,当单击命令按钮时将结果 显示在窗体上。
a<b
思考:下面形式是否正确?
If score >= 60 Then Print "及格" ElseIf score >= 80 Then Print "良" ElseIf score >= 90 Then Print “优" Else Print "不及格" End If
②根据下列公式求函数
1 x x 1 1 x 2 x2
二、分支结构—IF语句
1、IF条件判断语句(三种格式)
IF 条件 Then 语句块 End If IF 条件 Then 语句块1 Else 语句块2 End If IF 条件1 Then 语句块1 Elseif 条件2 Then 语句块2 Elseif 条件3 Then …… [Else] 语句块n End If
3、双分支程序示例
①求a,b中的较大数

VB-第5章-选择循环PPT课件

VB-第5章-选择循环PPT课件

If x>0 Then Print “x是正数”
说明:表达式一般为关系表达式、逻辑表达式,也可 以为算术表达式,非0为True,0为False;
演示
语句块可以是一句或多句,若用2)表示,则只能是 一句语句,若多句,语句间需用冒号分隔,而且必须 在一行上书写。
与其临1渊0羡鱼,不如退而结网。
举例
❖ 例:已知两个数x和y,比较它们的大 小,并交换,使得 x大于y:
Do While (i <= 10) ‘循环条件是:i<=10是执行循环体
sum = sum + i ‘对要求的结果累加运算
i=i+1
‘改变循环条件,目的为了跳出循环!
ห้องสมุดไป่ตู้
Loop
Print sum
与其临2渊2羡鱼,不如退而结网。
[ Else 语句块 n+1 ] End If
一、If-else语句
elseif elseif
elseif
1)不管有几个分支,程序执行了一个分支后,其余分支 不再执行; 2)ElseIf 不能写成Else If 3)当多分支中有多个表达式同时满足,则只执行第一个 与之匹配的语句块
与其临1渊2羡鱼,不如退而结网。
第五章 VB的基础结构
世界会向那些有目标和远见的人让路
复习:三种基本结构
基本算法结构
顺序结构
与其临渊2羡鱼,不如退而结网。
分支结构
基本算法结构
当型循环
与其临渊3羡鱼,不如退而结网。
直到型循环
本章内容
1
选择结构
2
循环结构
3
示例
与其临渊4羡鱼,不如退而结网。
第一节 选择结构

跟我学vb--第10课时_select_case语句

跟我学vb--第10课时_select_case语句

select case语句【学习目标】(一)在知识与技能方面1、掌握select case语句的格式、功能和执行过程。

2、理解表达式列表的3种形式(,和to与is)。

3、学会使用select case语句来实现选择控制结构,解决实际问题。

(二)在过程与方法方面1、初步掌握程序调试运行的方法。

2、初步掌握优化程序的方法(三)在情感态度与价值观方面1、经历计算机解决问题的过程,体验成功的快乐。

2、在老师的指导下,与同学共同探究问题,让学生体验自主学习、协助学习的乐趣。

【重点难点】1、select case语句格式2、表达式列表的3种形式3、用select case语句解决实际问题【教法学法】问题教学法、讲练结合法【学时】1学时【教学环境】网络电脑室引导学生分析上面程序存在的问题:1、第1个程序用了5个if语句且条件表达式太复杂,书写容易出错。

2、在第2个程序中,用了4个if语句来处理5种情况,同时用到了if语句的嵌套3、由于有if语句的嵌套及if语句过多,造成了程序可读性差,经常会出现“end if”配对错误或缺少“end if”。

那么如果我们再多一些情况,它的缺陷就会更加明显。

【教师引导】有没有更简单一点的语句来解决这个问题,尽量避免出现上面的错误?【引入】本节课的学习内容Select Case语句即可解决这种多情况的问题。

二、Select Case语句的格式Select Case语句是多分支语句,又称为多情况语句。

【教师展示】1、Select Case语句的格式功能:根据“测试表达式”的值,选择第一个符合条件的语句块执行。

2、说明:· · · “测试表达式”可以是数值型或字符型;· · · “测试表达式”和“表达式列表”的类型必须相同;· · · “表达式列表”形式有以下3种:3、表达式列表的3种形式【师生共同分析】(1)用逗号隔开的若干表达式如:判断10以内整数的奇偶性x=inputbox("输入一个整数")select case x case 1,3,5,7,9 if x=1 or x=3 or x=5 or x=7 or x=9 then print x; "这是奇数"end ifprint x; "这是奇数"case 2,4,6,8,10print x; "这是偶数"end select(2)表达式1 To 表达式2x=inputbox("输入一个整数")select case xcase 80 to 89print x; "该生成绩为良"case 70 to 79print x; "该生成绩为中"end select if x>=80 and x<90 then print x; "该生成绩为良" end if(3)Is 关系表达式x=inputbox("输入一个整数")select case xcase is>=90print x ; "该生成绩为优"case is>=80print x ; "该生成绩为良"case is<60print x ; "该生成绩为不及格"end select if x>=90 thenprint x ; "该生成绩为优"end ifif x<60 thenprint x ; "该生成绩为不及格" end if【学生练习】把刚才举例的“分数”问题用Select Case语句改写一下,然后请同学来展示一下自己的成果,同时比较一下自己与老师所写的程序有什么不同。

vb程序选择结构

vb程序选择结构

问题:计算所得税:输入工资。

如果工资少于2000,免收所得税。

如果工资≥2000,所得税为5%。

单击窗体,在窗体上显示工资及所得税的结果。

程序结构:输入、处理、输出。

程序框架:Private Sub Form_Click()分析:设立变量gz代表工资,sj代表所得税;输入工资用InputBox函数,并存入变量gz;输出工资、所得税用Print方法。

程序为:Private Sub Form_Click()Gz=InpueBox("请输入工资", "输入工资")End Sub“如果”、“那么”、“否则”如何实现呢?用程序的控制结构实现。

Vb程序设计选择结构实际上,“如果”、“否则”是程序的一种控制结构。

它的功能是根据条件“工资>=2000”是否成立,决定程序下一步的执行方向是“所得税=工资*0.05”还是“所得税=0”。

这种根据条件的不同结果,选择不同的分支的程序结构,称为“选择结构”或“分支结构”。

它属于程序的控制结构。

结构化程序设计的基本控制结构有3种:(1) 顺序结构:单线条、无分支、不重复、每个语句均有机会执行,且都仅执行一次。

这种结构功能最简单。

(2) 选择结构:即分支结构。

(3) 循环结构:重复执行某块程序若干次。

7.1 选择结构在VB中,选择结构用If语句实现,故选择结构也称If结构。

它有2种格式:单行结构、块结构。

一、单行If语句格式1:If 条件Then 语句1 Else 语句2功能:如果“条件”为True,执行语句1,否则执行语句2。

应用:(计算所得税)If gz>=2000 Then sj=gz*0.05 Else sj=0格式2:If 条件Then 语句1功能:如果“条件”为True,执行语句1,否则什么也不执行,直接执行下一个语句。

应用:(计算所得税)If gz>=2000 Then sj=gz*0.05“条件”:可以是关系表达式(单条件),也可以是逻辑表达式(复合条件)。

vb 选择结构程序设计PPT课件

vb 选择结构程序设计PPT课件
1) s1 + s2 + s3 + s4 + s5 >= 450 2) s1 >= 88 AND s2 >= 88 AND s3 >= 88 AND s4 >= 88 AND s5 >= 88 3) s1 >= 95 AND s2 >= 95 AND s3 >= 95 AND s4 >= 80 AND s5 >= 80
不等于
4 <> 5
值为:True
2. 关系表达式
关系表达式的格式为
〈表达式1〉〈关系运算符〉〈表达式2〉[〈关系运算符〉〈表达 式3〉…]
关系表达式的运算次序为:先分别求出关系运算符两侧 表达式的值,然后再把二者进行比较,二者的关系若与关 系运算符指示的一样,则关系运算的结果为真True,否则 为假False。
False False False
a Or b True True True False
Not a False False True True
Not由真变假,由假变真。And对两个布尔值进行比较, 如果两个值均为真,则结果为真,否则为假。Or对两个布 尔值进行比较,如果其中一个值为真,则结果为真,只有 两个值都为假时,结果才为假。运算布尔表达式时,先运 算关系表达式,再运算布尔表达式。
逻辑运算的运算规则
A B Not A A And B A or B A Xor B
T
T
F
T
T
F
T
F
F
F
T
T
F
T
T
F
T
T
F
F
T
F
F
F
按二进制进行的逻辑运算规则

选择结构Select Case语句

选择结构Select Case语句
作业情况
未上交:xxxx
典型问题
1、If、end if未成对存在 2、代码语句写错位置
第三节 选择结构Select Case语句
知识迁移
为了判断学生成绩(百分制)的等级,现在要求制作一个VB程序来进行判断: 当分数在90-100范围,输出A;当分数在80-89范围,输出B;当分数在70-79 范围,输出C;当分数在60-69范围,输出D,否则,输出F。
If 的 嵌 套
开始ห้องสมุดไป่ตู้
If score >= 90 Then
Print Else
"输A"入score
If score >= 80 Then
E是lsePrinstc"oBre">=90 否
If
输出等级A
score >= 是70 Print "C"
Then
score>=80

Els输eIf出sc等or级e >B= 60 Then 是 score>=70
End Select
注意:
表达式:我们通常用一个变量作为表达式
一个Case 子句
表达式范围: 1、一个或多个常量值,如1,2,3,4 2、值的一段范围,例如1 to 100 3、Is关系表达式,如Is>45
判S判Se语判6e断l断l0ee句断分c一c1tt块学-,个C总1C生a0包数a分s之s分e含的e1间a0数a正一0的(分负个奇整)或偶数多数)个是语否句及格( SSCCeeaCallseesaececspptteIr1srCiCi>0,nn3aat0,tTs“5s“oe,e7正奇a5与,99数数E”n”d Select必须成对出现 严CCaC格assaee控sppeIr2spr制ii<6,nrn4i0t0n换,t“6“tT,“8o行负偶,1没1数数00有”0”及格”

VB 选择结构 ppt课件

VB 选择结构 ppt课件
(1) 算术运算:Not 8>6 Or 6>5 And 8>10 (2) 关系运算:Not True Or True And False (3) 取反操作:False Or True And False (4) 与操作:False Or False (5) 最后得到:False
2021/3/26
VB 选择结构 ppt课件
End If
End If
Text2.Text = x
End Sub 2021/3/26
VB 选择结构 ppt课件
21
4.3.5 ElseIf语句
多层的If语句嵌套格式使程序冗长复杂。 ElseIf
语句的语法格式如下:
If <条件1> Then [语句序列1]
ElseIf <条件2> Then [语句序列2]
VB 选择结构 ppt课件
26
测试条件
表达式列表1 表达式列表2 表达式列表3……表达式列表n 其他情况







句 …… 句











1
2
3
n
n+1
2021/3/26
VB 选择结构 ppt课件
27
Case子句中的表达式列表可以有以下几种形式:
形式
表达式
表达式1 To 表 达式2
分析:当x≥2时,用公式y=x3-9来求y的值;当 x<2时,用公式y=x2+5x-6来计算y的值。
2021/3/26
VB 选择结构 ppt课件
13
输入 x 值

VB第5章选择结构程序设计.ppt

VB第5章选择结构程序设计.ppt

使用块结构条件语句,按以上标准计算运费
14
分析: 设每公里每吨货物的基本运费为Price, 货物重为Weight, 运输距离为Distance, 折扣为Discount, 则总运费Freight的计算公式为:
Freight= Price * Weight * Distance *
(1 - Discount)
21
多分支选择语句的功能流程图:
T
语句组1 F
匹配表达式 表2
匹配 表达式表1
T 语句组2
F …… T
匹配表达式 表n
F
语句组n
语句组n+1
22
3. 说明 1) 测试表达式 : 数值或字符表达式 2) Case 后的“表达式表”可以为如下形式: ① 表达式1[,表达式2]... 如: Case 1 , 3 , 5 ② 表达式1 TO 表达式2 如: Case 10 TO 30 Case "A" TO "Z" ③ Is 关系运算符 表达式 如: Case Is >= 10 Case Is = 0 与 Case 0 相同 且三种形式可以混用,如: Case Is < -5 , 0 , 5 To 100
23
【例 5-3】用多分支选择语句实现:输入年 份和月份,求该月的天数。 分析:
当月份为1、3、5、7、8、10、12时,天 数为31天; 当月份为4、6、9、11时,天数为30天; 当月份为2时,如果是闰年则天数为29天, 否则天数为28天。某年为闰年的条件是: 年份能被4整除,但不能被100整除,或 年份能被400整除。
29
4) 不要在Case后使用布尔运算符表示条件 例如,要表示条件0<X<100,不能写成: Select Case X Case Is>0 And Is<100 ' 使用了And, 是错误的 … End Select 对于较复杂的条件,可以用块结构条件 语句来实现,而有些条件完全可以转换成 Case语句允许的几种形式之一。

Vb选择结构程序设计.ppt

Vb选择结构程序设计.ppt

两个单分支
If price = 120 Then MsgBox "猜对了,你真厉害“ If price <> 120 Then MsgBox “猜错了,再试试“
一个双分支 If price =120 then MsgBox "猜对了,你真厉害“ Else MsgBox “猜错了,再试试“
双分支语法格式
两 If price = 150 Then MsgBox "猜对了,你真厉害“
个 单
分 If price <> 150 Then MsgBox “猜错了,再试试“

If price =150 then
MsgBox "猜对了,你真厉害“
双 分
Else

MsgBox “猜错了“
End if
在线测试练习
Vb选择结构程序设计
猜价格游戏
猜价格游戏代码
If price < 120 Then MsgBox "猜低了,再试试“ If price > 120 Then MsgBox "猜高了,再试试“ If price = 120 Then MsgBox "猜对了,你真厉害“
语句1.如果价格小于120,那么信息提示框提示“猜低了,再试试” 语句2.如果价格大于120,那么信息提示框提示“猜高了,再试试” 语句3.如果价格等于120,那么信息提示框提示“猜对了,你真厉害”
❖ 在分支语句中,程序执行一个分支后,其余分支不再执行;
调试,运行 ③
点击关闭 ②
在此处输入代码 ①
改写程序
参考下面的程序,150元为mp3的价格,可以是单分支,也可以是双分支。
三 If price < 150 Then MsgBox "猜低了,再试试“

第7章程序VB选择结构程序设计ppt课件

第7章程序VB选择结构程序设计ppt课件

7.2 Select Case语句
注1:测试表达式可以是数值或字符串表达式; 注2:各表达式列表 合法的格式:
①一个常量或常量表达式 ②多个常量或常量表达式,用逗号隔开,逗号相当于“或” ,如:
Case 1,3,5,7 ③表达式1 to 表达式2,表示从表达式1到表达式2中所有的值,其中
表达式1的值必须小于表达式2的值。如:Case 1 to 5 ④Is关系运算表达式,可以使用的关系运算符为:>、>=、<、<=、
1. IIf函数
IIf函数实际上是If…Then…Else结构的一 个简写 IIf函数中后两个表达式可以是各种类型 的表达式,也可以是一个IIf函数的调用
①Print x & IIf(x > 0, “大于0”, “小于或小于0”) ②s = IIf(x > 0, 1, IIf(x = 0, 0, -1))
<>、=,不可以使用逻辑运算符表示多个范围。 ⑤ 前面四种情况的组合,如Case Is>10,2,4,6,Is <0
注3:若有多个Case表达式符合条件,则只执行第一个符合 的Case下的语句体。
1. IIf函数 *2. Switch函数
1. IIf函数
格式:
IIf(条件表达式,条件为True时的表达式,条件为False 时的表达式)
功能:
根据条件表达式的值,确定函数返回后面两个表达式的 其中一个的值。
If a>b Then max=a
Else max=b
End If
max= IIf ( a>b , a , b )
例7-4
程序代码如下:
Private Sub Command1_Click()

VB单选钮和复选框列表框组合框多窗体和菜单ppt课件

VB单选钮和复选框列表框组合框多窗体和菜单ppt课件
8
单选按钮与复选框
n 功能1:运行程序时设置label文字 类型为宋体,16号字
Private Sub Form_Load() Label1.FontName = "宋体" Label1.FontSize = 16 End Sub
9
单选按钮与复选框
n 功能2:实现框架frame1中字体设 置功能。
17
列表框与组合框
n 列表框(ListBox)
n 主要属性:
n text属性:用于存放被选中列表项的文本 内容。 Private Sub Command1_Click() Label1.Caption = List1.Text End Sub
18
列表框与组合框
n 列表框(ListBox)
n 主要方法:

22
练习二
23
列表框与组合框
n 组合框控件(ComboBox)
n 将文本框和列表框的功能结合在一起,
组合框共三种风格: 下拉式组合框 简单组合框和 下拉式列表框
24
练习三
n 组合框控件(ComboBox)
n 基本事件与列表框类似
combo1 combo2
label4
combo3
25
列表框与组合框
15
列表框与组合框
n 列表框(ListBox) n List、ListCount和ListIndex属 性
16
list1.selected(2)=true
列表框与组合框
n 列表框(ListBox)
Private Sub Form_Load() Dim i As Integer Label1.Caption = "" List1.ListIndex = 2 For i = 0 To List1.ListCount - 1 Label1.Caption = Label1.Caption + List1.List(i) Next End Sub
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
If 语句
◦ 单行结构条件语句
If 条件1 Then 语句序列1 【 Else 语句序列2】
◦ 块结构条件语句
If 条件1 Then 语句块1
[ElseIf 条件2 Then 语句块2]
[ElseIf 条件3 Then 语句块3 ]
…… [Else
语句块n] End If
IIf 函数
result=Iif(条件, true部分, False部分)
End Select
【例3】求一元二次方程ax2+bx+c=0的解 。
分析:
(1) 如果a=0;b=0,则方程无解,提示重新输入系数; b0,则 x=-c/b
(2) 如果a0; b2-4ac=0 ,则有两个相等的实根 b2-4ac>0, 则有两个不等的实根 b2-4ac<0, 则有两个共轭复根
Private Sub Command1_Click() A = Val(Text1.Text): B = Val(Text2.Text)
Label1. Caption = strC + "是数字字符"
Else
Label1. Caption = strC + “是其他字符"
End If
将以上语句用Select Case语句实现
【例2】:评定成绩等级 90~100:“优”80~89: “良”70~79:“中”60~69:“及格”
60分以下为“不及格”
7.2 多分支控制结构 ——select case语句
一、Select Case语句
1、基本格式
Select Case <测试表达式> Case <表达式1> <语句块1> Case <表达式2> <语句块2> …… Case Else <语句块n>
End Select
2、执行过程:
根据测试表达式的值,按顺 序匹配Case后的表达式, 如果匹配成功,则执行该 Case下的语句块,然后转 到End Select语句之后 继续执行
2.测试表达式类型应与Case表达式类型一致
【例1】:变量strC中存放一个字符,判断是字母、数字
If Ucase(strC) >=“A” And Ucase (strC) <=“Z” Then
Label1.Caption= strC + "是字母字符"
ElseIf strC >="0" And strC <="9" Then
3、说明:
• 测试表达式:可以是数值表达式或字符串表达式,通常为变量或常量 • 语句块1、语句块2…:每个语句块由一行或者多行合法的VB语句组成。 • 表达式1、表达式2、…:称为值域,可以有下列表述形式。
形式
示例
说明
表达式【,表达式】,… Case 2,4,6
表达式To表达式
Case 1 to 5 Case “a” to “n”
Is 关系运算表达式
Case is <30
数值或字符串表达式,表述固 定值之一
用来指定一个范围,较小的 在To前,较大在To后
可配合比较运算符来指定一 个数值范围,不能用逻辑运 算符将两个或多个简单条件 组合在一起
注意: 1. 以上几种形式可以混用, 例如: Case Is < -5 , 0 , 5 To 100
Case Is < 0: MsgBox "有两个共轭复根 "
End Select End If End Sub
结束语
当你尽了自己的最大努力时,失败也是伟 大的,所以不要放弃,坚持就是正确的。
When You Do Your Best, Failure Is Great, So Don'T Give Up, Stick To The End
C = Val(Text3.Text): Picture1.Cls If A = 0 Then
If B = 0 Then MsgBox "系数为零,请重新输入"
Else X = -C / B: Picture1.Print "X="; X
End If Else
Delta = B ^ 2 - 4 * A * C Select Case DIt'S An Honor To Walk With You All The Way
演讲人:XXXXXX 时 间:XX年XX月XX日
Case 0: Picture1.Print "X1=X2="; -B / (2 * A)
Case Is > 0 X1 = (-B + Sqr(Delta)) / (2 * A) X2 = (-B - Sqr(Delta)) / (2 * A) Picture1.Print "X1="; X1, "X2="; X2
Select Case mark Case 90 To 100 Label1.Text="优秀" Case 80 To 89 Label1.Text="良好" Case 70 To 79 Label1.Text="中等" Case 60 To 69 Label1.Text="及格" Case Else Label1.Text="不及格"
相关文档
最新文档