VB-ZS-202411080841

作者:犯困乐 发布时间: 2025-10-17 阅读量:29 评论数:1

https://cankaoshouce.com/vb/vb-course.html

VB中变量的命名规则:

必须以字母或汉字开头,由字母、汉字、数字或下划线组成,不能含有小数点、空格等特殊字符。 变量名的长度不能超过255个字符,控件、窗体、类和模块的名字不能超过40个字符 不能使用VB中的关键字(语句名、函数名等),即不能关键字同名(例如End、Len、Sub等)。 VB中不区分变量名的大小写。 为了增加程序的可读性,可在变量名前加一个缩写的前缀来表明该变量的数据类型。

合法的整常数

在VB中,整常数的表示有特定规则,例如B选项的%O100不是合法的整常数,因为百分号(%)后面应该跟随十进制数字合法的整常数包括十进制(如100)、十六进制(&H100)、八进制(&O100)等。

合法字符常数的定义

字符常量是用一对单引号括起来的单个字符,例如‘a’、‘9’、‘!’。 字符常量中的单引号只起定界作用,并不表示字符本身。字符常量区分大小写字母,例如‘A’和‘a’是两个不同的字符常量。撇号(’)是定界符,不属于字符常量的一部分

VB中变量符号的解释

dim a! '定义单精度Single型变量a dim a@ '定义Currence型变量a dim a# '定义双精度Double型变量a dim a$ '定义a为字符串tring dim a% '定义a为整型变量integer dim a& '定义a为长整型变量long

VB中的常量

直接常量:

数字型常量 2、34.5

字符串型常量 “123” “Abc” “你好”

逻辑型常量 True和False

日期型常量 #12-23-2015#

使用Const关键字声明的常量:

例如:

  Const A As String = "今天学常量的使用"

  Const a As Integer = 1

  Const PI As Double = 3.14159265

  Const d As Date = #12/23/2015#

单精度常数

范围为 -3.4028235E+38 到 -1.401298E-45(负值),从 1.401298E-45 到 3.4028235E+38(正值)。 单精度数字存储实数的近似值

MOD函数 第七题解析

MOD取余函数

result = number1 Mod number2

结果是 number1 除以 number2 后得到的余数。 例如,表达式 14 Mod 4 的计算结果为 2

运算符号

\符号

符号\ 表示取整数部分, 例 10\3 结果是 3

^符号

求以某个数为底、以另一个数为指数的幂

number ^ exponent

numberexponent可以是任何数值表达式

示例:

Dim exp1, exp2, exp3, exp4, exp5, exp6 As Double
exp1 = 2 ^ 2
exp2 = 3 ^ 3 ^ 3
exp3 = (-5) ^ 3
exp4 = (-5) ^ 4
exp5 = 8 ^ (1.0 / 3.0)
exp6 = 8 ^ (-1.0 / 3.0)

上面的示例产生下列结果:

exp1 的结果为 4(2 的平方)。

exp2 的结果为 19683(先求 3 的立方,再对得到的值求立方)。

exp3 的结果为 -125(-5 的立方)。

exp4 的结果为 625(-5 的四次方)。

exp5 的结果为 2(8 的立方根)。

exp6 的结果为 0.5(1.0 除以 8 的立方根)。

16/4-2^5*8/4 MOD 5\2

考符号运算循序和函数

表达式

数学表达式3<=x<10在vb中表示为

3<=x AND x<10

RND函数 第十题

RND函数是一个随机函数

使用此函数会返回小于 1 但大于或等于 0 的一个随机数

函数可返回一个随机数。数字总是小于 1 但大于或等于 0

如果要生成指定范围内的随机数可以使用以下代码

Int((upperbound - lowerbound + 1) * Rnd + lowerbound)

此处,upperbound 是范围中的最大数字,lowerbound是范围中的最小数字

例:

Module Module1
    Sub Main()
        dim max,min
        max=100
        min=1
        Console.WriteLine(Math.Int((max-min+1)*Rnd()+min))
    End Sub
End Module

输出:71

Int和Fix函数 取整函数 第11题

Int函数可返回指定数字的整数部分 相同作用的函数还有 Fix FIX函数取整不进位!! 取正数时这两个函数没区别

例子1:

Module Module1
    Sub Main()
        Console.WriteLine(Int(6.83227))
    End Sub
End Module

返回结果为6

例子2:

Module Module1
    Sub Main()
        Console.WriteLine(Int(-6.13443))
    End Sub
End Module

返回结果为-7

Len函数 第12题

Len函数可返回字符串中字符的数目

例子:

Module Module1
    Sub Main()
        Console.WriteLine(Len("123程序设计ABC"))
    End Sub
End Module

输出:14

注:一个英文占一个字符位置 一个汉字占二个字符位置!

Round函数

Round函数可对数字进行四舍五入

例子1:

Module Module1
    Sub Main()
        Dim x
        x=24.13278
        Console.WriteLine(Math.Round(x))
    End Sub
End Module

输出:24

VB中赋值语句格式 let

变量名 = 表达式
对象名.属性 = 表达式  (例:form1.caption=“张三”)
变量名 = 对象名.属性 

赋值语句的功能是将表达式计算的值保存到计算机的内存(变量)中,所以赋值语句是有方向的,总是将“=” 右边的值送给“=”左边的变量

分隔号

VB中给多个变量赋值 用冒号(:)隔开

例:

x=1:y=1:z=1

Mid函数 16、17、18题

