- 1、本文档共3页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第10周实习题目
第10周实习题目
本周有4个题目
第1题 计算长方形的面积和周长
设计如下的窗体,向前两个文本框中分别输入长和宽,单击“计算”,在另外两个文本框中显示长方形的面积和周长,要求采用SUB子过程计算面积和周长,长和宽通过参数传递,面积和周长在SUB过程中输出。
第2题 计算长方形的面积和周长
设计如下的窗体,向前两个文本框中分别输入长和宽,单击“计算”,在另外两个文本框中显示长方形的面积和周长,要求采用SUB 函数过程计算面积和周长,长和宽通过参数传递,面积和周长通过引用传递返回。
其中计算面积的SUB过程参考代码如下:
Sub area(ByVal height As Integer, byval width as integer,byref s as integer,byref l as integer)
Dim s as integer
S=height*width
L= (height+width)*2
End Sub
第3题 判断素数
设计如下的窗体,向第一个文本框中输入一个整数,单击“计算”按钮,判断该数是否是素数,在另一个文本框中显示判断的结果。
要求:判断素数使用FUNCTION过程,整数通过参数传递,如果该数是素数,返回TRUE,否则输出FLASE。
第4题 计算一维数组元素的和
设计窗体如下图(1),单击“开始”按钮后,从键盘输入10个整数,输入到一维数组中,
输入时采用inputbox函数,见图(2),然后调用FUNCTION函数过程,计算这里10个数的和,将和作为返回值在文本框中输出,见图(3),
其中输入框的使用如下:
For i=1 to 10
str = 请输入第 + i.ToString + 个整数
a(i) = InputBox(str)
next
您可能关注的文档
最近下载
- 2024年时事政治题库及参考答案(100题).doc
- 2024年人教新课标小学数学知识点整理.doc
- 高中化学新教材选择必修3与旧版教材选修5对比分析.pdf VIP
- 生物人教版2024版七年级上册2.2.2 脊椎动物(鱼) 课件01.pptx VIP
- ISO27001信息安全管理体系信息安全风险评估表.pdf
- 宣讲“铸牢中华民族共同体意识”专题课件.ppt VIP
- NB_T 33018-2015 电动汽车充换电设施供电系统技术规范.pdf VIP
- 《教育家精神》全文课件.ppt
- 国开电大学习网国家安全教育(山东大学(威海))答案.pdf
- 学堂在线昆虫文化(安农)期末考试答案(65题卷).docx
文档评论(0)