㈠ vb.net访问局域网指定计算机上的文件

如果你有该永动机的登陆用户名和密码.那简单了.
Shell("c:\windows\system32\cmd.exe /c net use \\192.168.0.199 """"" & " /user:" & """guest""")

里面冒号太多了.你可以通过CHR去转换里面中的一些冒号.
这句话可以不要人为去输入用户名和密码.

另外如果你可以使用
My.Computer.Network.DownloadFile()

函数去进行文件下载.这个比较方便 .

㈡ 用VB.net 写的软件 想打开局域网中一台电脑A的某个文件,代码如下，运行后提示未知的用户名或密码错误

不能直接访问，需要先登录，然后才能访问。比如先
net USE\\计算机名\目录 登录密码 登录用户名 一下。

㈢ VB如何获取局域网内所有计算机的名字

你看看这3个API ,应该对你有帮助.
WNetGetConnection

VB声明
Declare Function WNetGetConnection Lib "mpr.dll" Alias "WNetGetConnectionA" (ByVal lpszLocalName As String, ByVal lpszRemoteName As String, cbRemoteName As Long) As Long
说明
获取本地或已连接的一个资源的网络名称
返回值
Long，零表示成功。会设置GetLastError。如GetLastError是ERROR_EXTENDED_ERROR，则可用WNetGetLastError取得额外的错误信息
参数表
参数 类型及说明
lpszLocalName String，本地设备的名字
lpszRemoteName String，指定一个字串缓冲区，用于装载设备的资源名称
cbRemoteName Long，lpszRemoteName缓冲区的字符数量。如缓冲区不够大，则设为需要的缓冲区长度

WNetGetUniversalName

VB声明
Declare Function WNetGetUniversalName Lib "mpr" Alias "WNetGetUniversalNameA" (ByVal lpLocalPath As String, ByVal dwInfoLevel As Long, lpBuffer As Any, lpBufferSize As Long) As Long
说明
获取网络中一个文件的远程名称以及/或者UNC（统一命名规范）名称。例如，假设一个已连接的远程驱动器是\\othersystem\CDrive，它对应的本地驱动器是F:，而且在它的子目录temp中包含了文件xyz.doc。那么运算结果如下：LocalPath xyz.doc 或 f:\temp\xyz.doc（或者文件的任何相对路径名）
UNC 名称： \\othersystem\CDrive\temp\xyz.doc
连接名称： \\othersystem\CDrive
剩余名称： \temp\xyz.doc
它们分别对应于由这个函数装载的REMOTE_NAME_INFO结构的字段，对该结构的定义如下：
Type REMOTE_NAME_INFO
pUniversalName As Long
pConnectionName As Long
pRemainingPath As Long
End Type
返回值
Long，零表示成功。会设置GetLastError。如GetLastError是ERROR_EXTENDED_ERROR，则可用WNetGetLastError取得额外的错误信息
参数表
参数 类型及说明
lpLocalPath String，磁盘文件的名字
dwInfoLevel Long，下述常数之一：
UNIVERSAL_NAME_INFO_LEVEL 只设置pUniversalName字段
REMOTE_NAME_INFO_LEVEL 设置REMOTE_NAME_INFO结构中的所有三个字段
lpBuffer Any，指定用于装载UNC信息的一个缓冲区。缓冲区起点与一个REMOTE_NAME_INFO结构对应
lpBufferSize Long，以字节为单位指定lpBuffer缓冲区的长度。如缓冲区不够大，则设为需要的缓冲区长度

WNetGetUser

VB声明
Declare Function WNetGetUser Lib "mpr.dll" Alias "WNetGetUserA" (ByVal lpName As String, ByVal lpUserName As String, lpnLength As Long) As Long
说明
获取一个网络资源用以连接的名字
返回值
Long，零表示成功。会设置GetLastError。如GetLastError是ERROR_EXTENDED_ERROR，则可用WNetGetLastError取得额外的错误信息
参数表
参数 类型及说明
lpName String，指定已连接资源的远程名称或本地名称。用vbNullString获取当前用户的名字
lpUserName String，用于装载用户名的一个字串缓冲区
lpnLength Long，lpUserName缓冲区的长度。如缓冲区不够大，则自动设为需要的缓冲区长度

㈣ 求一个VB.NET进行局域网内UDP广播的源代码例子

给你个udp多播例子，广播不是很清楚，呵呵
Imports System.Net
Imports System.Net.Sockets
Imports System.Text
Public Class Form1
Inherits System.Windows.Forms.Form
Dim port As String
Dim ipadd As String
Dim ipend As IPEndPoint
Dim sendp As New UdpClient()

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles Button1.Click
Dim ipadress As IPAddress

ipadress = IPAddress.Parse(TextBox1.Text)
'sendport = Int32.Parse(TextBox2.Text)
'ipend = New IPEndPoint(ipadress, sendport)
Try

sendp.JoinMulticastGroup(ipadress)
MessageBox.Show("启动完成！")
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try

End Sub