掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
VB2010 文字列の計算式で演算関数も対応するには？ (ID：148119)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
With CreateObject("ScriptControl") .Language = "JScript" MsgBox(.Eval("150+12*Math.pow(10,2)")) End With とか With CreateObject("ScriptControl") .Language = "VBScript" MsgBox(.Eval("150+12*10^2")) End With ならできますが、それでは駄目ですか? どうしても「Pow」にしたいなら、自作関数として組み入れるとか。 プロジェクトのプロパティで、[アプリケーション]-[アセンブリ情報]の [アセンブリをCOM参照可能にする]を有効にしておいてください。 Public Class Andy Public Function Pow(a As Object, b As Object) As Object Return a ^ b End Function End Class Module Module1 Sub Main() With CreateObject("ScriptControl") .Language = "VBScript" .AddObject("Andy", New Andy(), True) MsgBox(.Eval("150+12*Pow(10,2)")) End With End Sub End Module
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.