VBS(VBScript)サポート&サンプルTOPへ


VBS(VBScript)による関数を呼び出す関数を紹介

説明 : getref関数により関数を呼び出す

サンプルソース



(入力)

Dim kaname
Dim pointa

Sub kan1()
WScript.Echo "引数がkan1の場合の出力"
End Sub

Sub kan2()
WScript.Echo "引数がkan2の場合の出力"
End Sub

kaname = WScript.Arguments.Item(0)
Set pointa = GetRef(kaname)
Call pointa()


(出力:引数を「kan1」にした場合)

引数がkan1の場合の出力



  

戻る




Copyright (C) VBS(VBScript)サポート&サンプル by wannko All Rights Reserved.
お問合せ先 ⇒ nachiko★wannko.net(★を@に変更して下さい。)