s hm=要发送的号码
 s id=编辑框id
//获取内容
 ug(id,"text",a)
//判断是否输入
 f(a=="")
 {
  tw("请输入内容！")
  }
else
{

//发送
  usmsgo(hm,a)
  }