iamlaosong文

用VB编写一个小工具，用来抓取网页信息。正常情况下网址是固定的，但有时需要改变，作为一个小工具，做个配置文件吧，用起来就不方便，因为EXE文件还得拖个配置文件，所以就想到用命令行参数的方式，如果没有参数，就用默认网址，否则，怎使用命令行带的网址。VB获取命令行参数的函数是Command函数，使用起来很简单，即：

CmdLine = Command()

这样CmdLine变量就取得了命令行参数的内容，然后可以通过对CmdLine内容的处理完成各种功能。

下面看一个简单的示例，就是用命令行中的网址取代默认网址：

Private Sub Form_Load()
    WebBrowser1.Visible = True
    http = Command()
    
    If Len(http) = 0 Then
        http = "http://10.3.20.83/ems/"
    Else
       MsgBox "将访问网址：" & http,vbOKOnly + vbInformation,"iamlaosong"
    End If
    WebBrowser1.Navigate http
End Sub