cvarvb.net的简单介绍

excel vba常用代码

Visual Basic for Applications（简称VBA）是新一代标准宏语言，是基于Visual Basic for Windows 发展而来的。它与传统的宏语言不同，传统的宏语言不具有高级语言的特征，没有面向对象的程序设计概念和方法。而VBA 提供了面向对象的程序设计方法，提供了相当完整的程序设计语言。VBA 易于学习掌握，可以使用宏记录器记录用户的各种操作并将其转换为VBA 程序代码。这样用户可以容易地将日常工作转换为VBA 程序代码，使工作自动化。 [1]

洪雅ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景，ssl证书未来市场广阔！成为成都创新互联公司的ssl证书销售渠道，可以享受市场价格4-6折优惠！如果有意向欢迎电话联系或者加微信：028-86922220（备注：SSL证书合作）期待与您的合作！

数据类型

基本数据类型

即Primary Type Data，下述列表的括号内为字节数：

Byte (1)：无符号数类型，取值范围0-255

Boolean (2)

Integer(2)

Long (4)

Single (4)

Double (8)

Currency (8)

Decimal (14)

Date (8)

String

Object (4)

Variant （根据分配确定） [2]

自定义的数据类型

相当于C语言的struct，例如： [2]

Type 自定义类型名 元素名 As 类型 … [元素名 As 类型] End Type

数组

Option Base 0 ：数组索引值从0开始 [2]

Option Base 1 ：数组索引值从1开始

Dim MyArray(10) ：声明一个数组变量，10是最大的可用的数组索引值

MyArray(5) = 101 ：给数组的元素赋值

Dim Data(10,5) ：声明一个二维数组变量

Data(1,1) = "A001" ：给数组元素赋值

Dim cArr(-11 To 20, 1 To 3) As String ：声明一个数组，定义数组索引值的上下界

Dim dArr() As String ：声明动态数组

ReDim dArr(0 To 5, 1 To 2) ：改变动态数组的尺寸默认把原数据清除。如果保留原来的数据，必须加上参数

Preserve：使用Preserve参数时只能改变最后一位的大小

If UBound(vTemp) = -1 Then：判断数组变量vTemp是否为空数组

End If Erase MyArrar, Data Erase语句清除数组元素，释放变量占用的空间 [2]

常量

编辑

系统定义常量

系统定义常量有3个：True、False和Null。 [4]

固有常量

固有常量是编程时引用的对象库定义的常量。所有固有常量都可以在宏或VBA代码中使用。通常，固有常量通过前两个字母来指明定义该常量。来自VB库的常量则以“vb”开头。来自Access的常量以“ac”开头。可以使用对象浏览器来查看所有对象库中的固有常量列表。 [4]

在VBA中，常量的数据类型有整型、长整型、单精度型、双精度型、字节型、货币型、字符型、日期型和逻辑型。一个整型数据就是一个整型常量，一个长整型数据就是一个长整型常量。例如，12%、-1%是整型常量，32768、10000000是长整型常量，-2.5 1、3.14是单精度实型常量，3.1415926#是双精度实型常量，China、Shanghai是字符型常量，#07/13/2001 11:45PM#是日期常量，由符号 “ # ” 将字符括起来。 [4]

符号常量

可以自行定义的常量即符号常量，必须先定义，后使用。可见，需要声明的常量都是符号常量。 [4]

基本语法格式:

1   [ Publicr/ Private] Const  常量名[As  类型]=表达式   

如：Global Const 符号常量名称 = 常量值 [4]

语句功能:

定义一个符号常量，并将指定表达式的值赋给符号常量。 [4]

语句说明如下: [4]

1)“常量名”指定符号常量的名字。符号常量名可以由字母、数字和下画线组成，但只能以字母开头，不能含有空格。 [4]

2)“表达式”指定符号常量的值。该表达式通常由数值型、字符型、逻辑型或日期型数据以及各种运算符组成，但在表达式中不能出现变量和函数。 [4]

