VB局域网扫描
最近由于工作项目原因，临时要求做一个局域网扫描软件。功能要求，扫描出IP地址以及对应的MAC地址。功能比较简单。于是很快就做了。采用的开发工具是 VB6.0
使用方法是通过发送 ARP包，广播 IP地址的方式来获得 对应的 MAC地址，SendARP（）。
有一些细节要注意，就是 输出MAC地址的时候 如果不进行设置的话，就是002170A560F2。
如果要想输出为00-21-70-A5-60-F2这样的形式，可以
For i = 0 To length - 2
GetMac = GetMac & Right("00" & Hex(Mac(i)), 2) & "-"
Next i
GetMac = GetMac & Right("00" & Hex(Mac(5)), 2)
这样就可以可以了
还有一些其他功能就不做介绍了。
相关文档：
VB 注释程序代码的符号是 '，只要在某行程序前面加上该符号就可以注释该行程序。但如果程序代码语句很多的时候，一行一行地注释就非常不方便。其实 VB
本身提供了一次性注释多条语句的功能：在主菜单“视图”选项的“工具栏”下，选中“编辑”，VB
的界面会出现一排工具按钮，其中就有用 ......
一个CommonDialog，一个CommandButton，一个PictureBOX
Option Explicit
Private Declare Function DrawIcon Lib "user32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal hIcon As Long) As Long
Private Declare Function ExtractIcon Lib "shell32.dll" Alias "ExtractIconA" (ByVal hInst As Long, B ......
引自：http://blog.csdn.net/yizia/archive/2006/09/19/1248669.aspx
访问远程数据库的情况有以下几种：
1）访问远程数据库的access数据库
2）访问远程mssql数据库或oracle等其他关系数据库，但是数据库通信端口被防火墙阻挡或其他网络原因造成无法使用该端口
本文仅在windows2000 advance server,mdac2.8下测试通过� ......
http://zhidao.baidu.com/question/33440250.html
在模块中输入以下代码
Public Declare Function sndPlaySound Lib "winmm" Alias _
"sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As Long
' flag uitzetten
Public Const SND_SYNC = &H0
Public Const SND_ASYNC = &H1 ......
近日分析一VB做的报表，由于对VB只是了解，谈不上熟练，不过对其水晶报表倒有点认识，之前也做过三两个小的报表 ，加之对PB中的报表了解非常熟悉，当时信心蛮大的。
先是看了DataReport，用于绘制报表格式。再来看DataEnvironment，用于定义获取的数据列。将DataReport与DataEnviro ......
