VB5 如何得知 UPS 的訊息 (系統發出)(編號:638)

大家好:
如果 PC 有接 UPS, 在 UPS 即將斷電時,
系統會得知並且秀出 Message, 那麼在程式中如何得知
此訊息以便儲存資料 ?
Thanks