VB6.0 判断成绩级别（及格 、不及格、优秀）.rar

【文件属性】：
文件名称：VB6.0 判断成绩级别（及格 、不及格、优秀）.rar
文件大小：2KB
文件格式：RAR
更新时间：2022-07-30 05:43:58
VB源码-其它源码 考试成绩多级别判断，这个可嵌入到一个完整的学生考试成绩管理系统中，用来判断学生考试成绩属于哪一个级别。比如输入一个成绩，判断该成绩是及格、不及格、或优秀等级别。我们将判断机制写入到按钮事件中，用户单击按钮，则执行级别判断，主要是使用if elseif来判断等级，如下示： 　　Private Sub Command1_Click() 　　x = Val(Text1) '取文本框的值进行判断 　　If x < 60 Then '利用多分支结构的多行格式 　　 Label2.Caption = "此成绩为：不及格"'判断结果放到标签里显示 　　ElseIf x < 70 Then 　　 Label2.Caption = "此成绩为：及格" '成绩被分成五个级别定制 　　ElseIf x < 80 Then 　　 Label2.Caption = "此成绩为：中等" 　　ElseIf x < 90 Then 　　 Label2.Caption = "此成绩为：良好" 　　Else 　　 Label2.Caption = "此成绩为：优秀" 　　End If 　　Text1.SetFocus '判断后文本框内成绩被选中等待用户下一次输入 　　Text1.SelStart = 0 　　Text1.SelLength = Len(Text1) 　　End Sub

【文件预览】：
srcfans.com
----成绩级别()
--------E083.vbp(662B)
--------Form1.frm(2KB)
--------E083.vbw(48B)
--------MSSCCPRJ.SCC(189B)