- 5
- 0
- 约8.23千字
- 约 13页
- 2020-12-12 发布于山东
- 举报
实用标准文案
1、编写程序,将 26 个字母逆序输出。
教材 p87 【例 4-15】
2、编写程序,在窗体上随机输出一个 10--99 之间的两位整数。
Private Sub Form_Click()
cl
Randomize
Print Int(Rnd() * 90) + 10
End Sub
3、在窗体的单击事件中编写程序,从键盘输入 3 个数,按从小到大的顺序输出
到窗体上。
Private Sub Form_Click()
cls
a = Val(InputBox(a=))
b = Val(InputBox(b=))
c = Val(InputBox(c=))
If a b Then
t = a: a = b: b = t
End If
If a c Then
t = a: a = c: c = t
End If
If b c Then
t = b: b = c: c = t
End If
Print 按从小到大排序后的结果 :; a; 、; b; 、; c End Sub
4、编写程序,要求随着不断单击命令按钮 Command1,窗体的标题依次显示为:
今天是星期一→今天是星期二→今天是星期三→今天是星期四→今天是星期五
→今天是星期六→今天是星期日。
Private Sub Command1_Click()
精彩文档
实用标准文案
Static i As
您可能关注的文档
最近下载
- 脊柱脊髓损伤急性期救治诊疗指南(2025).docx
- 4.2+氧气的性质课件--2026-2027学年九年级化学鲁教版上册.pptx VIP
- 【阅读训练】初中阅读理解名家作品——张亚凌.docx
- 废液焚烧资料.ppt VIP
- DL_T 1400.3-2023 变压器测试仪校准规范 第3部分:油浸式变压器测温装置.pdf VIP
- YBT 4190-2018 工程用机编钢丝网及组合体.pdf VIP
- 蓝海华腾变频器V5-H说明书080717.pdf VIP
- 部编人教版五年级上册语文全册教学课件(配2026年秋改版教材).pptx
- 掘进工作面开工前安全检查和敲帮问顶制度.pptx
- 化工原理设计水吸收氨气填料塔设计技术总结.doc VIP
原创力文档

文档评论(0)