BFLExecuteScreenSaver () As Long

概要

スクリーンセーバーを実行します。スクリーンセーバーの設定が｢なし｣になっているときは当然何も表示されません。

戻り値は成功した場合は1、失敗した場合は0を返します。

VBでの宣言

[Public | Private] Declare Function BFLExecuteScreenSaver Lib "BFL.dll" () As Long

VBでの使用例

Dim ret As Long

ret = BFLExecuteScreenSaver

If ret = 1 Then
Debug.Print "スクリーンセーバーを実行しました"
End If

戻る