Sub Main
	' プロバイダのコントロール取得
	Set oCtrl = cao.AddController("RC1", "CaoProv.Dummy", "", "")

	' 変数オブジェクトの取得
	Set oVar1 = oCtrl.AddVariable("I11")

	' 変数の表示
	dbg.Output oVar1.Value

	' 値書き換え
	oVar1.Value = 123
	dbg.Output oVar1.Value

End Sub