3) public用来表示这个常量的作用范围是整个数据库的所有模块。 [4]

4) private则表示这个常量只在使用该声明常量语句的模块中起作用。 [4]

说明：

1)除用户定义的符号常量外，VBA还提供了许多符号常量，我们可以直接使用。 [4]

2)对数码比较长，并且在程序中多次使用的常量，通常使用符号常量代替。运行程序时，系统自动把程序中的所有符号常量换为赋给它的值。 [4]

变量

编辑

与常量一样，变量也是一块内存空间，用于保存程序运行过程中可能变化的数据。变量的名称是用户定义的一个标识符。 [5]

在代码中需要使用该变量时，只需引用相应的标识符即可，而不用管变量当前的值具体是什么。 [5]

声明

与用户自定义的常量相似，变量在使用之前都需要声明，在VBA中声明变量的语法格式有以下几种： [5]

关键字变量名 AS 数据类型

关键字变量1，变量2 ... 变量n AS 数据类型

关键字变量1 AS 数据类型，变量2 As 数据类型， ... ，变量n AS数据类型

在第二种语法格式中， “变量n”的数据类型为AS关键字后定义的数据类型，而“变量1”、“变量2”、…的数据类型为变体型。 [5]

在VBA中，可用Dim、Private、Public和Static这4个关键字来声明变量，使用不同关键字声明的变量其含义也有所不同。 [5]

◆ 利用Dim关键字声明变量：Dim关键字主要用来在内存中分配一块空间，并为该空间命名，是VBA中声明变量最常用的关键字。使用Dim关键字声明的变量只能在当前过程或模块中使用。 [5]

◆ 利用Private关键字声明变量：Private关键字用于在类模块中声明一个私有变量，它只能在当前的类模块中使用。当定义变量的位置同处于类模块中时，其使用效果与使用Dim关键字定义的变量相同。 [5]

◆ 利用Public关键字声明变量：利用Public关键字声明的变量可以在程序的任何地方调用，而与声明变量的位置无关。 [5]

◆ 利用Static关键字声明变量：Static关键字用于声明静态变量，即变量的值在整个代码运行期间都能被保留。 [5]

赋值

变量在使用时还需要对其进行赋值。在VBA中对变量进行赋值可通过 “ = ” 符号或 “ Set ” 关键字进行。通过 “ = ” 符号对变量赋值的语法格式有以下几种。 [5]

变量名=数据

变量1=变量2 运算符 数据

变量1=变量2 运算符 变量3 … 运算符 变量n

如果在定义变量时指定了变量的数据类型，则为变量所赋的值也必须是该数据类型的值。如果变量定义为Integer类型，而在赋值时却给了变量一个String类型的数据，则在编译运行的过程中将弹出错误弹框。 [5]

运算符

编辑

运算符是在程序中执行计算功能的某些特殊符号，它是程序代码的重要组成部分。在程序代码中，运算符不能单独使用，必须与其操作数共同组成表达式后才具有运算意义。VBA中的运算符包含算术运算符、连接运算符、比较运算符和逻辑运算符等。 [4]

算术运算符

算术运算符主要用于执行四则运算，仅用算术运算符连接起来的表达式称为算术表达式。算术运算符及其作用与示例如表所示。 [5]

例子

名称

结果

-$a

取反

$a 的负值。

$a + $b

加法

$a 和 $b 的和。

$a - $b

减法

$a 和 $b 的差。

$a * $b

乘法

$a 和 $b 的积。

$a / $b

除法

$a 除以 $b 的商，允许小数。

$a \ $b    除法    $a 除以 $b 的商，结果取整。  

$a Mod $b

取余

$a 除以 $b 的余数

注意：

在执行算术运算时，运算符两侧操作的数据类型必须相同，否则会出现“类型不匹配”的错误提示。当“+”运算符左右两侧都是字符串类型的操作数时，执行的是连接运算，如表达式“"Pass+"word"的计算结果为字符串“ PassWord ”。 [5]

连接运算符

