- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
《程序设计语言 VB》综合设计题
1. 编制程序实现:在窗体上,单击按钮 1,在文本框中动态显示当前时间;单
击按钮 2,则停止动态显示;单击按钮 3,清除文本框内容。提示:可用定时器
控制时间,用系统函数 Now显示时间(如 Text1.Text = Now )。
2. 编制程序:求出 100-200 之间所有可以被 3 整除的数的总和,将结果用消息
框显示输出。
3. 编制程序:利用输入框输入 10 个不同的整数,将它们从小到大排序,并打
印输出。
4. 编制程序实现:设计在一框架中包含三个复选框,只有当其 1,3 选中而 2 未
选中时,才在 Text1 中显示 Hello 字符。
5. 编一程序能实现在窗体上打印出如下图所示的图形。
A
AAA
AAAAA
AAAAAAA
BBBBBBB
BBBBB
BBB
B
6. 编一程序用于判断一正整数是否为素数。 (提示:只能被 1 和本身整除的正
整数称为素数。为了判断一个数 n 是不是素数,可以将 n 被 2 到 sqr(n) 之间的
所有整数除,如果都除不尽,则 n 就是素数,否则 n 是非素数。)
7. 选用 If 和 Select 判断结构中任意一种编写满足下列条件的计税要求的程
第 1 页 共 12 页
序:少于 1600 元,免税; 1601-5000 元,征 2%的税;多于 5000 元,超过部分
征 5%的税。
8. 有 a、b、c 三个数, 编一程序实现通过文本框给 a、b 赋值;再调用能完成 a、
b 比较大小的子过程,用 c 将大数回传。要求按值传送 a、b。
9. 编一程序用于求所有的 水仙花数 。 所谓 水仙花数 是指一个 3 位数,其
各位数字立方和等于该数本身。 例如:153就是一水仙花数, 因为 153 = 13+53+33。
10. 设计一弹出式菜单,用于设置窗体的背景色,背景色包含白色、黄色、红
色三种颜色。
11. 编写程序实现:输入三角形的三条边 a,b,c 的值,根据其数值判断能否构
成三角形。如果能,则判断三角形是否是直角三角形,若是则计算该直角三角
形的面积。
提示:判断能否构成三角形的方法是,求最长的一边,判断它的边长是否小于
另外两边边长之和;或求最短的一边,判断它的边长是否大于另外两边之差。
12. 编写程序:通过四个命令按钮 Command1-Command4,在图片框 Picture1 内
分别实现画点、画线、画圆、擦除等功能。
13. 编写程序实现:在窗体上单击按钮 1,可通过输入对话框输入两个字符串;
单击按钮 2,将输入的两个字符串连接为一个字符串,并计算该字符串长度,然
后在消息框中显示出来。
14. 编一程序:用三个文本框分别输入 a、b、c ,求一元二次方程 ax2+bx+c=0
的解 x1 和 x2 ,只包括实根。
15. 编一程序:利用输入对话框输入两个正整数,求最大公约数。
答案
第 2 页 共 12 页
1. Private Sub Command1_Click()
Timer1.Interval = 5
Timer1.Enabled = True
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False
End Sub
Private
您可能关注的文档
最近下载
- T_CECA20011-2021:含铁含锰地下水接触氧化法给水处理技术规程.pdf VIP
- 事故应急技术第一章 应急管理概论课件.ppt VIP
- 包括乘用车项目风险管理分析报告(仅供参考).docx VIP
- 高中物理必修2机械能守恒练习题.pdf VIP
- BS EN 573-3-2019 铝和铝合金.锻制产品的化学成分和形式.第3部分:产品的化学成分和形 式.pdf VIP
- 学堂在线 高技术与现代局部战争 章节测试答案.docx VIP
- 风光储电站成本构成全套.docx VIP
- 数字信号处理(英文版)教学课件.ppt VIP
- 白话机器学习算法.pdf VIP
- 职业技术学院网络营销与直播电商专业人才培养方案(2024版).pdf VIP
文档评论(0)