########## サンプル ########## Public Sub FormMainLoad() Dim i As Long 'コマンドライン Dim nCommand As Long Dim strCommand() As String 'コマンドライン引数の文字列と数を取得 Call VBC_GetCommand(strCommand, nCommand) For i = 0 To nCommand Debug.Print strCommand(i) Next i End Sub
########## サンプル ##########
Public Sub FormMainLoad() Dim i As Long 'コマンドライン Dim nCommand As Long Dim strCommand() As String 'コマンドライン引数の文字列と数を取得 Call VBC_GetCommand(strCommand, nCommand) For i = 0 To nCommand Debug.Print strCommand(i) Next i End Sub
<戻る>