注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

为自由而活!

贵在坚持!

 
 
 

日志

 
 

【转载】全局对象  

2014-01-26 21:44:28|  分类: 技术有关 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
本文转载自李雪茹《全局对象》

常用对象主要包括:

                         1.全局对象

                         2 .引用对象:包括常用控件,ActiveX控件,以及引用(不可视,但可完成功能)。
                         3.自定义类的实例对象
                         4.其他类的对象
全局对象(VB):一个类中只有唯一的实例,实例不需要定义,可以直接使用。不需要声明,直接使用,不会引起歧义,
     例:app
             代表当前的应用程序
             主要属性:Path  返回当前应用程序的所属路径(不包括文件名)
                      exeName 可执行文件名,例abc.exe   abc
                      hInstance 实例句柄
                      PrevInstance上一个实例句柄,
                      Major主版本号
                      Minor次版本号
                      Revision修订版本号
                      ThreadID线程ID 与api函数交互
         Screen  主要属性
                       Height(Twip)单位不变 但scaleheight可通过scalemode改变单位
                       Width(Twip)单位不变
                       TwipsPerPixelX  水平方向每个像素占多少Twip
                       TwipsPerPixelY
                       MousePointer 当前屏幕的光标
                       MouseIcon
         Err   主要属性:
                        Number:错误号(0-512)系统自用(513-65535)用户使用,在类中出现错误要+vbObjectError
                        Description描述
                        Source产生错误的地方(对象,应用程序)
               主要方法:
                        Clear把全局的错误对象清空  Err.clear()
                        Raise运行时产生错误
               错误处理:-On Error resume Next出现错误执行下一句
                         -On Error Goto [LineLabel/0]
                         -If(err.number>0) then...
                         -Resume[[0]/Next/Line]  记得添加退出程序,Exit Sub
         Clipboard  剪切板
                     主要方法:SetText data,textformat设置文本
                               GetText(textformat)读取文本
                               SetData data,picformat存取图片数据
                               GetData(picformat)
                               GetFormat(dataformat)剪切板中是否存在dataformat格式文件
         Forms
         Printer(s)
         Debug  用于程序调试,当程序编译完后Debug不起任何作用
                 主要方法:
                        Assert断言,Debug.Assert ...调试阶段断言后的结论如果正确则继续执行,否则返回错误
                        Print 在立即窗口立即显示

                       

  评论这张
 
阅读(40)| 评论(18)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017