连接运算符的作用是将运算符两侧的操作数连接成一个数，其操作数的数据类型通常都为String类型。VBA中的连接运算符有“”和“+”两种，由于使用“+”执行连接运算时，容易与加法运算混淆，所以通常都采用“”进行连接运算。 [5]

比较运算符

比较运算符可以对运算符两侧的操作数执行比较运算，其返回结果为Boolean类型的True或False。比较运算符的操作数通常为具体的数值，当操作数为字符串或其他符号时，是根据该符号的ASCII码进行比较的。VBA中的比较运算符及其作用与示例如表所示。 [5]

例子

名称

结果

$a = $b

等于

TRUE，如果 $a 等于 $b。

$a $b

不等

TRUE，如果 $a 不等于 $b。

$a $b

小于

TRUE，如果 $a 严格小于 $b。

$a $b

大于

TRUE，如果 $a 严格大于 $b。

$a = $b

小于等于

TRUE，如果 $a 小于或者等于 $b。

$a = $b

大于等于

TRUE，如果 $a 大于或者等于 $b。

逻辑运算符

逻辑运算符用于对运算符两侧的操作数执行逻辑运算，参与逻辑运算的操作数本身可以是逻辑表达式(表达式的最终结果为True或 False)，也可以是算术表达式(表达式的最终返回值为0或非0)。 [5]

在逻辑运算中，数值0与逻辑值 False相同，表示逻辑假；非0数值与True相同，表示逻辑真。逻辑运算符及其含义与示例如表所示。 [5]

例子

名称

结果

$a and $b

And（逻辑与）

TRUE，如果 $a 与 $b 都为TRUE。

$a or $b

Or（逻辑或）

TRUE，如果 $a 或 $b 任一为TRUE。

$a xor $b

Xor（逻辑异或）

TRUE，如果 $a 或 $b 同位相异。

Not(12)

Not（逻辑非）

TRUE。

(12) Eqv (12)

两个操作数同为假，返回False;两个操作数同为真，返回True；两个操作数一真一假，返回False

TRUE。

21 Imp 35

运算符左右同为真,返回True;左右同为假,返回True;左真右假,回返 False;左假右真,返回True

TRUE。

语法结构

编辑

if 语句

1   if 条件1 then   语句1elseif 条件2 then   语句2elseif ...    ...else   语句nend if   

Select Case 语句

1   Select Case 表达式   Case 表达式列表1       语句1   Case 表达式列表2       语句2       ...   Case 表达式列表n       语句nEnd Select    

其中的表达式列表可以为： [5]

表达式 例： "A"

用逗号分隔的一组枚举表达式例：2,4,6,8

表达式1 To 表达式2 例：60 To 100

Is 关系运算符表达式 例：Is 60

Do...Loop 语句

1   Do While或Until 条件   语句块1   Exit Do   语句块2Loop   

For...Next语句

1   Do   语句块1   Exit Do   语句块2Loop While或Until 条件   

For Each … Next语句

1   For 循环控制变量=初值To 终值Step 步长   语句块 ‘Exit For语句可以跳出循环体Next   

跳出本次循环的continue语句

1   For 循环控制变量=初值 To 终值 Step 步长    Do '用于模拟continue        语句块         If 条件 Then Exit Do '用于模拟continue        语句块     Loop While False '用于模拟continue Next   

With语句

1   With 对象引用   语句块End With   

On Error语句

1   On Error Goto 出错处理语句的label '跳转到出错处理语句   

或

1   On Error Resume Next '遇到错误，不管错误，继续往下执行   

具有控制作用的函数

If(条件式,表达式1,表达式2) [5]

Switch(条件式1,表达式1,[条件式2,表达式2[,...,条件式n,表达式n]])

Choose(索引式,选项1[,选项2,...[,选项n]]) '这是基于1的索引

其他语句

编辑

注释语句

使用REM或者单引号开始的行。 [6]

语句的连写与续行

