VB学习资料

一、VB程序开发的一般步骤：1、建立用户界面2、设置对象属性3、编写代码二、VB窗体和常用控件1、窗体1）常用属性属性功能Name设置对象的名称Caption设置对象的标MATCH_ word word文档格式规范word作业纸小票打印word模板word简历模板免费word简历 _1714029772053_0Top窗体上边离屏幕上边的距离Left窗体左边离屏幕左边的距离Width对象的宽度Height对象的高度Enabled决定对象是否可用Visible决定对象是否可见BackColor设置对象的背景色ForeColor设置对象的前景色Font设置对象的字体Picture设置窗体背景图片注：Font中：FontName、FontSize、FontBold、FontItalic、FontUnderline、FontStrikethru（字体、字号、加粗、倾斜、下划线、删除线）2）窗体常用事件常用事件名触发条件Click单击窗体空白处Dblclick双击窗体空白处Load当窗体加载到内存时UnLoad当窗体从内存中卸载GotFocus当窗体获得焦点时LostFocus当窗体失去焦点时4）窗体常用方法常用方法名功能Hide隐藏窗体Show显示窗体Move移动窗体到指定位置SetFocus获得焦点2、一般类控件的使用1）Label常用属性名功能Caption设置标签上显示的标题Aligment设置对齐方式Autosize是否自动适应2）TextBox常用属性名功能Alignment设置对齐Text文本框里显示的内容MultiLine是否允许多行显示ScrollBars设置是否显示滚动条三、选择类控件1．OptionButton(单选按钮)常用属性名功能Value设置是否被选中Style设置样式常用事件触发条件Click单击时触发2.CheckBox（复选框）常用属性名功能Value设置是否被选中Style设置样式常用事件触发条件Click单击时触发3.ListBox(列 表 关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf 框)常用属性名功能List列表项ListIndex当前被选中的列表项索引值ListCount列表框中列表项总项数Text当前被选中的列表项内容Style设置样式常用事件触发条件Click单击时触发常用方法名功能AddItem添加列表项RemoveItem删除列表项Clear清除所有列表项说明：①List属性是一个数组，一般 格式 pdf格式笔记格式下载页码格式下载公文格式下载简报格式下载 为：List（x）如List（1）表示是第二个项目②ListIndex属性的值为当前选中的列表项的索引值，0表示选中，-1表示没有选中。③ListCount属性表示一共有多少个列表项④Text属性表示当前选中的列表项的内容。四、方法方法是VB自身提供的一些特殊的过程，用来完成一定的操作。不同的对象可执行不同的操作，因此，对象调用的方法也有所不同。窗体上常用的方法有：(1)Show方法调用该方法可以将窗体显示在屏幕上。调用格式：[对象名].Show(2)Hide方法调用该方法可以隐藏窗体，但不会卸载窗体。调用格式：[对象名].Hide(3)Move方法(4)Cls方法可以清除窗体内的文本和图形。调用格式：[对象名].Cls(5)Print方法在窗体上显示文字信息。调用格式：[对象名].Print五、VB的数据类型表数据类型关键字类型符前缀字节范围整型Integer%int2-32768~32767长整型Long&lng4-2147483648~2147483647负数：-3.402823E38~1.401298E-45单精度型Single!sng4正数：1.401298E-45~3.402823E38数值负数：-1.79769313486232D308~-4.94065645841247D-324型双精度型Double#dbl8正数：4.94065645841247D-324~1.79769313486232D308-922337203685477.5808~货币型Currency@cur8922337203685477.5807字节型Byte无byt10~25501,01,100~12,31,9999日期型Date(time)无dtm8(00:00:00~23:59:59)逻辑型Boolean无bln2True与False字符型String$str0~65535个字符对象型Object无obj4任何对象引用变体型Variant无vnt上述有效范围之一六、运算符和表达式1、算术运算符运算符含义示例结果优先级^乘方5^2251-负号-7-72*乘3*7213/除2/50.43\整除(直接取整)2\504Mod取模(求余)7Mod215+加4+8126-减2.3-11.362、连接运算符运算符含义示例结果&连接两个字符串“China”&”jiangxi”“Chinajiangxi”+计算和，也可连接字符串“12”+”34”“1234”3、关系运算符关系运算符含义示例结果=等于“abc”=”ABD”False>大于(13+5)>2True>=大于等于“abc”>=”abd”False<小于“abc”<”abd”True<=小于等于“123”<=”4”True<>不等于“a”<>”A”TrueLike字符串匹配“abcde”Like”*cd*”TrueIs对象引用比较七、常用内部函数1、数学函数:数学函数主要用于各种数学运算函数含义示例结果Abs返回数的绝对值Abs(-3.2)3.2Atn返回弧度的反正切值Atn(1).785398163397448Cos返回弧度的余弦值Cos(1).54030230586814Exp返回e的指定次幂Exp(1)2.71828182845905Fix返回数的整数部分(直接取整)Fix(-50.6)-50Int返回不大于给定数的最大整数Int(-50.6)-51Log返回数的自然对数Log(1)0Rnd返回0~1之间的随机数Rnd0~1之间的随机数Sgn返回数的符号值Sgn(-2)-1Sin返回弧度的正弦值Sin(1).841470984807897Sqr返回数的平方根值Sqr(9)3Tan返回弧度的正切值Tan(1)1.55740772465492、字符串函数：用于处理字符串信息函数含义示例结果Instr([N1,]C1,C2[,M])返回C2在C1中首次出现的位置Instr(4,”xxpxxpXp”,“p”)6(从N1开始)*InstrRev(C1,C2[,N1][,M])与Instr类似，只从尾部查找Instr(“ASDFDFDFSDSF”)5*Lcase(C)将C从大写字母变为小写字母LCASE(“Hello”)“hello”Left$(C,N)将C中左边起取N个字符Left$(“World”,2)“Wo”Len(C)返回C的长度Len(“name”)4Ltrim$(C)删除C左端的空格Ltrim$(“name”)“name”*Replace(C,C1,C2[,N1][,N2][,在C中从1或N1开始C2替换Replace(“asabababsadb”,““as***sM])C1共N2次ab”,“*”,2)adb”Mid$(C,N,M)在C中从N个开始往后取M个字符，如Mid(123,2,1)2Right$(C,N)从C中右边起取N个字符Right$(“World”,2)“1d”Rtrim$(C)删除C右端的空格Rtrim$(“name”)“name”Space$(N)返回N个空组成的字符串Space$(3)“”StrComp(C1,C2[,M])返回C1，C2比较的结果，相等时为0，小于StrComp(“AB”,“ab”)-1时为-1，大于时为1String$(N,C)返回N个C中第一个字符组成的字符串String$(2,“xyz”)“xx”*StrReverse(C)将C逆序排列StrReverse(“xyz”)“zyx”Trim(C)删除C的左右空格Trim(“na”)“na”*Ucase(C)从C中小写字母改为大写字母Ucase(“xyz”)“XYZ”3、日期和时间函数函数名功能实例结果Date[()]返回系统日期Date$()2008-4-28Day(C|N)返回日期代号（1~31）Day(“08,04,28”)28Hour(C|N)返回小时（0~24）Hour(#1:12:20PM#)13(下午)Minute(C|N)返回分钟(0~59)Minute(#1:12:20PM#)12Month(C|N)返回月份(1~12)Month(“08,04,28”)4Second(C|N)返回秒(0~59)Second(#1:12:20PM#)20Now()返回系统日期和时间Now2008/4/2810:40:01PMTime[()]返回系统时间Time10:40:01PMWeekDay(C|N)返回星期数(1~7)星期WeekDay(“08,04,28”)2日为1,星期一为2Year(C|N)返回年代号Year(365)返回相对于1900年(1753~2078)1899/12/30后365天的年代号八.数据的输入输出1.InputBox函数InputBox(提示[，标题][，缺省][，x坐标位置][，y坐标位置])其中:提示为提示信息,标题为对话框标题,缺省为输入区缺省值函数返回字符类型.2.MsgBox函数和MsgBox过程函数形式:变量[%]=MsgBox(提示[,按钮][，标题])过程形式:MsgBox提示[,按钮][,标题]3、输出数据使用Print方法实现数据的输出格式：[Object.]Print{Spc(n)|Tab(n);}expressioncharpos其中：Object为窗体，图片框，打印机等对象。Expression为待输出的数据(数值型或字符型)。Charpos为逗号或分号，定位下一个数据。如省略，则在下一行输出下一个数据。Spc(n)和Tab(n)为数据定位函数。①Tab函数格式：Tab[(n)]功能：输出的数据定位到n列指定的位置，如省略n，则在下一行首位置输出；如当前位置大于n，则在下一行的n列输出；如n<1，则默认输出位置为1；如n大于行宽则输出位置为nMod行宽。②Spc函数格式：Spc(n)功能：在下一个数据之前插入n(0~32767)个空格。如n小于输出行的宽度，则在当前位置输出；如n大于输出行的宽度，则输出位置为当前位置+nMod行宽。九、选择语句1.If…Then语句(单分支结构)If<表达式>Then语句块EndIf或If<表达式>Then<语句>2.If…Then…Else语句(双分支结构)If<表达式>Then<语句块1>Else<语句块2>EndIfIf<表达式>Then<语句1>Else<语句2>3.If…Then…ElseIf语句(多分支结构)形式：If<表达式1>Then<语句块1>ElseIf<表达式2>Then<语句块2>…[Else语句块n+1]EndIf4．If语句的嵌套If语句的嵌套是指If或Else后面的语句块中又包含If语句。形式如下：If<表达式1>ThenIf<表达式11>Then…EndIf…EndIf5.SelectCase语句(情况语句)形式：SelectCase变量或表达式Case表达式列表1语句块1Case表达式列表2语句块2…[CaseElse语句块n+1]EndSelect<表达式列表>:与<变量或表达式>同类型的下面四种形式之一：表达式“A”一组枚举表达式(用逗号分隔)2,4,6,8表达式1To表达式260To100Is关系运算符表达式Is<60十、循环语句1、For循环语句(一般用于循环次数已知)格式：for循环变量I＝初值Ato终值B[step步长C][循环体][Exitfor]next循环变量2、DO循环格式1：（前测型循环）DO[while|until条件][循环体][Exitdo]loop功能：while条件成立时，继续执行循环中的“语句体”，不成立，退出循环体；当until条件成立时，退出循环体，until条件不成立时，执行循环体格式2：(后测型循环)DO[循环体][Exitdo]loop[while|until条件]功能：先执行循环澡的“语句体”，再判断给定的“条件”，while条件成立时，继续执行循环中的“语句体”，不成立，退出循环体；当until条件成立时，退出循环体，until条件不成立时，执行循环体。1、求平均分程序Fori=1to10A(i)=int(rnd*90+10)[A,B]则Int(Rnd*(B-A+1)+A)S=s+a(i)NextiMax=a(1)Min=a(1)Fori=2to10Ifmaxa(i)thenmin=a(i)NextiAvg=int((s-max-min)/8*10+0.5)/102、穷举法、数字分离个位数xmod10十位数x\10mod10百位数：x\100mod103、求素数Fori=1to100F=0Forj=2toi-1Ifimodj=0thenf=1:ExitForNextjIff=0thenText1.text=text1.text&““&iEndifNexti4、打印图形Fori=1ton打印的行数PrintTab();每行打印的位置Forj=1tom每行中打印的个数打印内容NextjPrint换行Nexti5、冒泡排序Fori=1ton-1Forj=1ton-iIfa(j)>a(j+1)thent=a(j):a(j)=a(j+1):a(j+1)=tendifnextjnexti6、选择排序方法一：Fori=1ton-1Forj=i+1tonIfa(i)>a(j)thent=a(i):a(i)=a(j):a(j)=tEndifNextjNexti方法二：Fori=1ton-1P=iForj=i+1tonIfa(p)>a(j)thenp=jNextjIfp<>ithent=a(p);a(p)=a(i):a(i)=tEndifNexti