以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请各位前辈帮忙改一下Structure 语句的用法,实在是搞不出来  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=57572)

--  作者:zwjfx
--  发布时间:2014/9/26 20:10:00
--  请各位前辈帮忙改一下Structure 语句的用法,实在是搞不出来


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

\'数据结构
Public Const MAX_BRIEVENT_DATA = 600       \'事件产生后保存的数据最大长度

Public Type TBriEvent_Data
    uVersion     As Byte
    uReserv      As Byte
    uChannelID   As Integer \'事件来自通道ID Integer ->2字节
    lEventType   As Long \'事件类型ID 查看BRI_EVENT.lEventType Define
    lEventHandle As Long \'事件相关句柄
    lResult      As Long \'事件相关数值
    lParam       As Long \'保留,扩展时使用
    szData       As String * MAX_BRIEVENT_DATA \'事件相关数据.如:来电时,保存了来电的号码
    szDataEx     As String * 32 \'保留,扩展时使用
End Type


--  作者:涛声依旧5666
--  发布时间:2014/9/26 20:27:00
--  
Public Structure TBriEvent_Data
    uVersion     As Byte
    uReserv      As Byte
    uChannelID   As Integer \'事件来自通道ID Integer ->2字节
    lEventType   As Long \'事件类型ID 查看BRI_EVENT.lEventType Define
    lEventHandle As Long \'事件相关句柄
    lResult      As Long \'事件相关数值
    lParam       As Long \'保留,扩展时使用
    szData       As String * MAX_BRIEVENT_DATA \'事件相关数据.如:来电时,保存了来电的号码
    szDataEx     As String * 32 \'保留,扩展时使用
End Structure

--  作者:zwjfx
--  发布时间:2014/9/27 8:53:00
--  
以下是引用涛声依旧5666在2014-9-26 20:27:00的发言:
Public Structure TBriEvent_Data
    uVersion     As Byte
    uReserv      As Byte
    uChannelID   As Integer \'事件来自通道ID Integer ->2字节
    lEventType   As Long \'事件类型ID 查看BRI_EVENT.lEventType Define
    lEventHandle As Long \'事件相关句柄
    lResult      As Long \'事件相关数值
    lParam       As Long \'保留,扩展时使用
    szData       As String * MAX_BRIEVENT_DATA \'事件相关数据.如:来电时,保存了来电的号码
    szDataEx     As String * 32 \'保留,扩展时使用
End Structure


图片点击可在新窗口打开查看此主题相关图片如下:1.2.png
图片点击可在新窗口打开查看