如果一行包括多条语句，用冒号分割各个语句。跨多行的语句，在行末用“空格加下划线”表示续行 [6]  。

过程与函数

编辑

12   Sub 过程名(参数表)    语句块    Exit Sub    语句块End Sub     

1   Function 函数名(参数表) As Type   语句块   函数名=表达式   Exit FunctionEnd Function   

可以是Private、Public、Friend、Static等修饰。 [6]

调用函数/过程时，可以加括号或者不加括号。如果调用表达式作为一行的一部分，那么必须用参数，例如函数调用的返回值赋给变量。 调用过程时， 可以使用/不使用call关键字。使用call语句调用过程，如果无参数，则不加括号；如果有参数，必须加括号。如果调用时用括号包住单个参数，则该参数强行按值传递。需要特别注意，不用call不加括号的调用，形参与实参是传值(passed by value)而不是传引用(passed by reference)，这会导致一些对象的方法调用失败。例如： [6]

1   Dim cn As ADODB.Connection    Set cn = CurrentProject.Connection    Dim rs As New ADODB.Recordset        rs.Open "SELECT * FROM myTable" , cn    Dim ExcelApp As New Excel.Application    Dim ExcelWst As Worksheet    Set ExcelWst = ExcelApp.Workbooks.Add.Worksheets(1)    ExcelWst.Range("A2").CopyFromRecordset(rs) '失败，无法执行该行    ExcelWst.Range("A2").CopyFromRecordset rs  '可成功执行该行   

常用内置函数

编辑

VBA的常用内置函数： [5]

MsgBox

InputBox

舍入函数：Fix 向0取整,Int向下取整, Round四舍五入

Rnd： 返回0-1内的单精度随机数

字符串函数： [5]

Filter：对字符串的一维数组的过滤

InStr([Start, ]Str1,Str2[, Compare])与InStrRev： 查找子串

Len：字符串长度

Join：连接一维数组中的所有子字符串

Left,Right,Mid： 截取子字符串

Space(数值) ：生成空格字符串

Ucase,Lcase：大小写转换函数

Ltrim, Rtrim,Trim ：删除首尾空格

Replace

Split：分割一个字符串成为一维数组

StrComp：字符串比较

StrConv：字符串转换

String(number, character)：制定字符重复若干次

StrReverse

日期/时间有关函数： [5]

Year, Month, Day, WeekDay,Hour,Minute,Second： 截取日期时间分量

DateAdd： 日期/时间增量函数

DateDiff(间隔类型,日期1,日期2[,W1][,W2])日期/时间的距离函数

DatePart(分割类型,日期[,w1][,w2])时间分割函数

DateSerial(表达式1,表达式2,表达式3) 合成日期；DateValue(“字符串表达式”)返回日期；

Date,Time,Now,Timer： 返回日期时间

DateValue

TimeSerial：由时间序列得到时间对象

TimeValue：由时间字符串得到时间对象

Weekday：获得日期的周几

WeekdayName

转换函数：CBool、CByte、CCur、 CDate、 CDbl、CDec、CInt、 CLng、CLngLng、CLngPtr、 [5]  CSng、CStr、CVar、CVErr、Asc(字符串表达式)返回第一个字符的Ascii编码值、Chr(ASCII码)返回字符、Hex、Oct、Str(数值表达式)返回字符串、Val(string)、Format、FormatCurrency、FormatDateTime、FormatNumber、FormatPercent、MonthName。

Nz(表达式或字段属性值[,规定值])如果是空，则返回0或者""或者函数的第二个参数值 [5]

验证函数：isNumeric、isDate、isNull、isEmpty、IsArray、IsError、IsMissing、IsObject [5]

数学函数：Abs、Sqr、Tan、Atn（即atan）、Sin、Cos、Exp（e为基的指数）、Log自然对数 [5]

Array：构造一个Array对象 [5]

CallByName: get or set a property, or invoke a method at run time using a string name. [5]

控制流：Choose:类似于C语言的select语句、If相当于IF-ELSE语句、Switch [5]

