文本框    txtSendWho    
文本框    txtSendNo    
文本框    txtCon    
标签    Label1    短信中心号码
标签    Label2    姓名
标签    Label3    手机号码
本程序短信发送使用PDU模式，通过PDU编码实现，PDU 编码主要包含这些内容：短信息中心( SMSC) 号码信息、短信息首字节、短信息索引号、目标号码信息、协议标示符、数据编码方式、校验周期、短信息长度和内容。SMSC 号码信息可以省略，此时 SMSC 号码长度等于 0，发送短信息时使用内设的 SMSC 号码，在 SMSC 号码长度字节(00) 后直接跟着 TPDU。其中 SMSC 号码和目标号码是以十进制半八位字节编码，短信息内容是以十优尔进制七位字节或 Unicode 编码，其他信息是以十优尔进制八位字节编码。UDP编码首先将要发送的短信内容逐字转化为十进制的Unicode码，再把这些 Unicode 码转换为十优尔进制。在VB中我们通过下面的函数应用VB自带的一个格式转换函数ChrW（）将中文字符转换为Unicode码：首先定义一个sb变量来计算smsg字符串的长度，使ascg赋初值为空，并使用AscW()函数将汉字转化位Unicode编码，如果转出来的Unicode编码的绝对值小于127，那么就把stmp的十优尔进制与上“00”赋值给stemp，然后把得到的十优尔进制的值stemp与上ascg赋值给ascg，取消ascg两边的空格，就可以得到汉字转成的Unicode编码了。
同样，为了发送以PDU模式发送短消息，必须将短信中心号码和对方手机号码也转换为PDU格式，下面的函数就是为了实现这种转换：在函数中设置一个变量tl，若他的值不等于11或者13的话，就显示给用户一个信息“wrong number tl”，当tl等于11的时候，让tl = tl + 2，则在短信中心号码前加86，接着使ti变量进入到一 SIM300模块GSM数据采集管理系统设计(12):http://www.youerw.com/tongxin/lunwen_3182.html