xp下，qb程序编译后运行不能绘图，有什么办法解决？

[捧剑者]

比如：

SCREEN 12
LINE (0,0)-(100,100)

[chinaboyzyq]

下载一个dos-box(DOSBox0.73-win32-installer.exe),在dos-box中运行，就OK了。
dos-box的用法可以百度一下，有很多。

[捧剑者]

[Quote=引用 1 楼 chinaboyzyq 的回复:]
下载一个dos-box(DOSBox0.73-win32-installer.exe),在dos-box中运行，就OK了。
dos-box的用法可以百度一下，有很多。
[/Quote]
谢谢猴哥。
试了一下，还是不行。

[zdingyun]

XP下能执行呀,LZ你需要增加一句代码

SCREEN 12
LINE (0,0)-(100,100)
END

[zdingyun]

注意QB.EXE在属性的兼容性页中设置为用兼容模式运行这个程序,选WINDOWS95

[捧剑者]

原来程序中是有end的。

[捧剑者]

在qb中解释执行是可以的。
编译后就不行了。编译后我也试过兼容方式，不行。

[chinaboyzyq]

[Quote=引用 6 楼 wangmu7206 的回复:]
在qb中解释执行是可以的。
编译后就不行了。编译后我也试过兼容方式，不行。
[/Quote]
不是不运行，而是一闪而过，你要如下处理。

  SCREEN 12
  LINE (0, 0)-(100, 100)
  PRINT "Press any key to continue..."
  DO
  LOOP WHILE INKEY$ = ""

如果直接不能运行（即运行出错时），请在dos-box里运行。

[zdingyun]

我又试了下,在QB中执行能画线的.编译成EXE文件后,屏幕上确实不见画的线.似乎离开QB集成窗口不行.
但我知道QB编译的EXE文件在WIN9X的DOS窗口能运行的.

[捧剑者]

楼上正解！

[捧剑者]

7楼正解。

[zdingyun]

[Quote=引用 7 楼 chinaboyzyq 的回复:]
引用 6 楼 wangmu7206 的回复:
在qb中解释执行是可以的。
编译后就不行了。编译后我也试过兼容方式，不行。

不是不运行，而是一闪而过，你要如下处理。

VB code

SCREEN 12
LINE (0, 0)-(100, 100)
PRINT "Press any key to continue..."
DO
LOOP WHILE I……
[/Quote]
7楼的正解.