Command：获取命令行参数 [5]

CreateObject：创建ActiveX对象

CurDir：返回指定驱动器的当前工作路径 [5]

由基本数学函数导出的函数：Sec、Cosec、Cotangent、Cotan、Arcsin、Arccos、Arcsec、Arccosec、Arccotan、HSin、HCos、HTan、HSec、HCosec、HCotan、HArcsin、HArccos、HArctan、HArcsec、HArccosec、HArccotan、LogN

DoEvents：暂时把CPU控制权交回给系统 [5]

Environ：返回环境变量的值 [5]

文件操作： [5]

Dir：返回满足条件的所有文件、目录的名字

EOF

FileAttr

FileDateTime

FileLen

FreeFile Function

GetAttr：返回文件、目录的属性值

Input：读取文件

Loc：文件指针位置

LOF：文件打开时的指针位置

Seek：文件指针定位

Spc：使用Print做position output

Tab：用于Print函数

Error:错误号对应的错误消息 [5]

Windows Registry中的数据：GetAllSettings、SaveSetting、DeleteSetting、GetSetting [5]

GetObject：ActiveX组建的引用 [5]

IMEStatus：返回当前Input Method Editor (IME) [5]

Macintosh平台：MacID、MacScript [5]

金融函数： [5]

DDB：使用double-declining balance计算贬值

FV:计算固定利率的年金

IPmt：计算利率

IRR：计算利率

MIRR：计算利率

NPer：计算周期数

NPV：计算net present value

Pmt：计算支付数

PPmt：计算本金支付数

PV：计算present value

Rate：利息率

SLN：straight-line depreciation

SYD：计算sum-of-years' digits depreciation

Partition：返回字符串，表示一个数值名字落在各个range内。常用于SQL select语句 [5]

QBColor：颜色值 [5]

RGB：颜色值 [5]

TypeName：得到变量的类型名 [5]

VarType：得到变量的类型数 [5]

VB.net有什么内置函数可以判断数据类型的？

数据类型转换函数：

转换函数

将表达式转换成

cbool

boolean

cbyte

byte

ccur

currency

'只在vb7.0以下有效

cdate

date

cdbl

double

cint

integer

clng

long

csng

single

cstr

string

cvar

variant

‘只在vb7.0以下有效

cverr

error

'只在vb7.0以下有效

写脚本的问题

CS脚本!!!

脚本没有那么神秘感,其实就是一些参数的集合,变态不变态,就看你怎么修改了,宝刀在好人手里是除奸的,可

在坏人手里就是.....

脚本就看你怎么用了

首先介绍脚本的基本知识：

什么是bind?

Bind就是分配一个命令到指定的键，它同样能够分配一个alias到指定的键。

比如：

bind "MOUSE1" "+attack"

表示分配+attack（攻击）这个命令到指定的键MOUSE1（鼠标左键）

什么是alias？

Alias就是给一组命令定义一个名称，当你定义过后，CS就认为此alias为一个普通的命令，你可以用bind命

令分配一个键给这个alias，也可以在其他的alias中使用它。

比如：

alias hw "say Hello World!"

则当你在控制台(console)中输入hw这条命令回车执行后你就对服务器里所有的玩家说了Hello World!这句

话，你还可以用bind命令：

bind v "hw"当你按过v键后你同样对服务器里所有的玩家说了Hello World!这句话。

又比如：

alias buym "buy;menuselect 3;menuselect 1"

alias buyv "buy;menuselect 8;menuselect 1"

alias buysay "buym;buyv;hw"

bind j "buysay"

则表示当你执行buysay命令（如按下由bind分配好的j键）后购买MP5和普通防弹衣然后对服务器里所有的玩

家说Hello World!这句话。此alias实现的方法为：第一步执行buym命令，buym命令已经定义好为"打开购买

菜单;选择菜单第3项;再选择菜单第1项"即实现了购买MP5的功能，第二步执行buyv命令，buyv命令已经定义

