If Form1.Caption <> "Form1" Then
Msgbox ("bianlebianle~~")
End If------------------------------------如上代碼因該寫在FORM的什麽事件里?才有響應?
Msgbox ("bianlebianle~~")
End If------------------------------------如上代碼因該寫在FORM的什麽事件里?才有響應?
解决方案 »
- VC++中如何把dll封装到OCX里
- 代码中可不可以直接执行Sql脚本啊
- 在vb中怎样把生成的excel中的多余的sheet删除掉?
- 如何把另一程序的窗体(现在源码丢了,只有EXE文件)变成项目中多窗体的子窗体之一
- mdi窗口如何使其不可改变大小没有最大化?
- 请问如何在VB程序中使用“活动的标签”?
- 怎么样向一个VB程序添加多个图标资源?SOS
- 如何得到当前列的名称?
- 部件'RICHTX32.ocx'或其部件之一不能正确注册:一个文件丢失或无效!!!!!!我该怎么办?
- 如何在VB6中控制报表的纸张宽度(突破A4纸)?急急急!
- 怎样让VB实时检测本机正在通讯的端口,并将通讯内容截获!
- VB.NET 编写/部署 COM+服务
Msgbox ("bianlebianle~~")
End If
我問的是這個時候該寫在哪裏??
LOAD 和 Activate肯定不行。
或是在你进行用此条件来判断的任何位置
strFormCaption = Me.Caption
End SubPrivate Sub Timer1_Timer()
If Me.Caption <> strFormCaption Then
MsgBox "变了!"
strFormCaption = Me.Caption
End If
End Sub
CAPTION不是事件,它不触发任何的事件或者方法。它只是一个属性。