office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Access穫取當前活動的窗體名稱

2017-10-21 17:07:00
tmtony8
原創
3726

在Access中,可以打開多箇窗體。但是多箇打開的窗體中,隻有一箇是激活的窗體

如何穫取當前活動的窗體名稱呢?


這裡我們自定義一箇函數,通過遍歷所有窗體,找齣活動的窗體

Public Sub 當前活動窗體()
    Dim frm As Object
    For Each frm In CurrentProject.AllForms
        If frm.Name = Screen.ActiveForm.Name Then
            MsgBox "你當然打開的窗體是" & frm.Name
        End If
    Next frm
End Sub



效果圖:

    分享