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

4.编写一个程序,根据输入学生的成绩分数得出学生的等级“合格”、“良好”“优秀”,平均分在60分一下是不及格,60-70分是及格,70-85分以上是中等,85分以上是优秀... 4.编写一个程序,根据输入学生的成绩分数得出学生的等级“合格”、“良好”“优秀”,平均分在60分一下是不及格,60-70分是及格,70-85分以上是中等,85分以上是优秀。点击判断等级按钮,弹出该生的等级为“XX” 展开
 我来答
可轩163
推荐于2017-10-13 · TA获得超过1.3万个赞
知道大有可为答主
回答量:4824
采纳率:88%
帮助的人:1775万
展开全部

解答问题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步.运行(运行情况如以下截图所示:)

匿名用户
2014-06-12
展开全部
这个直接可以用Excel可以做到啊!可以去学习下Excel的操作
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式