用VB这样写下面的协议啊!!!

通讯协议:(第一IP和第二IP)
登录包 :
##LOGINPACK,ID=001,Time=2012-03-19 13:31:56&&##  : 数据包起始字符
LOGINPACK : 登陆包标志
ID=001 : 设备号
Time=yyyy-mm-dd hh:mm:ss : 时间
&& : 数据包结束字符数据包 :
##DATAPACK,ID=001,Time=2012-03-19 13:31:56,Data=0.000,0.001,130.5,00100,8.765,1,0,1,0,1,0,1,0,1,0&&##  : 数据包起始字符
DATAPACK : 数据包标志
ID=001 : 设备号 
Time=yyyy-mm-dd hh:mm:ss : 时间
Data=... : 数据依次为 风向(AI0),风速(AI1),雨量(DI1),水位(串口E),电 池电压,DI5~DI12,DO3~DO4.
&& : 数据包结束字符