sirocco https://blog.hatena.ne.jp/sirocco/ sirocco の書いてもすぐに忘れるメモ https://sirocco.hatenadiary.org/ Visual Basic ScriptControlによるeval（AccessにあってVBに無いもの)より。 Module Module1 Function VBSEval(ByVal vbsExp As String) Dim sc As Object sc = CreateObject("ScriptControl") sc.Language = "VBScript" VBSEval = sc.Eval(vbsExp) sc = Nothing End Function Public Sub Main() Dim calc As Object = VBSEval("1+2+3") Dim ary() As Obj… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fsirocco.hatenadiary.org%2Fentry%2F20090715%2F1247623293" title="VBScript の Eval を使う - sirocco の書いてもすぐに忘れるメモ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2009-07-15 11:01:33 rich https://sirocco.hatenadiary.org/entry/20090715/1247623293 1.0 100%