VBWord格式文档下载.docx
《VBWord格式文档下载.docx》由会员分享,可在线阅读,更多相关《VBWord格式文档下载.docx(7页珍藏版)》请在冰豆网上搜索。
DimNameAsString
DimNumAsDouble
Endstructure
使用用户自定义的数据类型和成员变量之间的关系与对象和属性之间的关系类似;
∙在与工具栏按钮或菜单命令关联的事件过程中,使用ShowDialog方法输入对话框名称;
该方法返回一个名为DialgResult的结果;
它表示用户单击的是对话框的那个按钮,DialogResult.OK.表示单击了“打开”按钮;
∙对话框的Filter属性来过滤打开的文件类型或图片的格式等;
∙TimeString和Datestring返回系统时钟的当前时间和日期;
∙列表框中添加列表项:
Listbox1.Item.Add(……);
∙类:
是定义对象功能的蓝图或模板,它定义对象做什么而不是定对象本身,在VB中,可以利用已有的类:
System.Math、System.Windows.Forms.Form、System.Drawing.Image.FromFile;
∙命名空间:
是按唯一的名称分层次组织的类库;
∙FromFile()方法用于打开指定的文件;
∙使用Try……Catch代码块捕获错误:
Try
可能产生运行时错误的语句
Catch
一旦运行时错误发生就会被执行的语句
Finally
不管错误是否发生都会执行的语句
EndTry
∙Chr(13)和vbCr表示回车,Chr(10)表示换行;
vbCrLf包含回车和换行,用于创建新行;
∙CSng函数将字符串类型转换为其他类型;
Int函数用于取整;
∙使用Until关键字的Do循环结构和使用While关键字的Do循环结构类似,两者的的运算符正好相反;
∙“插入代码段”命令允许用户从常见编程任务列表中选择现成的代码模板或代码段;
∙使用Exception及Message:
try
……
CatchexAsSystem.Io.FileNotFoundException“……“
Msgbox()
CatchexAs+(Exception事件)
CatchexAsException
EndTry
∙模块:
程序中一种单独的区域,可包含全局变量、函数、和子过程,可以在程序的任何处使用;
∙定义公共变量:
PublicAAsinteger;
∙过程的作用是把相关的语句组合起来以实现一个任务,在VB中主要有两种类型的过程:
函数和子过程;
∙函数定义:
FunctionName([参数])Astype
[Returnvalues]
EndFunction
Return用于向调用程序返回值并指定该值,一旦执行了Return语句,程序就退出函数,即使后面有其他语句;
∙Format函数:
调整结果的显示方式,返回值为字符串;
∙子过程:
Subname([参数])
EndSub
∙ByVal按传值方式传递参数:
表示变量以传值方式传递给过程,任何对变量的改动都不会被传回到调例过程;
ByRef按引用方式传递参数:
在过程中对变量进行的任何改动都将被传给调用例程中的变量;
不确定的时候,使用ByVal关键字;
∙对数组赋值:
DimRec={{10,20},{30,40}};
∙UBound函数可以获得数组的上限值,LBound函数可以获得数组的下限值;
∙定义动态数组:
DimTem()Assingle
(添加代码确定元素的个数)
ReDimTem(days-1)重新定义数组的大小时元素数要减一;
使用ReDim可以使动态数组的数据被设置为默认值(零活空),使用Preserve可以改变数组大小时保留数组中原有的数据,但只能重新定义数组的最后的一个维度,对于多维数组只能改变最后一维的大小并保留数组内容不变:
ReDimPreserve数组名(大小);
∙Progressbar进度条,主要属性有Minimum、Maximum、Value通常使用代码对他们进行操作;
∙使用Net.Framework中Array类的方法,对数组内容重新排序:
Array.sort(数组名)或Array.reverse(数组名);
∙在vb中窗体上的所有对象的集合称为Controls集合,如果指定了一个对象在集合中的位置即索引值,就可以引用集合中的对象,在VB中按照程序创建对象的相反顺序在集合中存储对象,因此可以利用某个对象的“创建顺序”单独引用该对象,例:
control(0).Text=“Business”
∙处理集合中的对象更好的方法是将所有对象作为一个组来处理,可以使用ForEach……Next循环结构,例:
DimctrlAsControl
ForEachctrlinControls
Ctrl.text=“Me”(ctrl代表窗体中的一个对象)
NextCtrl
∙Tag属性和Name属性一样,大多数对象都支持,可以存储对象的字符串数据,默认状态下为空,可以为其指定值,并通过对他进行检测来标识程序中将以不同方式来处理的对象;
∙在VB中允许用户自定义集合来跟踪程序中的数据并系统地对数据进行处理,定义方式:
Dim集合名AsNewCollection(),并可以使用Add方法向集合中添加成员,用ForEach……Next循环来检测各个成员(ctrl.Add(text1.text));
∙inStr函数:
检测字符串是否含有另一字符串的内容;
∙文件操作:
可以在程序中使用OpenFileDialog控件来提示用户指定一个文件的路径,其Filter属性用于控制显示的文件类型,ShowDialog方法,用于显示“打开”对话框,FileName属性,用于返回有用户指定的文件路径;
∙打开文件的方法有很多,最常用的是My命名空间和StreamReader类,使用My.Computer.FileSystem对象和ReadAllText方法来打开文本文件并在文本框对象中显示文件内容,语法如下:
DimAtextAsString=““
OpenFileDialog1.filter=“Textfiles(*.text)|*.text”
IFOpenFileDialog1.ShowDialog()=DialogResult.OKthenAtext=My.Computer.FileSystem.ReadAllText(OpenFiflDialog1.Filename)
Text1.text=Atext
EndIF
如果忘记ReadAllText方法的语法,可以使用“插入代码段”命令快速插入一个示例;
.NETFramework库中的StreamReader类用于在程序中打开和显示文本文件,为了方便类的使用将ImportsSystem.IO放到程序代码顶部,语法如下:
DimstrAsStreamReader
str=NewStreamReader(”文件路径”)
Text1.text=str.ReadToEnd
Str.Close()
EndToStream属性表明文件的末尾,ReadToEnd方法表示从当前位置直到文件末尾,Readline方法表示从文件中读取一行;
写入文本文件同样可以使用这两种方法,不过用WriteAllText()方法和StreamWriter类;
∙使用String类和VB函数处理字符串:
ToUpper/UCase、ToLower/LCase、Length/Len、Contains/Instr、Substring/Mid、IndexOf/InStr、Trim、Remove、Insert、Compare/StrComp、CompareTo/StrComp、Replace、StartsWith、EndsWith等;
∙使用Asc函数将字符串转化为ASCII码,Chr函数相反;
∙VB内置的Xor用于加密数值的工具,对组成数字的位执行的函数;
∙在屏幕上显示时必须进行处理的窗体称为对话框,成为有模式窗体,使用ShowDialog方法打开它;
用户通过切换可以离开所显示的窗体,使用Show方法打开,也称为非模式窗体;
例:
Form2.ShowDialog()或My.Forms.HelpInfo.ShowDialog();
∙在窗口上定义窗体的位置时使用DesktopBounds属性和StartPosition属性;
∙在程序运行时添加控件:
DimbuttonAsNewButton
……(设置属性)
Form.Controls.Add(button)(把对象添加到窗体的Controls集合中);
∙在窗体上排列控件使用Anchor和Dock属性,前者强迫窗体上的对象与窗体的某个边缘保持固定距离,后者强迫对象与窗体边缘保持接触;
∙在窗体上创建线条或形状:
利用System.Drawing.Graphics命名空间的方法,例:
DimGpcAsGraphics
Gpc=Me.CreateGraphics
DimpencolorAsNewPen(System.Draming.Graphics)
Gpc.DrawEllipse(pencolor,10,20,30,40)
∙创建在窗体刷新期间依然显示在窗体上的线条:
将用于处理图形的方法加入窗体的Paint事件中;
∙在窗体上移动对象:
利用Location属性、New关键字和Point结构体重新定义该对象,label.Location=NewPoint(200,300);
∙利用对象的Left、Top和Location属性为对象添加动画效果;
利用Width属性和Height属性在程序运行时缩放对象;
改变窗体的透明度用窗体的Opacity属性;
∙继承现有窗体的界面和功能:
“项目”菜单下得“添加新项”的命令,但基础窗体必须编译为.exe或.dll文件;
可以自定义继承的窗体,将控件添加到窗体上,但不设置已继承的部分;
∙创建自己的基类:
“项目”菜单下的“添加类”命令:
1、声明变量:
PrivatenameAsString
2、创建属性:
PublicPropertyFirstNme()AsString
[Get
ReturnName
EndGet
Set(ByValValueAsString)
Name=Value
EndSet]
EndProperty
3、创建方法:
在类中定义一个子过程或函数;
PublicFunctionAge()
Return……
EndFunction
4、声明对象变量以使用类:
DimEmployeeAsNewperson(创建类时的名称)
5、使用类的属性和对象的属性一致;
∙在新类中继承基类:
用Inherits关键字引入基类的类定义;
PublicClassTeacher
InheritsPerson
PrivateLevelAsShort
PublicPropertyGrade()AsShort
[get
Endproperty]
EndClass
∙数据库操作:
1、在“数据”菜单下选择“添加数据源”命令,建立数据库的连接;
打开“数据源”窗口,拖放表和字段到窗体上,在箭头的下拉列表中选择绑定控件的类型,若窗体上已有控件,直接将“数据源”的表和字段拖到控件上就可,另外,将对象的DataBindings属性设为数据集的有效字段;
2、当绑定控件时会在窗体上自动添加导航控件,若要自定义,可右击组件盘中的BindNavigator对象,选择“编辑项”;
3、可以使用MaskedTextBox控件来格式化数据集字符串数据的内容;
4、使用“查询生成器”中的SQl语句可创建自定义的查询;
5、在窗体上创建DateGridView对象可以显示整个数据表;