在可执行文件 n_01.exe 上有如下一个按钮,用来察看每个人的详细情况:Private Sub cmdDetail_Click()
    Shell App.Path & "\" & "n_02.exe " & rst(0), vbNormalFocus 'rst(0)为用户ID
End Sub点击之后,就可以在打开的n_02.exe的窗体中,通过命令行参数,
查看对应用户ID的所有工作日报。如下:
    Call Connect
    strSQL2 = "SELECT * FROM TD_DAY WHERE USER_ID='"
    strSQL2 = strSQL2 & Trim(Command)
    省略   
    rst.Open strSQL2, con, 1, 3但是,我现在还想把rst(1),也就是工作日报的日期也传过去。
这样,就可以查看某个用户在某一天的工作日报。请问如何同时传递两个参数?第二个窗体如何接收?

解决方案 »

  1.   

    完整代码 
    程序一 
    Private Sub cmdDetail_Click()
        Shell App.Path & "\" & "n_02.exe  " & rst(0) ","& rst(1), vbNormalFocus 'rst(0)为用户ID
    End Sub程序 n_02
    Private Sub Form_Load()
    strN =split(Command ,",")
    msgbox strN(0)
    msgbox strN(1)
    End SubCommand  参数是  但你的程序在 DOS下 aa.exe aaaaa 此时 command变量 传入"aaaaa"
      

  2.   

    就事论事,如果要传送两个命令行参数,和传送一个是没有任何区别的。你只要把两个参数用你指定的符号连接成一个字符串,然后在接受到这个命令行字符串之后按照这个指定的符号把两个参数再分开就好了。
    其次,如果这两个程序都是你写的话,还可以用其他的方法来相互通讯。比如用TCPIP,比如用DDE,比如用剪贴板,等等。
    当然,最简单的还是直接把两个程序直接放进一个工程,变成一个程序,直接使用公用变量来传递。
    无论是后面的那一种都可以做到实时的通讯,而命令行参数只能在启动的时候传递参数,不是很实用。