网站大量收购独家精品文档,联系QQ:2885784924

第3章循环结构续).doc

  1. 1、本文档共6页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第3章循环结构续)

本文由5泡泡糖贡献 ppt文档可能在WAP端浏览体验不佳。建议您优先选择TXT,或下载源文件到本机查看。 方法,关闭窗体用( 方法。 (1)隐藏窗体Form1,用( )方法,关闭窗体用( )方法。 隐藏窗体Form1, Form1 判断变量X大于或等于60并且小于70的条件表达式是( 60并且小于70的条件表达式是 (2)判断变量X大于或等于60并且小于70的条件表达式是( ) 字符表达式“23”+ 456 的值为( 456”的值为 (3)字符表达式“23 +“456 的值为( ) A=“good morning” B=“afternoon boy”,如果要输出goodboy, (4)A= good morning B= afternoon boy ,如果要输出goodboy, 表达式是() 表达式是() y=“welcome! 表达式instr(len(y) 4,y,”m )的值是() welcome!”, instr(len(y)(5)y= welcome! ,表达式instr(len(y)-4,y, m”)的值是() chr(asc(“a )+3) )+3)的值是 (6)chr(asc( a”)+3)的值是 可以实现从字符串任何位置截取字符的函数是() (7)可以实现从字符串任何位置截取字符的函数是() inputbox函数的默认返回值类型是字符串 函数的默认返回值类型是字符串, inputbox输入 (8)inputbox函数的默认返回值类型是字符串,用inputbox输入 数值型数据时,在函数前加上( 函数进行类型转换, 数值型数据时,在函数前加上( )函数进行类型转换,可以 有效防止程序出错 x=1,执行 执行if 的结果是( (9)x=1,执行if x then x=0 else x=1 的结果是( ) 10) 语句选择|X|=10的情况时的语句为: |X|=10的情况时的语句为 (10)用select case 语句选择|X|=10的情况时的语句为: case( ) 11)循环结构for 执行的次数() (11)循环结构for i=1 to 10 step 1.5 ,执行的次数() 12)退出for 循环的语句是() (12)退出for 循环的语句是() 第1章 VB.NET集成开发环境—— 2 该程序是产生50个60~100的随机数,统计其中被6 该程序是产生50个60~100的随机数,统计其中被6整除余 50 的随机数 的个数,并将这些数输出。请填空: 2的个数,并将这些数输出。请填空: Dim x As Integer, N%, s Dim Count As Integer ( 1 ) For N = 1 To 50 x = ( 2 ) If ( 3 ) Then Count = Count + 1 s = ( 4 ) Space(2) End If Next N MessageBox.Show(符合条件的数是 符合条件的数是 MessageBox.Show(符合条件的数是 s 共 个数 个数) vbCrLf 共 Count 个数) (1)Randomize() (3) x Mod 6 = 2 (2)Int(Rnd() * 41 + 60) (4) s x 检查在文本框中输入的圆括号是否配对。 检查在文本框中输入的圆括号是否配对。输入回车符表示输 入结束,显示有关信息。 入结束,显示有关信息。 Dim count1% ‘从 If (1) Then ‘从e获得键入的字符 count1 = count1 + 1 ElseIf (2) = ) Then (1)e.KeyChar = ( count1 = (3) (2) e.KeyChar End If (3)count1 – 1 If Asc(e.KeyChar) = 13 Then (4)count1 = 0 If (4) Then (5)count1 MsgBox(左右括号配对 左右括号配对) MsgBox(左右括号配对) ElseIf count1 0 Then MsgBox(左括号多于右括号 左括号多于右括号 个 MsgBox(左括号多于右括号 (5) 个) Else MsgBox(右括号多于左括号 右括号多于左括号 个 MsgBox(右括号多于左括号 -count1 个) End If Exit Sub End If 有7个评委对一参赛者打分,去掉一个最高分、去掉一个最低分,求 个评委对一参赛者打分,去掉一个最高分、去掉一个最低分, 出的平均分即是该参赛者的得分。 出的平均分即是该参赛者的得分。 Dim mark!, aver!, i%, max1!, min1! ave

文档评论(0)

qnc814 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档