VB 用sleep时，出现程序无响应
水流线画图如下：
Picture1.CurrentX = pen(1).PenPointx Picture1.CurrentY = pen(1).PenPointy
For temp1 = 1 To pointcount - 1
If (pen(temp1).PenPointx = -1 And pen(temp1).PenPointy = -1) Then
Picture1.CurrentX = pen(temp1 + 1).PenPointx
Picture1.CurrentY = pen(temp1 + 1).PenPointy
Else
Picture1.Line -(pen(temp1).PenPointx, pen(temp1).PenPointy )
Sleep (pen(temp1 + 1).time - pen(temp1).time)
End If
Next temp1
pen的定义如下：
Private Type paintpen
PenPointx As Integer 'X轴坐标
PenPointy As Integer 'Y轴坐标
time As Long ‘时间点
End Type
（-1，-1，0）是开始下一笔
怎么我一到下一划的时候就出错了，程序就不动了
大家帮我看看，哪里出问题了
不要sleep那句或改成application.doevents
不要sleep的话，无法控制速度
怎么用application.doevents？
奇怪的
Else
Picture1.Line -(pen(temp1).PenPointx, pen(temp1).PenPo
相关问答：
vb将winsock控件封装到dll问题 有什么好的思路？ 如果用Socket API呢？
例如，像下面这样封装Winsock控件，行的通？
创建ActiveX dll，添加窗体frmClient，加入WinSock控件wskClient。
类代码：
Option Expli ......
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
各位大虾：
我有一个VB调用水晶报表的系统，报表是作为一个Design嵌在VB里的，今天发现打印第一张报表正常，同样的数据，在点打印再调用一次就会报 Memory Full的错误，但是 ......
据说java语言是这样的，那VB呢？
byte[] b(byte)0x62,(byte)0x11,(byte)0x72,(byte)0x31};
try {
System.out.println(new String(b,"UTF-16"));
} catch (UnsupportedEnco ......
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
