关于vb调用dll的速度问题
小弟现在正在学习vb6，正在做一个和西门子PLC通讯的程序，因为西门子本身的软件要授权，也就是要花钱的，所以小弟把其中的动态链接库文件拿出来直接用了，但是现在有一个特别重要的问题，就是这个文件调用起来太慢了，估计有20秒，这样的东西拿出来会被人骂死的，所以小弟想请教一个诸位编程高手，怎样才能优化vb调用动态链接库的速度。
这个问题也只能过来请教各位玩计算机的高手了，小弟是半路出家，是在是搞不定了。
20秒，做个进度条也够不耐烦的了。
希望大家多帮忙。谢谢了
自己先顶一下，多帮忙，多帮忙
汗那，我把代码粘上
Option Explicit
Public plcadr As plcadrtype
Public gb_PlcConnected As Boolean
Type plcadrtype
adr As Byte '站地址，默认值为2
SEGMENTID As Byte '段标识符，固定值为0
SLOTNO As Byte '槽的编号，默认值为2
RACKNO As Byte '机架号，固定为0
End Type
Public Res As Long
Declare Function load_tool Lib "w95_s7.dll" (ByVal nr As Byte, ByVal dev As String, adr As plcadrtype) As Long
Declare Function as200_vs_field_read Lib "w95_s7.dll" (ByVal nr As Long, ByVal anz As Long, value As Byte) As Long
模块里只做了几个声明
在form load里面只是调用了一下
Private Sub Form_Load()
Dim buffer(1) As Byte
plcadr.adr = 2
plcadr.SEGMENTID = 0
plcadr.SLOTNO = 2
pl
相关问答：
想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】，效果就像游戏平台中一样，我试过在一窗口中写入文字，然后一直让窗口强制最前，虽然能实现文字显示，但是文字会不断闪烁，而且有不确定BUG，通过论坛搜 ......
各位大虾：
我是刚学VB，现在想用VB调用一个动态库，动态库里面有很多函数。我知道使用VB调用动态库调用函数，需要将要调用的函数在程序中声明即可，但是里面有很多函数，不会每一个函数都要声明吧。请� ......
刚接触vb6.0，有些摸不到的感觉，敬请各位大虾给点建议！！！
不会吧，推荐学习.NET。顺便推荐实用代码网站http://bingning.net/free/source/index.html。
如果没基础 就用易语言吧 中文编程呢 代码都是中文 ......
Private Sub Form_Load()
recs = Adodc1.Recordset.RecordCount '求当前记录数
If recs > 0 Then '已有考生
Adodc1.Recordset.MoveLast '移到最后一条记录
num = V ......
数据库貌似已经连接上了vb，，可是为什么数据库上的数据不能显示在框表中捏？？？
具体的代码？
无码无真相！
你把篮球抱在怀里，就能远投得3分？
麻烦各位大虾了啊。。。
Private Sub Comm1_Click()
& ......
