读书人

急 帮小弟我分析下这几句话

发布时间: 2012-03-30 17:32:09 作者: rapoo

急啊 帮我分析下这几句话

VB code
'启动函数Private Sub Main()On Error GoTo ErrDim strTitle() As Stringmstrallpara = Trim(Command$)If Trim(mstrallpara) <> "" Then    strTitle = Split(mstrallpara, "|")    mstrright = Trim(strTitle(0))    mstrUserID = Trim(strTitle(1))    mstru8conn = Trim(strTitle(2))    mstrServer = Trim(strTitle(3))    mintlang = Trim(strTitle(4))    mstrrunpara = Trim(strTitle(5))    mstraccname = Trim(strTitle(6))   ElseDim mstracc As Stringmstracc  'mstru8conn = "PROVIDER=SQLOLEDB;data source=NT08;user id=sa;password=databasesqlserver;initial catalog=UFDATA_001_2010;Connect Timeout=30;Persist Security Info=True ;Current Language=Simplified Chinese;"End Iffrmomhistory.Show Exit SubErr:    Err.Raise Err.DescriptionEnd Sub

我想知道command$这个函数的参数是从哪里传过来的,
还有mstru8conn...这一句为什么要注释掉, (大概是因为要用本地调试吧,大概,)

[解决办法]
编译成exe后,command可以获得命令行参数

比如:resgvr32.exe a.dll
在程序内部command="a.dll"

在IDE上运行时,在菜单【工程-工程属性-生成】中"命令行参数"里面输入

读书人网 >VB

热点推荐