好为"打开购买菜单;选择菜单第8项;再选择菜单第1项"即实现了购买普通防弹衣的功能，第三步执行之前已经

定义好的hw命令：对服务器里所有的玩家说Hello World!这句话。把这三步命令定义为一个新的命令buysay

然后用bind命令分配一个键（此处为j键）给这个alias（此处为buysay）则当你按下j键后就实现了这三步命

令的功能。

注意：alias语句不能超过259个字符即下面这行字符的长度在Half-Life:Counter-Strike里：

"-----------------------------------------------------------------------------------------

------------------------------------------------------------------------------------------

-------------------------------------------------------------------------------"

什么是脚本(Script)？

脚本(Script)就是含有bind和alias等命令的集合，你可以把这个集合存为一个独立的文件然后在需要的时候

执行，这样就可以方便你在CS中的使用。脚本可以存为后缀名为.cfg的文件放在cstrike文件夹下，执行时在

控制台输入：

exe然后按下TAB键在输入 脚本文件名.cfg即可。比如将以上的脚本存为buys.cfg文件，则在控制台中输入：

exe在按下TAB键然后输入 xxx.cfg则可以实现我们所需要的功能。

比如：我们执行了一系列命令，执行这一系列命令有一个过程。

用一个命令把这一过程定义(alias)好，最后分配(bind)一个键位给这个命令，以后只要按分配好的键位，就

可以实现这一过程。所有的脚本都是通过这一方法实现的。

所有可以用Bind命令设定的键位：

字母键

ABCDEFGHIJKLMNOPQRSTUVWXYZ

数字键

1234567890

鼠标键

MOUSE1 MOUSE2 MOUSE3 MOUSE4 AUX5 AUX6

MWHEELUP MWHEELDOWN

手柄键

JOY1 JOY2 JOY3 JOY4 AUX5 AUX6

特殊键

Ente rSpace Shift Ctrl Pause

Alt Backspace Tab Escape

功能键

F1 F2 F3 F4 F5 F6

F7 F8 F9 F10 F11 F12

编辑键

Ins

Del

Home

End

Pgdn

Pgup

方向键

Leftarrow

Rightarrow

Uparrow

Downarrow

小键盘键

kp_leftarrow

kp_del

kp_end

kp_downarrow

kp_pgup

kp_ins

kp_5

kp_plus

kp_uparrow

kp_enter

kp_pgdn

kp_rightarrow

kp_slash

kp_minus

kp_home

其他键

,

.

/

;

’

*

[

]

-

=

~

注意：小键盘上我们使用kp_end、kp_downarrow等等键位名称代替数字键名Num 1、Num 2，其他类似。

所有可以设定的命令/变量

命令/变量的名称 服务端/客户端使用 基本的设定种类 注释

+attack 客户端 玩家 攻击

+attack2 客户端 玩家 特殊攻击/功能(如开瞄准镜、单倍放大等等)

+back 客户端 玩家 退后

+duck 客户端 玩家 蹲下

+forward 客户端 玩家 前进

+jump 客户端 玩家 跳跃

+klook 客户端 玩家 用键盘看

+left 客户端 玩家 向左转

+lookdown 客户端 玩家 向下看

+lookup 客户端 玩家 向上看

+mlook 客户端 鼠标 用鼠标看

+movedown 客户端 玩家 向下移动(如爬梯子、游泳)

+moveleft 客户端 玩家 向左平移

+moveright 客户端 玩家 向右平移

+moveup 客户端 玩家 向上移动(如爬梯子、游泳)

+reload 客户端 玩家 换子弹

+right 客户端 玩家 向右转

+showscores 客户端 玩家 显示玩家的分数和Ping值

+speed 客户端 玩家 让玩家走路如果奔跑时；奔跑如果走路时

+strafe 客户端 玩家 平移键

+use 客户端 玩家 使用键(拆炸弹、救人质等等)

adjust_crosshair 客户端 玩家 改变准星颜色

alias "cmd1; cmd2" 客户端 玩家 定义命令批量处理变量

