欢迎来到天天文库
浏览记录
ID:20830517
大小:67.00 KB
页数:6页
时间:2018-10-16
《调用窗体对象的方法》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库。
1、调用窗体对象的方法 如果仅仅只靠设置对象的属性,还不能设置出满意的窗体。如列表框和组合列表框的选项就无法通过设置属性来设置。此时需要调用对象的各种方法来设置。 对象的方法很多,对象不同,方法也不尽相同。列表框和组合列表框都有一个AddItem方法,通过调用这个方法,即可在列表框和组合列表框中加入相应的选项。 为了在文档打开时能够自动对窗体的对象进行初始化,可以在AutoOpen过程中调用,其代码如下: PublicSubAutoOpen() ListBox1.AddItem党员 ListBox1.AddItem团员 ListBox1.AddIt
2、em民主党派 ListBox1.AddItem无党派人士 boBox1.AddItem北京 boBox1.AddItem广西 boBox1.AddItem广东 boBox1.AddItem陕西 boBox1.AddItem山西 boBox1.AddItem山东 EndSub 通过以上代码,在打开文档时如果设置了运行自动宏,即可显示如图12-7所示的界面。 如果【选项】对话框的【编辑器】选项卡中设置了【自动列出成员】复选框,那么在输入某个对象的名称后输入.,即可在屏幕上列出该对象的方法和属性,图12-8所示的是自动组合列表框的成员。 对象
3、的方法前面由图标来标识,其他的为该对象的属性。下面介绍VBA中经常用到的一些方法及其意义。 Add方法 用于在TabStrip或多页中添加或插入一个标签或页,或通过其程序设计标识符(ProgID)在页或窗体中添加控件。 语法: 对于多页和TabStrip:SetObject=object.Add([Name[,Caption[,index]]]) 对于其他控件:SetControl=object.Add(ProgID[,Name[,Visible]]) Add方法的语法包括表12-6所示成分。 AddItem方法 对于单列的列表框或组合框,在
4、列表中添加一项。对于多列的列表框或组合框,在列表中添加一行。 语法 Variant=object.AddItem[item[,varIndex]] AddItem方法的语法有表12-7所示的成分。 Clear方法 从一个对象或集合中删去所有对象。 语法 object.Clear object为必需的有效对象。 Copy方法 将对象的内容复制到剪贴板上。 object.Copy object为必需的有效对象。 Cut方法 从一个对象中删除选定的信息并将它送到剪贴板。 语法 object.Cut object为必需的有效对象。
5、 DropDoat方法 返回一个整数值,表明指定的格式是否在DataObject上。 语法 Boolean=object.GetFormat(format) GetFormat方法的语法成分如表12-8所示。 设置 format的设置如表12-9所示。 GetFromClipboard方法 从剪贴板复制数据到DataObject。 语法 String=object.GetFromClipboard() 说明 DataObject可以包含多个数据项,但每个数据项必须有不同的格式。例如,DataObject可以包含一个文本项和用户定义项,
6、但不能同时有两个文本项。 GetText方法123下一页——..,。 用特定的格式在DataObject中检索一文本串。 语法 String=object.GetText([format]) GetText方法的语法成分如表12-10所示。 说明 DataObject支持多种格式,但只支持每种格式的一个数据项。例如,DataObject可能包含一个文本项和一个自定义格式的项;但不能包含两个文本项。 如果不指定格式,GetText方法要求从DataObject中得到文本格式的信息。 Item方法 返回集合的一个成员,无论按位置,还是按名称。
7、 语法 SetObject=object.Item(collectionindex) Item方法的语法成分如表12-11所示。 设置 collectionindex可以是字符串,也可以是整数。如果是字符串,则必须是一个有效的成员名。如果是一个整数,其最小值为0,而最大值比集合中的项目数少1。 Move方法 移动一个窗体或控件,或者移动Controls集合中的所有控件。 语法 对于窗体或控件 object.Move([Left[,Top[,ove(X,Y) Move方法的语法成分如表12-12所示。 设置 Left、Top、ove方
8、法 从集合中删除一个成员,或者从框架、页面或窗体中
此文档下载收益归作者所有