本人初学，今天第一次看vb编程,以下面方式实发送信息界面：  
   text1,text2,comand1,comand2
_______________________________________
 if text2.text="" then
      msgbox"请先输入信息！”
   else
      dim asdf
      asdf = shell ("c\windows\system32\net.exe send ltcw10 " & text2.text, vb_hidden)
      text2.text=""
   endif
end sub
_________________________________________________
 可以向对方发送text2里的信息，但只能单对ltcw10发，
改成下面为何不可：

if text2.text="" then
      msgbox"请先输入信息！”
   else
      dim asdf
      asdf = shell ("c\windows\system32\net.exe send " & text1.text & text2.text, vb_hidden)
      text2.text=""
   endif
end sub

其中，net send ltcw10  hello! 可在2K或XP下给LTCW10发“HELLO！”的信息！
请指点哪里错，怎样可实现！谢谢

靠，竟沒有人願意幫我，
我已經搞好了，
原來是VB不能視別空格，要把& text1.text &text2.text改成　＆text1.text & " " & text2.text

能不能解释一下你的shell？

执行一个可执行文件，返回一个 Variant (Double)，如果成功的话，代表这个程序的任务 ID，若不成功，则会返回 0 Shell(pathname[,windowstyle])

那是用來調用系統命令NET的!

长了见识！

NET?不太清楚，能命令行传参数？NET是什么？这个我也不太清楚。

shell ("c\windows\system32\net.exe send ltcw10 " & text2.text, vb_hidden)
shell ("c\windows\system32\net.exe send " & text1.text & text2.text, vb_hidden)

你的send是什么意思？

我查书上怎么没有这个关键字？
x=shell ("c\windows\system32\net.exe ",0)
我只能看懂这个，调用net.exe文件

    可以直接写成 shell("net  send  IP地址或机器号    hello!").
   不用写明net的路径，
    因为 net.exe这个文件在系统目录下，系统会直接调用。

可以直接调用API函数来发送，速度非常快，用net send 比较慢
Private Declare Function NetMessageBufferSend Lib "NETAPI32.DLL" (Server As Any, yToName As Byte, yFromName As Any, yMsg As Byte, ByVal lSize As Long) As Long

[此贴子已经被作者于2005-3-17 20:51:11编辑过]