allowupload 客户端 上传/下载 是否允许上传本地的文件到服务器。

ambient_fade 100 客户端 音频 设定周围声音多远距离消失

ambient_level 0.300 客户端 音频 设定周围声音的等级

appenddemo 客户端 demo 在该录像文件后继续录像，不覆盖原录像

bind 客户端 玩家 设定键位用于执行命令

bottomcolor 6 客户端 玩家 设定玩家人物模型的底部颜色

brightness 1 客户端 视频 设定亮度

buy 客户端 玩家 打开购买武器菜单

buyequip 客户端 玩家 打开购买装备菜单

buyammo1 客户端 玩家 买主弹药

buyammo2 客户端 玩家 买手枪弹药

cancelselect 客户端 玩家 取消选择

changeteam 客户端 玩家 打开队伍选择菜单

cl_allowdownload 0 客户端 上传/下载 客户端是否允许下载

cl_allowupload 0 客户端 上传/下载 客户端是否允许上传

cl_anglespeedkey 0.670 客户端 玩家 设定方向键改变视角的速度

cl_backspeed 400 客户端 玩家 客户端设定后退的速度

cl_bob 0.010 客户端 玩家 客户端设定奔跑时手臂摆动的幅度

cl_bobcycle 0.800 客户端 玩家 客户端设定奔跑时手臂摆动的频率

cl_bobup 0.500 客户端 玩家 客户端设定奔跑时手臂摆动的范围

cl_download_ingame 0 客户端 上传/下载 客户端设定是否允许在游戏里下载

cl_forwardspeed 400 客户端 玩家 客户端设定前进的速度

cl_gaitestimation 1 客户端 玩家 开启估计玩家的运动步幅

cl_gg 0 客户端 玩家 开关游戏的标准模式

cl_himodels 客户端 玩家 客户端设定是否允许使用高质量模型

cl_messages 客户端 玩家 客户端设定显示服务器信息

cl_movespeedkey 0.300 客户端 玩家 设定键盘移动速度

cl_nopred 0 客户端 玩家 开关玩家的预先选择

cl_pitchdown 客户端 玩家 设定玩家向下看的最大角度，默认:89

cl_pitchspeed 225 客户端 玩家 设定角速度

cl_pitchup 客户端 玩家 设定玩家向上看的最大角度，默认:89

cl_showfps 1 客户端 玩家 显示你的FPS值

cl_shownet 0 客户端 玩家 显示你的网络传输包值

cl_slist 10 客户端 玩家 设定列出的服务器个数

cl_solid_players 1 客户端 玩家 开关固定玩家模型

cl_upspeed 320 客户端 玩家 设定向上移动(如爬梯子、游泳)的速度

cl_waterdist 4 客户端 玩家 设定在水下最深所能到达的距离

cl_yawspeed 210 客户端 玩家 设定转身的速度（由服务器最大值设定）

clear 客户端 玩家 清除控制台上的信息

cmd 客户端 玩家 执行命令

cmdlist 客户端/服务端 所有 列出所有命令

connect 客户端 玩家 连接到服务器用输入IP的方式

cvarlist 客户端/服务端 所有 列出所有变量

developer 0 客户端 开发者 开关调试信息

disconnect 客户端 玩家 从服务器上断开连接

drawradar 客户端 玩家 显示雷达

drop 客户端 玩家 扔掉当前武器/装备

echo "message" 客户端 玩家 显示"message"中的文字信息

enableconsole 客户端 玩家 允许控制台

escape 客户端 玩家 取消键

exit 客户端/服务端 所有 退出游戏

fakelag 0 客户端 玩家 模拟Lag延迟

fakeloss 0 客户端 玩家 模拟Loss网络丢包

force_centerview 客户端 玩家 强制玩家回到正前方的视角

fps_lan 客户端 玩家 设定局域网游戏中的最大FPS值

fps_modem 客户端 玩家 设定互联网游戏中的最大FPS值

fps_single 客户端 玩家 设定单人游戏中的最大FPS值

