一念春风的博客'Command() = My.Application....Dim FileName As String = "" '接收的文件名 If My.Application.CommandLineArgs().Count <> 0 Then FileName = My.Application.CommandLineArgs(0) End If ...
VB是世界上最好的语言的博客Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load createTree(TreeView1, Application.StartupPath) End Sub Public Shared Function createTree(ByVal ...