中国IT动力,最新最全的IT技术教程
最新100篇 | 推荐100篇 | 专题100篇 | 排行榜 | 搜索 | 在线API文档 | 网通镜像
首 页 | 程序开发 | 操作系统 | 软件应用 | 图形图象 | 网络应用 | 精文荟萃 | 教育认证 | 硬件维护 | 未整理篇 | 站长教程
ASP JS PHP工程 ASP.NET 网站建设 UML J2EESUN .NET VC VB VFP 网络维护 数据库 DB2 SQL2000 Oracle Mysql
服务器 Win2000 Office C DreamWeaver FireWorks Flash PhotoShop 上网宝典 CorelDraw 协议大全 网络安全 微软认证
硬件维护  CPU  主板  硬盘  内存  显卡  显示器  键盘鼠标  声卡音箱  打印机  机箱电源  BIOS  网卡  C#  Java  Delphi  vs.net2005
  当前位置:> 程序开发 > 编程语言 > .NET > 临时文章
AHOI智能评测系统开发(二)
作者:未知 时间:2005-07-02 12:12 出处:Blog 责编:chinaitpower
              摘要:暂无

旧的问题刚刚解决,又出现新的问题,呼湫呼湫~~

要求:
在我编的程序里执行另外一个exe文件(为方便叙述,文件名为problem.exe),并测出problem.exe的运行时间。

说明:
该exe文件是用Tubro C或Pascal环境编译生成的。
双击problem.exe图标,会读入problem.in文件(已经有了),生成problem.out文件。

我已经尝试的方法:

1、[Shell]
执行:shell "c:\problem.exe",vbHide

结果:显示执行时间为10ms左右

***但是*** c:\ 并没有生成problem.out(这个输出文件对我以后的工程很重要)

2、[ShellExecute]
定义:Private Declare Function ShellExecute Lib "shell32.dll" Alias

"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const SW_SHOWNORMAL = 1

执行:ShellExecute Me.hwnd, vbNullString, "problem.exe", vbNullString, "c:\", SW_SHOWNORMAL

结果:显示执行时间为30ms左右
***但是*** c:\ 并没有生成problem.out

3、[WinExec]
定义:Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long
Const SW_SHOWNORMAL = 1

执行:WinExec "c:\problem.exe", SW_SHOWNORMAL

结果:显示执行时间为10ms左右
***但是*** c:\ 并没有生成problem.out

4、[shell]-调用命令行
执行:Shell "command.com /c c:\problem.exe", vbHide

结果:显示执行时间为20ms左右

***但是*** c:\ 并没有生成problem.out

请问,
一、究竟怎么样才能使得效果完全像双击图标呢?(即一定要生成problem.out文件)
二、怎么样保证侧的时间为problem.exe完整执行完的时间?

关闭本页
 
首页 | 投资与合作 | 服务条款 | 隐私政策 | 收藏本站 | 设为首页 | 新用户注册 | 免责声明 | 使用帮助
Copyright ©2005-2008 chinaitpower.com All rights reserved. www.chinaitpower.com 版权所有