vb快速入门

前端之家收集整理的这篇文章主要介绍了vb快速入门前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
vb快速入门         不同作用范围变量的声明方式   作用范围 局部变量 模块级变量 公用变量   声明方式 Dim,ststic Dim,private Public   声明位置 过程内部 通用部分 模块的声明段   其他过程能否调用 不能 能 能   其他模块能否调用 不能 不能 能      2. 变量的声明技巧    Public strsql As String    Dim intI As Integer    由上面的两个例子可以看出声明变量时应该注意变量的命名规则    变量类型 & 变量名    变量一定要有意义,这样的好处是当看到变量时很快就能知道变量的类型从而避免了变量赋值时出现类型不匹配的错误,而且增加了程序的可读性.   3 在应用变量时一定要保正变量已赋初值.      二. 常量    用户一但定义了常量,在以后的程序中不能再给这个常量赋新值,否则在程序运行时,vb会错误提示.    定义常量的例子:    Public Const Db_Name1 = "f:\qqqq\db\zhang.mdb"    关键字 常量名 = 常量的值   一. 条件判断语句       1 . 单行 if …… then 与 iif( …… ) 结构    例: If Text1.Text = " " Then msgBox “ 空值”    例 strdata = iff( a>b,text1.text,text2.text)    目标变量 条件 值1 值2    当a>b = true 时 strdata=text1.text    当a>b= false 时 strdata=text2.text    2. if ….. then ….. else ……. end if    例:If Size > 0 Then    Text1.Text = ""    Else    Text1.Text = " ok "    End If    应该注意的是此种结构的书写格式!      3. select case 结构   当需要完成多重判定的任务时,可以使用select case 结构    语法: Select 测试条件    Case 表达式1    语句组1    Case 表达式2    语句组2    ……….    Case 表达式n    语句组n    End Select      二. 循环语句       Vb主要有两种循环结构,即 do…..loop 和 for……next.   1. do….loop 结构    使用do 循环重复执行一语句块,并计算测试条件以决定何时结束循环,循环条件必须是一个数值或者值为true 或false 的表达式. Do….loop语句有四种形式:    [1] do while [2] do    ……. ……..    Loop Loop while       [3] do until [4] do    ……… ……..    Loop Loop until    退出do循环用 Exit do    2 for ……. Next 结构    语法: for 计数器= 初值 to 终值    ………….    Next    例: dim intz as integer,inty as integer    For intz =1 to 100    If intz mod 2 = 0 then inty =inty+1    next    其中的 计数器,初值 和 终值 都必须是数值型!   三. 定义过程和函数      1. 定义过程    语法: private sub P_fcz( )    ………    End sub    例: 表格初始化.    Private sub P_bgcsh( )    With msflexgrid1    .TextMatrix(1,0) = "考试编号"    .TextMatrix(1,1) = "学号"    .TextMatrix(1,2) = "姓名"    .TextMatrix(1,3) = "班号"    .TextMatrix(1,4) = "课程名称"    .TextMatrix(1,5) = "分数"    End With    End sub    过程调用 call 过程名    2. 函数定义    语法: Function 函数名(参数 As 类型) As 类型    …………    End function    例: Function M_sf1(strn As String) As String    Dim strSz As String,n As Integer,a As Integer,b As String    n = Len(strn)    strSz = " "    a = n - 8 - 5    If n = 1 Then strSz = "hello"    If n = 2 Then strSz = "pool"    If n = 3 Then strSz = "how do yu do"    b = Mid(strn,6,a)    End Function    函数调用 目标量=函数名( 参数 ) 原文链接:https://www.f2er.com/vb/259952.html

猜你在找的VB相关文章