社区
VB基础类
帖子详情
VB里的那个UNLOAD ME是什么意思?
风吹PP凉SS
2005-04-02 08:24:47
RT
...全文
5303
9
打赏
收藏
VB里的那个UNLOAD ME是什么意思?
RT
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
bob008
2005-04-02
打赏
举报
回复
用的哪个扔哪个
bob008
2005-04-02
打赏
举报
回复
用完了扔掉
YaDa
2005-04-02
打赏
举报
回复
用白话说:就是你这个窗体模块的窗体。比如是Form1里,就是指Form1。所以在Form1模块里:
unload me 等于 unload Form1
mycoldboy
2005-04-02
打赏
举报
回复
就是把自己(form)从内存里卸载了
wzzwwz
2005-04-02
打赏
举报
回复
呵呵,我们就是会 说话写字的滴书~~
Me
Me 关键字像是隐含声明的变量。这个关键字适用于类模块中的每个过程。当类有多个实例时,Me 在代码正在执行的地方提供引用具体实例的方法。要把当前执行类实例的有关信息传递到另一个模块的过程,Me 非常有用。例如,假定模块中有以下过程:
Sub ChangeFormColor(FormName As Form)
FormName.BackColor = RGB(Rnd * 256, Rnd * 256, Rnd * 256)
End Sub
可以调用这个过程并使用下列语句将窗体类的当前实例作为参数传递。
ChangeFormColor Me
风吹PP凉SS
2005-04-02
打赏
举报
回复
关键是我不懂这个ME是什么意思
唐古拉山
2005-04-02
打赏
举报
回复
建议你先看看书
wzzwwz
2005-04-02
打赏
举报
回复
Unload 语句
从内存中卸载窗体或控件。
语法
Unload object
object 所在处是要卸载的 Form 对象或控件数组元素的名称。
说明
当所占内存另有它用,或需要重新设置窗体、控件的属性为初始值时,就有必要卸载窗体或控件。
在卸载窗体前,会发生 Query_Unload 事件过程,然后是 Form_Unload 事件过程。在其中任一过程中设置 cancel 参数为 True 可防止窗体被卸载。若为 MDIForm 对象,先发生 MDIForm 对象的 Query_Unload 事件过程,接着是各 MDI 子窗体 的 Query_Unload 事件过程和 Form_Unload 事件过程,最后是 MDIForm 对象的 Form_Unload 事件过程。
当窗体卸载之后,所有在运行时 放到该窗体上的控件都不再是可访问的。在设计时放到该窗体上的控件将保持不变;但是,当窗体重新加载时,在运行时对这些控件及其属性的任何更改将丢失。所有对于窗体属性的更改也将丢失。对窗体上任何控件的访问会导致窗体重新加载。
注意 在卸载窗体时,只有显示的部件被卸载。和该窗体模块相关联的代码还保持在内存中。
只有在运行时添加到窗体上的控件数组元素才能用 Unload 语句卸载。重新加载被卸载的控件时,其属性会被重新初始化。
jwt1979jwt
2005-04-02
打赏
举报
回复
要看unload me 写在哪个过程里
如果是写在窗体的过程里 那就是 卸载该窗体
VB
卸载窗体时触发的Un
load
事件
VB
卸载窗体时触发的Un
load
事件
VB
卸载窗体时触发的Un
load
事件
网页脚本(javascript)调用
VB
函数的另类方法
不用通过IDocHostUIHandler接口,让网页调用
VB
程序中的函数的方法。 该方法原理是:在网页中通过导航到一个特定的自定义网址,这个网址 就表示我们要调用的
VB
中的函数,然后在WebBrowser控件的BeforeNavigate2 事件处理函数中检测是否是我们自定义的网址,如果是,则根据不同的约定 调用不同的函数,从而间接实现从网页调用
VB
函数的目的
vb
编写的简单学生成绩查询系统
vb
编写的简单学生成绩查询系统 Sub pingbi3() Form10.Command4.Visible = False End Sub Sub pingbi1() Form2.修改.Visible = False Form2.添加.Visible = False Form2.删除.Visible = False End Sub Sub pingbi2() Form10.Command2.Visible = False End Sub Private Sub 管理员_Click() Un
load
Me Form9.Show pingbi3 End Sub Private Sub 取消_Click() End End Sub Private Sub 退出_Click() End End Sub Private Sub 学生_Click() Un
load
Me Form10.Visible = True pingbi1 pingbi2 Form10.Command4.Visible = True End Sub
vb
自动升级源代码 自动升级程序
vb
自动升级源代码,强制自动升级 Private Sub Form_KeyPress(KeyAscii As Integer) Un
load
Me End Sub Private Sub Form_
Load
() frmSplash.Caption = "演示程序 版本号:" & App.Major & "." & App.Minor lblVersion.Caption = "版本 " & App.Major & "." & App.Minor & "." & App.Revision lblProductName.Caption = App.Title End Sub Private Sub Frame1_Click() Un
load
Me End Sub
VB
添加用户代码(
VB
源码下载:比较简单的
VB
代码)
VB
添加用户代码(
VB
源码下载:比较简单的
VB
代码)
VB基础类
7,785
社区成员
197,585
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章