I have the source code,if you want to get it, please email to [email protected]
在comm_oncomm事件中 select case comm.commevnt case mscomm_ev_cd'检测到载波信号 if comm.cdhoding then ... else ... endif case mscomm_ev_ring case mscomm_ev_receive if instr(1,recrevestring,"ring") then '产生震铃 endif在form_activate中检测modem是否准备好。 comm.output="at" + chr(13) do doevents '检测接收字符
select case comm.commevnt
case mscomm_ev_cd'检测到载波信号
if comm.cdhoding then
...
else
...
endif
case mscomm_ev_ring
case mscomm_ev_receive
if instr(1,recrevestring,"ring") then
'产生震铃
endif在form_activate中检测modem是否准备好。
comm.output="at" + chr(13)
do
doevents
'检测接收字符
mscomm_ev_ring
mscomm_ev_receive是否需要在通用或局部声明中进行声明?如何声明?是否能够提供具体语法?
mscomm_ev_ring
mscomm_ev_receive这些不用声明,VB自己认识的。不过,这几个名字怎么好像不太对头。