第一次vb培训讲座提纲

2012高等院校计算机等级考试二级VB复座提.fr（.vb（VB6.0Vistawin7VB安装（VB运行快捷方式上点击右键→属性→打开文件位置）→VB6.exe点击右键→属性→兼容性→兼容模式中“以兼容模元素”打钩→等级“以管理员运行此程序”打钩→重启VB即可。在VB中，对象是指在系统中的基本运行实体，比如窗体、控件、、调试、剪贴板、屏幕等等。VB中的对象分为两类：一类是由系统设计好的，称为预定义对象，可以直接使用或对其操作；另一类由用户定义，可以像C++一样建立用户自己的对象。（Name（Color是由VB预先设置好的、能够被对象识别的动作，不同对象能够识别的也不一样。（Click（DblClick个对象可识别一个或者多个因此可以使用一个或者多个过程对用户或者系统的事PrivateSub对象名称_名称End，和方法都是对象的动作是告诉电脑干了一件什么事情之后再干什么，方法是告诉，无10-%2&4 !4#8@8$Sring*无8无2无4（通用无#05/16/2009#）定义方法：[Public|Private]Const常量名=表达式[,常量名[As类型]=表达式]… MaxNumAsInteger=254,MinNum=MaxNum-200 VBvb开头。如：vbCrlf相当于执行回车+换行操作。vb开头的255个VBVB33个小写字母做前缀变量序代码窗口，点击“对象”和“”后，在空白位置。Dim和static区别：dim只是系统临时借给某个变量一个空间，内存区是程序在运行到留原来的数值。但static是固定的，程序在编译时就开辟该内存区，故称静态变量，所以当VB中的赋值通过“== X X=- DimXasBooleanX=- 0数值转换成布尔为True，0FalseDim、Static（作用同静态变量、ReDim（定义动态数组）定义：Dim数组名(下标上界)as数据类型DimArrayDemo(5)AsDimas数据类型DimArrayDemo(5,5)AsDim数组名([下界toto上界]…)DimArrayDemo(-2To5,6)AsDimnasDimArrayDemo(n+2)AsConstn=DimArrayDemo(-2To5,n)As0a（10）11个元素，b（2,3）12个元素，c（-2to2）5OptionBasen10，该语句只能出现在窗体层或者模块层。如果定义的是数组，则下标的默认下界对每一维都有效。OptionBase1时，a（10）10个元素。4)1)=1LBound(A2)=0LBound(AUBound(A,1)=100，UBound(A,2)=50,UBound(A,3)=4。定义通常需要两步：首先在窗体层、标准模块或过程中用Dim或Public一个没有下标的数组（括号不能省略ReDim语句定义带下标的数组。注意：ReDim是重新定义数组的上界，会抹去之前数组中所有的数据；ReDimPreserve不会度；对于数组，只有当用ReDimPreserve改变最末维上界时才能保留原数据；Erase初[Private|PublicType数据类型名元素名[(下标)]as类型名as类型名…EndPublicTypeStuInfoStuIDAsInteger AsString*2Exam(1To2)AsIntegerEndTypeDimGrade1as 调用记录类型变量可以通过“数据类型名.Grade1.StuID的方式调用或者with方法：With End记录数组用同样方式定义：DimStuTCM(100asSpc字符位开始输出。Clsprint对象显示的文字和图形。Move方法：移动控件到指定位置，并控制大小。格式：[对象.]Move左边距离[,上边距离[,相关 输入框aa注意：aa为输入框的返回值，为字符格式。xpos,ypos设置框的位置，必须同时写Msgbox可以当函数使用，也可以当一个单独的语句使用。当函数使用：msgbox(Prompt[,type][,title])type单独使用：Msgbox例：MsgBox"这里是框内显示的信息",vbOKOnly,"这里是框的标题^--*/\5Mod+-3-&=2=2<>或2<>2<3<4>4>53<=54>=5SQLSelect非True时，结果与True结果为True；否则为或两操作都为False两操作数的布尔值不False两操作的布尔值相同False左边为True，右边为FalseFalse；True&+”1^2-(取负数3 4\56 7&8 9 框框 PrivateSubForm_KeyPress(KeyAsciiAsPrivateSubForm_KeyUp(KeyCodeAsInteger,ShiftAsInteger)PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)你按的是键盘上哪个键；KeyPressASCII码，也就是你按键之后反映到ASCII码。ASCIKeyDownKeyUpKeyCode值是一样的。KeyDownKeyUpShift值见下表：

常用鼠标：Click（单击）和DblClick（双击，除此之外还有按下鼠标MouseDown、松开鼠标MouseUp以及移动鼠标MouseMove。PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsPrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)PrivateSubForm_MouseMove(ButtonAsIntegerShiftAsIntegerXAsSingleYAsSingle)XY为鼠标的位置坐标，Botton值见下表：控件中文字的字形，通过框设置字体 Index属性作为数组的下标。TabIndexTab键的顺序。得到焦点出发GotFocus，焦点离开出发LostFocus。

部分Public 4.3.10左对齐、1右对齐、2124.3.2文本框最大字符数，001仅水平2仅垂直3vbCrlf控制。04.2：窗体上设置两个带水平和垂直滚动条的文本框，并设置相应的四个按钮和一些标例题4.3：设计一个，内容为随机产生的10以内的加减乘法算式，另设计一个文本框，msgbox提示，并根据用户的按键决定是否重做或重新出题，最后设计一个按钮4.4.1框（图像框print方法接收文本，但是头4.4编写程序，用文本框检查口令输入。在窗体上建立一个文本框、一个移到文本框中，接着在文本框中输令，然后单击第二个命令按钮，检查输入的口令是否正确如果正确则在框中显示一个图形否则显示一个信息框，要求重新输入，此时将调用第一个命令按钮的Click过程，再一次在文本框中输令，直到输入正确的口令为止。如果单击“结束”按钮，则结束程序truetrue时，则回车Value的值：True选中；FalseValue的值：0未选中；1选中；选中Alignment：对齐方式，010为单列显示，1值多想，用鼠标或空格键选择，2ShiftCtrlSelected（n）n+1True“🡨值4.7：如下图所示，实现简单的调色板功能，RGB颜色用十进制数字表示，颜色代码用十属性：Interval间隔多少毫秒执行一次计时器中的程序，10001Label2IfButton=2Then[对象 If1[ElseIf2[ElseIf3…n]EndIfSelectCaseCase[Case…[CaseEnd表达 例 表达式 <For循环变量=to[Step步长][ExitNext循环变量循环变量While条件[ExitLoopWhile|Until循环条件DoWhile|Until循环条件][ExitDo]Goto目标为行号或标号，标号是一个以冒号结尾的标示符，行号是一个整型数，它不以冒VB语言（[Public|Private][Static]Sub过程名[(参数列表)]End[Public|Private][Static]Function[(参数列表AsEndCall[参数列表]进行调（ByRef根据模式不同进行分类：顺序模式（顺序文件是指读入或读出文件时，从第一条记录“顺序”地读到最后一随机模式（随机文件要求文件中的每条记录的长度都是相同的，记录与记录之间不二进制模式（二进制文件：以字节来定位数据，允许程序按所需的任何方式组织和访形式都可以用二进制模式来。Open文件名ForAs[Len=记录长度Random：以随机模式打开文件，也是默认方式。可同时进行写入和读出的操作，但[#]LOF（EOF（写：Print文件号，[输出列表]区别：writeprint#print方法一样，根据InputLineI