3.编写一个程序和界面输入某学生的语文、数学英语三门课程的成绩,单击计算可以得出该学生的平均分和总分

4.编写一个程序,根据输入学生的成绩分数得出学生的等级“合格”、“良好”“优秀”,平均分在60分一下是不及格,60-70分是及格,70-85分以上是中等,85分以上是优秀。点击判断等级按钮,弹出该生的等级为“XX”

解答问题3.
编写一个程序和界面,输入某学生的语文、数学、英语三门课程的成绩,单击计算可以得出该学生的平均分和总分。


第1步.在窗体form1 中添加控件并设置其属性:
控件     控件名           Caption     text     说明
----------------------------------------------------------
标签     labl_1              语文             
标签    labl_2                数学             
标签    labl_3                英语             
标签    labl_4                总分
标签    labl_5               平均分
文本框    text1                             空      留待输入语文分数
文本框    text2                             空      留待输入数学分数
文本框   text3                              空      留待输入英语分数
文本框   text4                              空      留待显示总分         
文本框   text5                              空      留待显示平均分
命令按钮 command1     计算

 

第2步.在窗体中双击命令按钮,键入或贴入以下代码:
Private Sub Command1_Click()
 Dim s1%, s2%, s3%, su%, av% '简单些,各科成绩及平均分取整数
 s1 = CInt(Text1.Text)   ' 语文分
 s2 = CInt(Text2.Text)   ' 数学分
 s3 = CInt(Text3.Text)   ' 英语分
 su = s1 + s2 + s3       ' 计算总分
 av = su / 3             ' 计算平均分
 Text4.Text = CStr(su)   ' 显示总分
 Text5.Text = CStr(av)   ’显示平均分
End Sub

 

第3步.运行(运行情况如以下截图所示:)

温馨提示:内容为网友见解,仅供参考
第1个回答  2014-06-12
这个直接可以用Excel可以做到啊!可以去学习下Excel的操作
相似回答