VBA-General
VBA-General copied to clipboard
Public Property ... End Function
Several Property Get end win End Function instead of End Property.
This is one such example. VBA does not complain but VBA-addins that cormat code does get confused.
'Returns whether the process is critical or not
'@returns {Boolean} True if the process is critical, false otherwise
Public Property Get isCritical() As Boolean
'Note: IsProcessCritical can return a weird boolean where bool and Not bool both result in True, which is nonsense...
'for this reason we explicitely cast to a long here...
If CLng(IsProcessCritical(pQueryInfoHandle, isCritical)) = 0 Then
Err.Raise 1, "stdProcess.isCritical", "Cannot get critical status of process. Error code 0x" & Hex(Err.LastDllError)
End If
End Function