vb学习手册下载完整版内容摘要:

,/.等数学运算 ,但对于日期而言 *和 /是没有意义的 ! 另外 ,如果为了获取当前机器时间 ,我们可以用 now()函数 .当然 ,还有 year() , Month() 和Days()分别表示 ..年 ..月 ..日 . 我们可以这条语句来获得当前机器时间 , now 当一个数字型数据向日期型数据转换的时候 ,小数点左边的数值将转换为日期数据 ,右边的将转换为时间信息 .以 1899年 12月 31日作为分界点 ,如果是一个整数 ,表示的是它以后的日期 ,如果是一个小 时 ,则表示它以后的日期 .而 将被转换成时间信息 ,转换的时候 0 表示午夜 表示正午 .如 ,从现在起过 3 小时的日期和时间可以表示为 now+ 第八课 , 对象型变量和变体变量 (近日电缆被盗割 ,NND) 上次讲了 vb 的 ,字符串 ,布尔 ,日期型变量 . 现在学习一下对象型 (Object)变量 ! 这种变量主要是针对 vb 中的多种控件对象来使用 .在应用程序中 ,既可以通过默认的控件对象名来操作控件 ,也可以将一个对象型变量与控件变量挂钩 ,然后通过该变量来操作控件 . 声明格式 ...和以前的一样 , dim 变量名 as objecttype 声明了 object 变量后 ,还需要将其与界面上的控件关联起来才能通过它来操作对象 ,在此 ,我们可以使用 set 语句 : set 变量名 = objectname 这样 ,就可以通过对象型变量来操作控件了 下面 ,我来举个例子吧 .~ 先创建一个 vb 工程 ,并在窗体内添加以下控件 textbox checkbox mandbutton 这里我有个然后在窗体的 load 事件过程中添加如下代码 : Private Sub Form_Load() Dim z_mand As CommandButton Dim z_text As TextBox Dim z_check As CheckBox Set z_mand = Command1 Set z_text = Text1 Set z_check = Check1 = 使用对象型变量 ing = False = 通过对象型变量修改 caption = vbGrayed End Sub 前面 3 句声明了 3 个对象型变量 ,中间的 3 句将各个变量与对应的控件对象关联起来 .其余的语句都是修改控件属 *的 . 对象型变量不仅仅用于对控件对象的操作 ,它也可以用于生成自己的对象 . ok, 后头说一下变体变量 变体变量是适用于所有数值类型的变量 ,它是最灵活的数据类型 ,vb 回自动根据变量的当前值 ,处理声明为 variant 的变量和没有声明的变量 .咋看咋像隐式声明 ?呵呵 ,接着往下面看 !) 它的声明格式 ...如下 ........ dim variablename as variant 也可以不指定类型 dim variablename 甚至 ,我们可以不声明变体变量 ,就可以直接使用了 .在这种情况下 ,vb 也会把没有声明的变量当作变体变量来处理 . 变体变量的值的类型是可以变化的 . 看看这个例子 Private Sub Form_Load() Dim m_variant1 As Variant Dim m_variant2 As Variant m_variant1 = 30 m_variant2 = 29 m_variant1 + m_variant2 m_variant1 amp。 m_variant2 End Sub 两个语句虽然显示一样的结果 ,其中 ,我们用 m_variant1 + m_variant2 本意想让两个数相加 ,....但对于字符串 ,+和 amp。 是一样的 ,如果希望两个数相加 ,我们至少要对其中一个赋予数字型变量 ! 变体变量也可以用来存储日期和时间 ,直接用 括起来就可以了 . 变量类型就算完了 ,后面再讲变量类型的转换 ... 第 9 课 该说 vb 中变量类型的转换了 ....咳 ..~~ 有的时候 ,程序中需要将一种变量转换成另一种变量类型 .(根据实际情况 ) 比如在科学计算的时候 ,原 来的 single 类型不能满足需要 ,那么 ,我们就要将其转换成 double 同样 ,字符串和数字也可以转换的 ... 大家看看这个表 ..函数名 ,及转换作用 .. Str (x) 将数值数据 x转换成字符串 Val(x) 将字符串 x中的数字转换成数值 Chr(x) 返回以 x为 ASCII 码的字符 Asc(x) 给出字符 x的 ASCII 码值,十进制数 Cint(x) 将数值型数据 x的小数部分四舍五入取整 Int(x) 取小于等于 x的最大整数 Fix(x) 将数值型数据 x的小数部分舍去 CBool(x) 将任何有效的数字字 符串或数值转换成逻辑型 CByte(x) 将 0255 之间的数值转换成字节型 CDate(x) 将有效的日期字符串转换成日期 CCur(x) 将数值数据 x转换成货币型 Round(x, N) 在保留 N位小数的情况下四舍五入取整 CStr(x) 将 x转换成字符串型 CVar(x) 将数值型数据 x转换成变体型 CSng(x) 将数值数据 x转换成单精度型 CDbl(x) 将数值数据 x转换成双精度型 例如 ,可以使用 cdbl()函数来将变量转换成双精度型 .大家看看这段代码 : Private Sub Form_Load() Dim z_temp As Integer z_temp = 20 z_temp is amp。 TypeName(z_temp) amp。 z_temp afterchange, z_temp is amp。 TypeName(CDbl(z_temp)) amp。 z_temp1 End Sub 在 vb 中 ,有时候辉自动转换数据类型 ,例如 : Private Sub Form_Load() Dim a1 As Integer Dim a2 As Integer a1 = 2 a2 = 6 a1 / a2 End Sub 尽管我们已经声明了变量类型都是整数型 , 但是 , 我们 运行后看到的值却是 .333333333333333 双精度型数据 ,如果我们已知 a1/a2仅仅是货币计算的话 ....那么 ,我们采用 CCur()函数 : CCur(a1 / a2) 就可以了 .. 字符串和其他数据类型的转换是最重要的 ,以后我们会说明的 .. 除了转换外 ,我们可以用 VarType()和 TypeName()函数来检查变量类型 . 呵呵 ,够方便吧 ....嘿嘿 ... (不行 ...有些困 ,估计大家看到的可能不明白 ,不明白好说 ,在那个问题贴里面回帖提问 ..嘿嘿 ..去睡觉了 ....困挂了 ..) [VB 课堂 ]第十课 , 用户定义的数据类型 内容不多 ,还是希望大家能够掌握 用户定义的数据类型 以前介绍的变量都是存放在单个数据的 .而在实际应用中 ,变量往往是大量不同数据类型的数据组合 .也就是数据库 ....例如一个最简单的人员档案记录 ,至少需要有 人员编号 ,姓名 ,出生日期 ,性别 等等 .. 每一个人的记录都成组出现 ,不应该出现数据之间的交杂混乱 . 用户定义的数据类型就是用于处 理上面的问题的 .. 它可以把许多相同或者不同数据类型的变量放置在一起组成一个结构 ,这种结构也就是记录(Record) 在 vb 中定义用户自定义的数据类型 ,可以使用 Type 语句 格式如下 :.. Type vartype variable1 As vartype variable2 As vartype variable3 As vartype ... variablen As vartype End Type 声明记录类型数据后 ,在应用程序中就可以定义具有这种数据类型的变量了 .定义改种数据类型的变量和一般变 量的定义是一样的 .格式 : Dim VariableName As varType 例如 ,上面的人员结构可以声明为 Type MenRecord ID As Integer Name As String birthday As Data gender As Boolean End Type 现在 ,就可以使用 MenRecord 来声明变量 : dim z_men as menrecord dim z_object as menrecord 然后就可以通过该变量来访问记录中的各个字段了 .访问的规则就是变量名加小数 点加字段名 . 例如 ,要访问人员记录中的姓名 ,就可以使用 从这个角度上来看 ,记录相当于对象 ,而字段相当于属性 . ..... 第 11 课 , 顺序结构 ....输入语句 我们来学习结构化程序设计 ... 嘿嘿 ....... 编写一个程序 ,在保证运行结果正确的前提下 ,要求做到又良好的结构 .这样的目的是使程序的阅读和修改十分方便 .结构化程序设计最先使荷兰的程序员 首先提出的设计方法 . 顺序结构是我们最近的重点 ,它也是结构化程序设计理论中的 3 个基本结构之一 .也是最简单的程序结 构 .. 3 个结构分别是 顺序结构 ,选择结构 ,循环结构 . 他们的共同点是 只有 1 个入口 . 只有 1 个出口 .每一条指令均又可能被执行 (无死语句 ).不包括死循环 (无死循环 ) 今天我们先理解一下 输入语句 如果程序不允许用户输入数据 ,那么程序就仅仅具有浏览的功能 ,不可能又太多的发展 .同时 ,用户从键盘进行输入的情况也是不可避免的 .如果要计算一个立方体的体积 ,则需要用户提供长 ,宽 ,高 ,的数值 .程序不应该只能计算一组数据 ,而应该可以让用户提供各种可能的数值 .当然 ,也可以对每一组数值都修改一次程序 ,但这样太麻烦 .如果运 行用户提供的数据 ,这个问题就可以搞定了 .. 在 vb 中 可以通过 inputbox() 函数来实现 ,该函数的使用格式为 InputBox (prompt [, title] [, default] [, xpos] [, ypos] [, helpfile, context]) 以下是函数中各个参数的说明 prompt 作为对话框消息出现的字符串表达式 .prompt 的最大长度大约是 1024 个字符 , 由所用字符的宽度来决定 .如果 prompt 包含多行 ,则可在各行之间来用回车符 Chr(13) 换行符 Chr(10) 或回车和换行的组合 Chr(13)amp。 Chr(10)来分隔 title 显示对话框标题栏中的字符串表达式 .如果省略 title ,则把应用程序名放入标题栏中 . default 显示文本框中的字符串表达式 .在没有其他输入时作为缺省值 .如果省略 default,则文本框为空 xpos 数值表达式 ,成对出现 ,指定对话框的左边与屏幕的左边的水平距离 .如果省略 ,对话框会在水平居中 ypos 和上面的差不多 ,调整对话框与屏幕的垂直距离的 ,如果省略它 ,对话框就回在屏幕垂直方向距下边大约三分之一的距离 helpfile 字符串表达式 ,用来识别帮助文件 ,用该文件为对话框提供上下文相关的帮助 如果已提供 helpfile,也必须提供 context 它们两个是相互依 *的一对儿 ~~ context 数值表达式 ,由帮助文件的作者指定给某个帮助主题的帮助上下文编号 ,如果以供 context 那么 helpfile 也是必不可少的哦 . 上面的参数中 ,只有参数 prompt 是必须的 ,其余的都是可有可无 .但是对于大型应用程序 ,最好能提供参数 ,分清是什么窗体 ,什么情况下出现的输入提示 ..例如 Private Sub Form_Load() Dim z AS String z = InputBox(请输入你的名字 , test) 39。 对 z进行各种操做 End Sub 运行后 ..嘿嘿 ,就会提示用户输入自己的姓名 ,对话框标题为 test 如果用户在输入后 去点那个确定 . 则会对用户的输入送给一个字符串型变量 .如果用户点那个取消 .则应用程序将取消用户的输入 ,相当于没有出现输入对话框一样 .因为该函数回返回一个字符串 ,即使用户没有做审核输入 ,也会返回一个长度为 0 的空字符串 ,所以必须给该函数赋给一个值 ,否则 vb 就回提示编译错误 . 无论是使用输入对话框输入和文本框输入 ,得到的都是字符串型的数据 .但是很多时候 ,要求用户输入的数据并不是用做字符串 ,而是要当作数字型 .日期型 .布尔型数据使用 .这时 ,需要对数据进行转换 .在数据转换中 ,使用最多的是将字符串转换为数字 ,这时 ,可以使用函数 Val() 其格式为 V。
阅读剩余 0%
本站所有文章资讯、展示的图片素材等内容均为注册用户上传(部分报媒/平媒内容转载自网络合作媒体),仅供学习参考。 用户通过本站上传、发布的任何内容的知识产权归属用户或原始著作权人所有。如有侵犯您的版权,请联系我们反馈本站将在三个工作日内改正。