文字列を数式にするには？ (ID:76094)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 文字列式を計算するなら Private Sub Command1_Click() Dim Sc As Object Set Sc = CreateObject("ScriptControl") Sc.Language = "VBScript" Text1.Text = Sc.Eval("((10+20)*2)\2+30+20-50") '=30 Set Sc = Nothing End Sub プロジェクト→コンポーネント→Microsoft Script Control 1.0 にチェックを 入れて ScriptControl をフォームに貼り付けて下さい。 見つからなければ VB6.0 のCDからインストールして下さい。