求用VB自写防windows自带计算器程序!

就是windows系统自带的计算器程序.用VB写出来的。有的发个出来.没有的.没有的有时间写一个出来!!!别看程序小哦/dddd
   在线等!!!!!

解决方案 »

  1.   

    引用script control即可
    具体用法查google
      

  2.   

    shell app.path & "calc.exe"一行搞定，不过你要把 calc.EXE拷贝到当前EXE目录下。
      

  3.   

    最好不要写一堆哈。我要精简化的哦!最好保持在15行以下....
    ----------------------------------
    楼主，你在开什么玩笑！windows自带的计算器功能非常强大！15行以下的代码就想完成？？
    我看只能这样了
    i=0:i=i+j:......'这算一行吧！
      

  4.   

    呵呵，要判断APP.PATH的最后一个字符是否为“\” ，没有要田间的iif(right(app.path,1)="\",app.path,app.path & "\")