热门文档
- 2022-09-18 20:22:00 中国人为什么看不起中国人 张鸣
- 2023-04-19 15:04:26 《千家妙方 上册 1982年》(李文亮等编)
- 2023-10-13 17:09:40 楚辞 中华传统诗词经典 可复制-李山-9787101097528
- 2022-09-18 20:22:00 中国兵法之起源 编委会
- 2022-11-24 16:17:09 《性体验与性爱心理》尤里-谢尔巴特赫
- 2022-11-24 16:17:09 《性爱健康指南》石四维编著
- 2023-10-13 17:09:40 超速学习：我这样做，一个月学会素描，一年学会四种语言，完成MIT四年课程-斯科特·扬著，林慈敏译-9789861755533
- 2022-09-18 19:48:57 心理催眠术 迈克尔.赫普,温迪.德雷顿著
- 2023-10-13 17:09:40 初中诗词格律读本 可复制-周建忠 徐乃为 王业强编著-9787101121704
- 2023-10-13 17:09:40 曾国藩家书 中华经典藏书(升级版)可复制-檀作文译注-9787101115482
- 2023-01-11 15:23:39 孔子学院传播研究_刘程 安然著_9787516112922
- 2022-09-18 19:48:57 成功创业72绝招 艾凡著
1、本文档共计 26 页，下载后文档不带www.pdfdz.com水印，支持完整阅读内容。
2、古籍基本都为PDF扫描版，所以文档不支持编辑功能，即不支持文档内文字的复制粘贴。
3、当您付费下载文档后，您只拥有了使用权限，并不意味着购买了版权，文档只能用于自身使用，不得用于其他商业用途（如 [转卖]进行直接盈利或[编辑后售卖]进行间接盈利）。
4、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。
5、如文档内容存在违规，或者侵犯商业秘密、侵犯著作权等，请点击“违规举报”。
2、古籍基本都为PDF扫描版，所以文档不支持编辑功能，即不支持文档内文字的复制粘贴。
3、当您付费下载文档后，您只拥有了使用权限，并不意味着购买了版权，文档只能用于自身使用，不得用于其他商业用途（如 [转卖]进行直接盈利或[编辑后售卖]进行间接盈利）。
4、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。
5、如文档内容存在违规，或者侵犯商业秘密、侵犯著作权等，请点击“违规举报”。
Visual Basic程序设计（第2版）上机指导与习题解答46Exit ForCase 58Exit DoCase65,68,92EndEnd SelectNext iLoopEnd Sub上述事件过程执行后，下列描述中正确的是：A)Do循环执行的次数为1000次B)在For循环中产生的随机数小于或等于100C)当所产生的随机数为12时结束所有循环D)当所产生的随机数为65、68或92时窗体关闭，程序结束填空题l.在Visual Basic语言中有3种形式的循环结构。其中，若循环的次数可以事先确定，可使用循环；若要求先判断循环进行的条件，可使用循环或循环。2.下面是体操评分程序，20位评委，除去一个最高分和一个最低分，计算平均分（设满分为10分)，请填空。Max=0 Min 10For i=1 to 20N=val(inputbox("请输入分数")Ifthen x nIfthen min =nNext iPrint"最高分"；nax;"最低分"；minPrint"最后得分"；P3.以下程序用于输出3到100之间的全部素数。For n=3 to 100K=int(sgr(n))I=2Flag=0Do whileand flag=0If n mod i=0 then flag=1 else i=i+1LoopIfthenPrintEnd ifNext nEnd sub50nunl=InputBox("请输入一个正整数")num2=InputBox("请输入一个正整数")IfThentemp numl:numl num2:num2 tempEnd Ifb num2Do Whiletemp a Mod ba=bLoopPrint"最大公因数为："；aPrint"最小公倍数为："；numl*num2/aEnd Sub14,从键盘上输人一串字符，以“？”结束，统计输人字符中的大、小写字母和数字的个数。Private Sub Form_Click()Dim ch$,n1 n2,n3%n1=0:n2=0:n3=0ch=InputBox("请输入一个字符")Do WhileSelect Case chCase "a"To "2n1=n1+1Casen2=n2+1Case "o"To "g"n3=n3+1End Selectch=InputBox("请输入一个字符")Print nl,n2,n3End Sub15.功能：下面的程序段用于打印出以下图形Private Sub Form_Click()
