Visual Basic辅导讲义3-控制结构.pptVIP

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
Visual Basic辅导讲义 计算机与数学基础教学部 :刘冰 数据输入输出 Print可以在窗体、图片框、打印机、立即窗口输出数据。 格式: [对象].print [输出内容] Form1.print “中国” Picture1.Print “中国” Printer.print “中国” Debug.print “中国” 5.1 数据的输出 哪个语句可以实现先输出a,然后在第6列输出B。 Print “a”;tab(5);”B” Print “a”;spc(4);”B” Print “a”;spc(6);”B” Print “a”;tab(4);”B” 语句 print “25+32=”;25+32结果是———— 格式说明: # ,0 表示一个数字位,控制输出内容的长度。 区别: 实际长度给定长度, #多余位空、 0多余位补0。 . 显示小数点,多余小数部分四舍五入。 , 显示千位分隔符。 % 显示百分数形式,格式说明串%。 $ 显示美元符号,$格式说明串。 +,- 显示正、负号。 E+,E- 将数值转换为指数形式显示。 a = Sqr(110) Print a Print Round(a, 2) Print Format(a, 000.000) Print Format(a, ###.###) Print Format(a, 0.0) Print Format(a, 00.###) Print Format(a, $##.###) Print Format(a, -00.000) Print Format(a, ##.##%) Print Format(a, #.##E+00) 06年4月 Print format(int(12345.6789*100+0.5)/100,”0000,0.00”) 执行如下语句:a=InputBox(”Today”,”TomorroW”,”Yesterday”, , ,Day before yesterday,5)将显示一个输入对话框,在对话框的输入区中显示的信息是 A)Today B)Tomorrow C)Yesterday D)Day before yesterday Inputbox函数为字符型函数,也可以写作inputbox$(……),表示其结果为一个字符串,所以在inputbox中输入的内容都作为字符进行运算。 X=inputbox$(“输入一个数字”) Print typename(x) Print x+100 消息框:MsgBox Msgbox有两种表达形式,如果只需要显示若干信息,不需要得到用户的选择,使用语句形式 Msgbox “注意!!!” 如果需要知道用户的选项,应使用函数表达形式,使函数的运行结果存放于某个变量中。 函数形式的语法格式 MsgBox(提示信息 [,按钮类型][,标题][,帮助文件,内容]) 标题:显示在标题栏 按钮类型:类型个数、图标、缺省值。 返回值:由用户选择的按钮决定 。 Msgbox函数的返回值是什么类型? 程序设计 6.2 顺序结构 顺序结构 VB的代码写在事件过程或者通用过程中,在过程中,自上而下逐语句执行,直到执行到End Sub或Exit sub结束。语句的顺序不同可能导致程序的结果不同。 通常定义变量和符号常量的语句写在每个过程的最前面。 顺序结构 Private Sub Command1_Click() Dim x As Integer Static sum As Long, i As Integer x = Val(Inputbox(“输入数字”)) i = i + 1 sum = sum + x Label1.Caption = sum Label2.Caption = Round(sum / i) End Sub 选择结构(分支结构) 2.If...Then...Else语句(双分支) 格式: If 条件 Then 语句块1 Else 语句块2 End If 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() static x% If Sgn(x) Then    y = Sgn(x ^ 2) Else    y = Sgn(x) End If Print y x=x+1 End Sub 程序运行后,单击命令按钮2次,窗体上显示的是 格式:

文档评论(0)

中华书局 + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档