- 28
- 0
- 约2.45万字
- 约 35页
- 2016-12-08 发布于重庆
- 举报
在線评测试题目格式_新
第五章 数据输入/输出
文件名:CH0507
输入a=5,b=2.5,c=7.8,编程计算:
将计算结果输出在窗体上。
数据描述:变量为变体类型
工程描述:
在“Command1”按钮单击事件中编程实现,输入用InputBox函数,输出用Print方法。新建Form1窗体,将窗体保存为CH0507.FRM,工程保存为CH0507.VBP,提交作业时仅将这两个文件上传。
Private Sub Command1_Click()
Dim a As Variant
Dim b As Variant
Dim c As Variant
Dim y As Variant
a = Val(InputBox(请输入a的值))
b = Val(InputBox(请输入b的值))
c = Val(InputBox(请输入c的值))
Pi = 3.14159
y = a * b * Pi / (a + b * c)
Print y
End Sub
输入:
5 2.5 7.8
输出:
1.60285204081633
文件名:CH0508
设计一个时间转换程序实现转换Private Sub Command1_Click()
Dim x As Single
x = Val(InputBox(请输入一个以秒为单位表示的时间))
neo = x Mod 60
ten = (x \ 60) Mod
您可能关注的文档
- 土壤學课后习题及答案.doc
- 土壤水動力学考题以及答案.doc
- 土壤肥料學各章试题.doc
- 土壤肥料學试题总结.doc
- 土壤肥料學通论试题库及答案.doc
- 土工試验检测试题.doc
- 土工試验检测试题1-3.doc
- 土工試验考试题(2011-L).doc
- 土建專业总复习题.doc
- 土建實务第一篇练习题.doc
- 安全生产管理员能力培训.pptx
- 咽异感症与心理健康促进.pptx
- 咽异感症与扁桃体炎的鉴别.pptx
- 咽异感症与抑郁症的关系.pptx
- 咽异感症与环境污染的关系.pptx
- 《生动的数据》课件-2025-2026学年沪教版(新教材)小学美术三年级下册.pptx
- 《校园微电影宣传策划》教学课件-2025-2026学年人美版(北京)(2024)初中美术七年级下册.pptx
- 《 春华秋实绘花鸟》教学课件-2025-2026学年人美版(北京)(2024)初中美术七年级下册.pptx
- 管理层安全培训策略.pptx
- 《把“大自然”穿在身上》教学课件-2025-2026学年人美版(北京)(2024)初中美术七年级下册.pptx
原创力文档

文档评论(0)