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

应用程序接口设计及代码编写.pptVIP

  1. 1、本文档共10页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多

3、常见日期时间函数Day(Now) 返回当前日的日期。WeekDay(Now) 返回当前日的星期。Month(Now) 返回当前日的月份。Year(Now) 返回当前日的年份。Hour(Now) 返回当前时间的小时部分(0-23)。Minute(Now) 返回当前时间的分钟部分。Second(Now) 返回当前时间的秒部分。在日期和时间函数中,“Now”是一个系统已定义的内部变量,可以直接使用。4、格式化函数格式输出函数Format$可以将数值表达式的值按照格式输出控制符指定的格式输出。格式:Format$(表达式,[格式输出控制符])格式输出控制符说明:⑴.“#”:数字格式输出控制符,表示一个数字位。#的个数决定显示区段的长度。⑵.“0”:数字格式输出控制符,与#功能相同,但多余位以0补齐。⑶.“.”:显示小数点。⑷.“,”:显示逗号表示分位符。⑸.“%”:表示百分号。⑹.“$”:美元符号。⑺.“+”和“-”:正号和负号。⑻.“E+”和“E-”:用指数显示数值。“E-”正号省略。Int(x) 求不大于自变量x的最大整数1Fix(x)去掉一个浮点数的小数部分,保留其整数部分2Hex$(x)把一个十进制数转换为十六进制数3Oct$(x)把一个十进制数转换为八进制数4Asc(x$)返回字符串x$中第一个字符的ASCII码5Chr$(x)把字符x转换成相应的ASCII码6Str$(x)把x的值转换成一个字符串7Cint(x)将自变量x的小数部分四舍五入转换为整数85、类型转换函数在代码设计阶段,VB主要采用结构化程序设计方法,它一般包括三个基本结构—顺序结构—分支结构—循环结构流程控制语句顺序结构:顺序结构是最简单和最基本的结构,当执行顺序结构是,将按照语句在程序中的先后顺序一次执行。其特点是流程直观易读,结构简明。赋值语句就是顺序结构中最常用的语句。分支结构分支结构是根据一定的条件来决定执行何种操作的一种数据结构在VB中有五种语句来实现分支结构:If…ThenIf…Then…EndIfIf…Then…ElseIf…Then…ElseIfSelectCaseIf…Then语法规则

If条件表达式Then语句例:PrivateSubCommand1_Click() DimtempAsSingle temp=Val(InputBox(Whatisthetempture?)) Iftemp25ThenMsgBoxitishotEndSub输入标题语法规则输入标题输入标题输入标题EndIf2If条件式Then程序段143If…Then…EndIfIf…Then…EndIf语句实例PrivateSubCommand1_Click() DimtestAsInteger test=InputBox(pleaseinputaninteger!) Iftest10Then Printtest10 test=test*2 Printnowtest=,test EndIfEndSubAEDFBCIf条件式Then程序段1程序段2ElseEndIf语法规则If…Then…ElseIf…Then…Else语句实例PrivateSubCommand1_Click() DimtestAsInteger test=InputBox(pleaseinputaninteger!) Iftest10Then Printtest10 Else Printtest=10 EndIfEndSubIf条件式Then程序段1ElseIf条件式nThen程序段n[Else默认程序段]ElseIf条件式2Then程序段2……EndIf1234语法规则If…Then…ElseIfIf…Then…ElseIf语句实例PrivateSubCommand1_Click() DimtestAsInteger test=InputBox(pleaseinputaninteger!) Iftest30Then P

文档评论(0)

junjun37473 + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档