在QB64中检测SHARE

Question

我目前正在使用以下代码来检测qb64中的份额：

有没有更简单的方法来检测共享？

REM detect share in qb64:
InregsX.AX = &H1000
CALL INTERRUPTX(&H2F, InregsX, OutregsX)
IF (OutregsX.AX AND &HFF) = &HFF THEN
    Share.Installed = True
ELSE
    Share.Installed = False
END IF