- 1、本文档共17页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
vb复习提高
字符串键盘输入语句X=inputbox(“提示”,”标题”)X=InputBox(提示信息,标题,默认值,位置)例如: X=inputbox(“提示”,“标题”)键盘输入语句字符串:由双引号括起来的一串字符称为字符串。字符串变量:在变量名的后面加$符号。如:A$其中:双引号不是字符串的一部分空格作为一个字符允许有空串,即字符串不包括任何字符,用””表示字符串中大小写字母有区别字符串函数例如: A$=”12345”B$=”67890”C$=right(A$,3)+left(B$,2)Print A$,B$,C$D$=mid(C$,2,3)Print D$例如:键盘输入字符串(字符串长度小于40),将其逆序打印输出。ABCDEEDCBA分析:键盘输入得到字符串长度利用中取字符函数mid(),把该字符串从右向左的每一个字符取出加到另一字符串中112123123412345练习: 1.输入一个数字(该数字为大于2且小于10),当输入3,输入5时,打印的图形分别为:2. 同上题,当输入3,输入5时,打印的图形分别为: 3.输入1个3位数,然后将它反向输出。例如:输入123,输出321(两种方法) 4.键盘输入一串英文单词,统计其中字母“a”出现的次数。 1121231121123211234321123454321112112321数组数组格式:数组名(下标)下标可以是常量、已经赋值的变量、表达式、数组元素。下标值 = 0,小数部分自动四舍五入。例如: A(5) a(4.6) B(10)声明数组: dim a(5) dim a(1 to 5)看程序,写运行结果例题:dim a(3),b(3) a1=inputbox(……) for i= 0 to 3 b(i)=inputbox( “”,””)next ia2=inputbox(……)for i=0 to 3 print i,a(i),b(i)next i 2,3,5,8,13,21例题:dim a(5)for i=0 to 5 a(i)=val(inputbox(……))next iprint a(3),a(a(0)),a(1)+a(2)print a(a(4)/a(5))2,10,8,7,5,3练习1:随机产生10个两位整数并打印输出 分析:10个数随机产生两位整数打印输出Dim a(10)randomizeFor i=1 to 10 a(i)=fix(rnd*(99-10+1)+10) print a(i)Next i练习:随机产生10个两位整数并按升序重新排列。 分析:10个数随机产生两位整数排序For i = 1 To 9For j = i + 1 To 10 If a(j) a(i) Then c = a(i) a(i) = a(j) a(j) = c End IfNext jNext i练习1、随机产生10个两位整数并打印输出,然后求出平均值并打印输出。2、随机产生15个1-10的整数,统计其中大于等于5的个数并打印,然后计算并输出数组的和、平均值。3、随机产生30个0-9之间的整数,统计各个数字出现的次数。 4、找出数列1,1,2,3,5,8,13……规律,打印前15项。5、随机产生10个两位整数并按降序重新排序素数(质数)问题练习*:键盘输入一个大于2的自然数,判断该数是否是素数(质数)。练习**:找出三位数中的所有素数(质数)。
您可能关注的文档
- SEM高级进阶:教你短时间看懂描述性统计.docx
- SEPSIS新定义,新标准,新思考.ppt
- SEM扫描电镜知识点扫盲.doc
- Sesam wasim.ppt
- SF6泄漏报警装置校验系统使用说明书20111129.doc
- SGZL16检测计划.doc
- SF6断路器培训课件.ppt
- sfj-261说明书.doc
- SHX-HT-RB-019六号线红土地站第三方监测日报2016-04-06.docx
- SH3503-2007交工资料全册.doc
- 2025年休闲食品健康化转型下的市场拓展策略与渠道创新报告[001].docx
- 农村电商服务站品牌建设:2025年运营模式创新与品牌传播报告.docx
- 2025年互联网金融平台合规整改与金融科技监管的合规监督与可持续发展策略.docx
- 2025年短视频平台内容监管与平台社会责任关系研究报告.docx
- 农产品溯源体系在农产品质量安全监管中的信用体系构建与实施策略研究.docx
- 2025年工业互联网平台数据备份与恢复策略创新方案探讨.docx
- 2025年线上法律咨询服务平台法律咨询行业竞争策略研究.docx
- 农业产业集群农产品流通体系构建与发展机制报告.docx
- 智能制造领航者:2025年3D打印技术在规模生产中的应用效果分析报告[001].docx
- 农村金融服务创新与农村金融消费者权益保护法规实施效果分析报告.docx
文档评论(0)