
即将要卸载窗体的时候,窗体对象就会收到一个伽eryUnload事件。通过检查
UnloadMode参数可以了解窗体卸载的原因。以下是QueryUnloed事件处理过程的代码:
Private Sub Form QueryUnload(Cancel As Integer, UnloadMode As Integer)
Select Case UnloadMode
Case vbFormControlMenu
,用户关闭窗体
Case vbFormCode
,
代码终止窗体5.6.1.3 Excel VBA的列表框与组合框的ListCount属性
该属性用来返回列表框与组合框中选项的数量。
Case vbAppWindows
,当前窗口进行正在终止
Case vbAppTaskManager
,任务粉理器关闭程序
Case vbFormMDlForm
,MDI父窗体关闭窗口
Case vbFormOwner
父窗体被关闭
End Select
End Sub
当然,可以通过将Cancel参数设置为True拒绝卸载窗体:
Private Sub Form QueryUnload(Cancel As Integer, UnloadMode As Integer)
拒绝用户关闭窗口
Select Case UnloadMode
Case vbFormControlMenu,vbAppTaskManager
Cancel一True
End Select
End Sub
如何进行Excel 2007数据的行列转换呢
许多时候我们都会在Microsoft的Excel 2007中汇总处理一些表格,可是,在汇总的时候常会遇到这样一个问题:各个表格的排序结果有的是竖排,有的是横排。往一块儿汇总势必得按同一种方式排列才能排出结果,看来还必须对Excel 2007数据的行列进行转换。 如何进行Excel 2007数据的行列转换呢?难不成得手工