fullinfo 客户端 玩家 显示用户信息

fullserverinfo 客户端 玩家 显示服务器信息

gamma 3 客户端 视频 设定gamma亮度值

getcertificate 客户端 玩家 从上获取CD-Key认证

getsv 客户端 玩家 列出服务器的IP地址和服务器的总数

gl_alphamin 0.250 客户端 视频 设定最小alpha混合等级

gl_clear 0 客户端 视频 开关对画面上各个模型连接的部分的连贯渲染

gl_cull 1 客户端 视频 是否只对可以看到的画面进行渲染

gl_d3dflip 0 客户端 视频 在Direct3D模式中开关反向渲染命令

gl_dither 1 客户端 视频 开关颜色抖动

gl_dump 客户端 视频 列出显卡的信息

gl_flipmatrix 0 客户端 视频 开关特殊的准星修正当适用3DNow和3D fx Mini OpenGL驱动时

gl_keeptjunctions 0 客户端 视频 开关显示材质间的缝隙

gl_lightholes 0 客户端 视频 光洞效果开关

gl_max_size 256 客户端 视频 贴图材质的最大解析度

gl_monolights 0 客户端 视频 开关统一光源（无阴影）OpenGL适用

gl_overbright 0 客户端 视频 开关最大亮度模式

gl_palette_tex 0 客户端 视频 开关调色贴图值、材质

gl_picmip 0 客户端 视频 环境贴图效果(0-3)

gl_playermip 0 客户端 视频 玩家模型的贴图效果(0-3)

gl_polyoffset 4 客户端 视频 设定多边形补偿

gl_round_down 3 客户端 视频 设定材质循环

gl_smoothmodels 0 客户端 视频 玩家模型光滑处理开关

gl_spriteblend 0 客户端 视频 开关子画面混合

gl_texels 客户端 视频 报告传输到显卡的texel数量

gl_texsort 0 客户端 视频 开关一个texel的种类

gl_texturemode [type] 客户端 视频 设定渲染模式[type]的类型: gl_nearest_mipmap_nearest,

gl_linear_mipmap_nearest (这两个进行双线性过滤处理)和 gl_nearest_mipmap_linear,

gl_linear_mipmap_linear (这两个进行三线性过滤处理)

gl_zmax 4096 客户端 视频 设定Z-Buffer缓存的最大值

gl_ztrick 1 客户端 视频 开关3D fx的加速渲染模式

graphheight 64 客户端 玩家 设定r_netgraph的显示高度

graphhigh 512 客户端 玩家 设定r_netgraph显示的最大值

graphmean 1 客户端 玩家 设定r_netgraph显示的平均值

graphmedian 128 客户端 玩家 设定r_netgraph显示的中间值

hideconsole 客户端 玩家 隐藏控制台

hideradar 客户端 玩家 隐藏雷达

hisound 1 客户端 音频 是否使用高品质音频

hud_centerid 0 客户端 玩家 是否在屏幕中间显示玩家的ID名字

hud_fastswitch 0 客户端 玩家 是否快速切换武器

hud_saytext_time 5 客户端 玩家 设定文字在屏幕上停留的时间

impulse 100 客户端 玩家 开关战术手电

impulse 201 客户端 玩家 喷图

lastinv 客户端 玩家 切换到上一次使用的武器

invnext 客户端 玩家 切换到下一种武器

invprev 客户端 玩家 切换到上一种武器

kill 客户端 玩家 在游戏中自杀

所以说改脚本其实是为自己设计的最强作弊软件.不外如此.

VB中Mod、inputbox 、Msgbox是什么？

mod 是求余函数，就是求一个数除以另一个数所得的余数。

如 11 mod 4 其运算结果是 3，是数字型值。

inputbox 是输入对话框，接收用户的输入。结果是字符串值。

msgbox 是消息对话框，用于弹出提示。

。。。。。。。。。黑龙江省巴彦县兴隆镇 张志晨。。。。。。。。