13518219792
用VB5 Winsock控件创建TCP/IP通讯程序 随着Windows 95中文版和Windows NT Server 4.0中文版的流行， Microsoft公司推出了相应平台上的开发软件: Visual Basic 5.0 中文企业 版。它为Windows环境下的网络开发提供了强大的工具，Winsock控件就是其中之一。 Winsock控件建立在TCP、UDP协议的基础上，完成与远程计算机的通信。即使对TCP/IP不太熟悉的用户，使用该控件也可以在十几分钟内创建一个简单的客户机/服务器程序。下面我们对Winsock控件的事件、方法、属性按其在程序中出现的顺序分别作详细的介绍，以便更好地理解程序源代码。
创新互联专业为企业提供邵原网站建设、邵原做网站、邵原网站设计、邵原网站制作等企业网站建设、网页设计与制作、邵原企业网站模板建站服务，10年邵原做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。
你不用程序的情况能不能用TAB切换焦点。如果这样不行的话你用程序控件是没用的。
或都直接对第二个编辑框发送消息。
我以前写过，用vb做的 通过GSM模块给同事定时发天气预报
主要分成两个部分
1是调用VB的一个组件 使它可以支持com的读取和写入指令
2是找到一个手机 支持com通讯 并且请详细阅读有关该手机的指令部分
然后根据com的AT指令 在VB中对这个com端口提交指令
(最好带一个数据库，保存你的短消息内容。)
然后收集返回代码 判断消息是不是发出 以及进一步的判断
==
整个过程涉及com口通讯指令 请务必仔细参考你的手机类型和相应的指令代码 也可以通过系统自带的附件-通讯-超级终端来测试 我以前就是用这个的
代码还涉及Unicode和中文文字的互转 有现成的代码可以用的 你可以检索一下
另外一个问题就是关于短消息中心的设置 网上应该也能找到
关于程序设计的问题 就不用多说了 相信你能搞定的
==
祝你写论文顺利
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As String, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As String) As Long
改为
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As String, ByVal wMsg As integer, ByVal wParam As integer , ByVal lParam As String) As integer
再试试，
可能你的声明使用vb6。0 复制过来的，long 全部改成integer
主流onesmser短信平台的分为四类短信验证通道： 移动的：10657 联通的：10655 电信的：10659 三网合一：10690 不管是什么样的短信，最终都是需要三大运营商的端口才能够发送出去的，所以如果发送量大的话，可以首选直接和运营商对接通道，没有很大量的话，建议使用第三方服务onesmser短信平台就可以了。
插入项目ListView控件自身支持的，何必用SendMessage？而且好像PostMessage更加稳定
