下载地址

VB6.0 判断成绩级别(及格 、不及格、优秀)源代码实例

常用软件:压缩软件迅雷合集 》播放软件
资源大小:2.05K 更新时间:2019-09-29
资源类型:绿色安全 授权方式:免费下载
资源分类:VB源码 资源人气:2869
适用平台:WinAll 推荐等级:
一键分享: 一键分享
() ()

内容简介

在这里小编给大家提供VB6.0 判断成绩级别(及格 、不及格、优秀)源代码实例下载,都是比较常用和简单的。有需要学习相关编程的可以下载回去研究一下。
考试成绩多级别判断,这个可嵌入到一个完整的学生考试成绩管理系统中,用来判断学生考试成绩属于哪一个级别。比如输入一个成绩,判断该成绩是及格、不及格、或优秀等级别。我们将判断机制写入到按钮事件中,用户单击按钮,则执行级别判断,主要是使用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

关键词:成绩管理,等级判断,