Advertisement
4_2005-2006 Custom Controls/ Forms/ Menus #167785

IsLoaded Form Function

This Function checks if a specified Form is loaded by looping through the forms collection it returns TRUE if it is and FALSE if it is not you can decide what you want according to the return value e.g accessing its properties or methods or controls ,...

AI

KI-Zusammenfassung: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Quellcode
original-source
<B><FONT SIZE=1><P ALIGN="LEFT"> </P>
<P ALIGN="LEFT">Public Function IsLoaded(ByVal strForm As String)As Boolean</P><DIR>
<DIR>
<P ALIGN="LEFT">Dim frmloaded As Form</P>
<P ALIGN="LEFT">IsLoaded = False</P>
<P ALIGN="LEFT">If strForm = "" Then Exit Function</P>
<P ALIGN="LEFT">For Each frmloaded In Forms</P><DIR>
<DIR>
<P ALIGN="LEFT">If frmloaded.Name = strForm Then</P><DIR>
<DIR>
<P ALIGN="LEFT">IsLoaded = True</P>
<P ALIGN="LEFT">Exit Function</P></DIR>
</DIR>
<P ALIGN="LEFT">End If</P></DIR>
</DIR>
<P ALIGN="LEFT">Next</P></DIR>
</DIR>
<P ALIGN="LEFT">End Function</P></B></FONT>
Originalkommentare (3)
Wiederhergestellt von der Wayback Machine