Mid函数可从字符串中返回指定数目的字符

Mid(string,start[,length])

参数

描述

string

必需的。从其中返回字符的字符串表达式。如果字符串包含 Null,则返回 Null

start

必需的。规定起始位置。如果设置为大于字符串中的字符数目,则返回空字符串("")。

length

可选的。要返回的字符数目。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从 start 到字符串结束的所有字符。

例1:

a=123+MID("123456",3,2)

符号“+”为算数运算符号 123+34=157

输出:a=157

例2:

a=123&MID("123456",3,2)

符号“&”为符号连接符 123&34 结果魏12334

输出:a=12334

Left函数

Left函数可从字符串的左侧返回指定数目的字符

Left(string,length)

参数

描述

string

必需的。从其中返回字符的字符串。

length

必需的。规定需返回多少字符。如果设置为 0,则返回空字符串("")。如果设置为大于或等于字符串的长度,则返回整个字符串。

例:

Module Module1
    Sub Main()
        dim txt
        txt="This is a beautiful day!"
        Console.WriteLine(Left(txt,11))
    End Sub
End Module

输出:This is a b

String函数 19题

StrDup 函数可返回包含指定长度的重复字符的一个字符串

StrDup(number,character)

参数

描述

number

必需的。被返回字符串的长度。

character

必需的。被重复的字符。

例:

Module Module1
    Sub Main()
        Console.WriteLine(StrDup(4,"XYZ"))
    End Sub
End Module

输出:xxxx

Visual Basic的标识符 20题

以英文大、小写字母开头,后面跟着若干数字、英文大小写字母,下划线'_'或美元符号'$'不可以和关键字相同,总长度不要超过255个。在Basic语言里,标识符不分字母大小写

VB中的数值 21题

在vb中数值的表示

十六进制数以&H开头 八进制数以&O表示

Sgn函数(Sign) 22题

Sign函数可返回指示指定数字的符号的整数

VB 6.0 中该函数名为 Sgn

Math.Sign(number)

参数

描述

number

必需的。合法的数值表达式。

如果数字是:

>0 - Sign 会返回 1。

<0 - Sgn 会返回 -1。

=0 - Sign 会返回 0。

Mid函数 24题

Mid函数可从字符串中返回指定数目的字符

Mid(string,start[,length])

参数

描述

string

必需的。从其中返回字符的字符串表达式。如果字符串包含 Null,则返回 Null

start

必需的。规定起始位置。如果设置为大于字符串中的字符数目,则返回空字符串("")

length

可选的。要返回的字符数目。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从 start 到字符串结束的所有字符

VB中为一个日期型的数据赋值

对Date类型的变量赋值常用的方法有四种

Option Explicit
 
Private Sub Form_Click()
    Dim dt As Date
    '方式1: 使用系提供的Date函数
    dt = Date
    Print dt
     
    '方式2: 使用系提供的Now函数
    dt = Now
    Print dt
     
    '方式3: 使用字符串
    dt = "2015-8-23"
    Print dt
     
    '方式4: 用#封闭的日期
    dt = #9/3/2015#
    Print dt
End Sub

Str函数

使用Str函数可以把数据转化为字符串

Sqr函数

Sqrt函数可以返回一个数的平方根

注:VB 6.0中该函数名为Sqr

Math.Sqrt(number)

参数

描述

number

必需的。大于等于 0 的有效数值表达式。

例子:

Module Module1
    Sub Main()
        Console.WriteLine(Math.Sqrt(9))
    End Sub
End Module

输出:3

UCase函数

UCase函数可把指定的字符串转换为大写

UCase(string)

参数

描述

string

必需的。需被转换为大写的字符串。

例子:

Module Module1
    Sub Main()
        Dim txt
            txt="This is a beautiful day!"
        Console.WriteLine(UCase(txt))
    End Sub
End Module

输出:THIS IS A BEAUTIFUL DAY!

Val函数

Val是一个可以把数值字符串转化为数值的函数

ASC函数

ASC函数可把字符串中的第一个字母转换为对应的ANSI代码,并返回值

Module Module1
    Sub Main()
Asc(string)
    End Sub
End Module

参数

描述

string

必需的。字符串表达式。不能为空字符串!

例子:

Module Module1
    Sub Main()
        Console.WriteLine(Asc("A"))
        Console.WriteLine(Asc("F"))
    End Sub
End Module

返回:65 70

Chr函数

Chr函数把指定的 ANSI 字符代码转换为字符。

注释:从 031 的数字代表不可打印的 ASCII 代码,举例,Chr(10) 会返回一个换行符

Chr(charcode)

参数

描述

charcode

必需的。标识某个字符的数字。

例子:

Module Module1
    Sub Main()
        Console.WriteLine(Chr(65))
        Console.WriteLine(Chr(97))
    End Sub
End Module

返回: A a

LCase函数

LCase函数可把指定的字符串转换为小写

LCase(string)

参数

描述

string

必需的。需要被转换为小写的字符串

例子:

Module Module1
    Sub Main()
        dim txt
        txt="THIS IS A BEAUTIFUL DAY!"
        Console.WriteLine(LCase(txt))
    End Sub
End Module

输出:this is a beautiful day!

LTrim、RTrim、Trim

LTrim 函数可删除字符串左侧的空格

RTrim 函数可删除字符串右侧的空格

Trim 函数可删除字符串两侧的空格

Change事件

当用户在文本框中输入内容时会触发文本框的Change事件

评论