2 回答

TA貢獻1796條經驗 獲得超7個贊
Command 函數用于啟動 Visual Basic 或使用 Visual Basic 開發的可執行程序的命令行的參數部分。
對于用 Visual Basic 開發的且編譯為 .exe 文件的應用程序,Command 函數返回在命令行中出現于應用程序名稱后的任何參數,其格式為:MyApp(cmdlineargs)。
示例
此示例使用 Command 函數返回包含數組的對象中的命令行參數。
VB
Function GetCommandLineArgs() As String()
' Declare variables.
Dim separators As String = " "
Dim commands As String = Microsoft.VisualBasic.Interaction.Command()
Dim args() As String = commands.Split(separators.ToCharArray)
Return args
End Function

TA貢獻1865條經驗 獲得超7個贊
添加一個模塊文件Moudel1
模塊代碼:
Public Dq as String
Sub Main()
Dq=Command()
End Sub
其他代碼不需要,然后把你的代碼稍改寫一些:
Private Sub Form_Load()
MsgBox dq‘保留!查看效果
Dim TextLine
Open dq For Input As #1 ' 打開文件。
Do While Not EOF(1) ' 循環至文件尾。
Line Input #1, TextLine ' 讀入一行數據并將其賦予某變量。
Text1.Text = Text1.Text & TextLine & vbNewLine ' 在調試窗口中顯示數據。
Loop
Close #1 ' 關閉文件。
End Sub
這樣就行了,但是要Command()函數收到的文件路徑一定是正確才不會出錯!
- 2 回答
- 0 關注
- 973 瀏覽
添加回答
舉報