VB编程题目
Private Sub Form_Click()
Dim i As Integer, s As Integer
Dim a(10)
Do Until i = 10
i = i + 1
a(i) = InputBox("请输入第" & i & "个学生成绩")
s = s + a(i)
Loop
MsgBox "平均成绩为：" & Format(s / 10, "0.00")
End Sub
上一篇：汇编语言程序设计题目
下一篇：C++编程题目
Private Sub Form_Click()
Dim i As Integer, s As Integer
Dim a(10)
Do Until i = 10
i = i + 1
a(i) = InputBox("请输入第" & i & "个学生成绩")
s = s + a(i)
Loop
MsgBox "平均成绩为：" & Format(s / 10, "0.00")
End Sub
多重随机标签
綦江区地方税务局机构设置 武汉市政集团属于什么企业 贵州省遵义市道真县三桥镇公安局微信是多少 为什么做的网页在一台电脑上面是好的但是在另外一台电脑上看就是错位的 陕西正规法律顾问价格 看韩剧的app叫什么 鹤岗市鹤岗润沙国际饭店怎么样 成华区陈枢的丈夫是谁 有谁知道什么软件能画平面图有立体效果用什么软件制作平面立体图 yy歪歪语音星级公会的审核流程和审核时间 厦门东海职业技术学院2009年小自考专业介绍 广州有几个区最穷是哪个 山东强正茗茶文化传媒有限公司怎么样 公积金嘉兴如何查询 职业技能怎么填写 口红打不开 用记事本创建了一个html网页创建完了怎么编辑 销售管理系统中 英语角这3个字的艺术字怎么写 襄阳尔东网络科技有限公司怎么样 请教高手如何建立一个电影服务器 山东国税网上办税平台 恩施市是几线城市 浙江鲸腾网络科技有限公司为啥给我转一块钱 庆岭镇经济发展 创建一个网络电话虚拟运营商平台要多少钱 广州新区建设有哪些 晋中卫生学校是大专还是中专 河南省置地房地产集团企业简介 石家庄市财税服务公司名单 石家庄财税公司名录