扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
调用c:\1.bat,可以这样:
公司主营业务:成都做网站、成都网站设计、移动网站开发等业务。帮助企业客户真正实现互联网宣传,提高企业的竞争能力。创新互联是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化,感谢他们对我们的高要求,感谢他们从不同领域给我们带来的挑战,让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。创新互联推出龙圩免费做网站回馈大家。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Shell("cmd.exe /c call c:\1.bat", AppWinStyle.NormalFocus)
End Sub
调用过程,调用过程有诸多技巧,它们与过程的类型、位置以及在应用程序中的使用方式有关。下面说明如何调用 Sub 过程和 Function 过程。
调用 Sub 过程
与 Sub 过程不同,在表达式中,Sub 过程不能用其名字调用。调用 Sub 过程的是一个独立的语句。Sub 过程还有一点与函数不一样,它不会用名字返回一个值。但是,与 Function过程一样,Sub 过程也可以修改传递给它们的任何变量的值。
调用 Sub 过程有两种方法:
'以下两个语句都调用了名为 MyProc 的 Sub 过程。
Call MyProc (FirstArgument, SecondArgument)
MyProc FirstArgument, SecondArgument
注意,当使用 Call 语法时,参数必须在括号内。若省略 Call 关键字,则也必须省略参数两边的括号
调用函数过程
通常,调用自行编写的函数过程的方法和调用 Visual Basic 内部函数过程(例如 Abs)的方法一样;即在表达式中写上它的名字。
'下面的语句都调用函数 ToDec。
Print 10 * ToDec
X = ToDec
If ToDec = 10 Then Debug.Print "Out of Range"
X = AnotherFunction ( 10 * ToDec)
就像调用 Sub 过程那样,也能调用函数。下面的语句都调用同一个函数:
Call Year (Now)
Year Now
当用这种方法调用函数时,Visual Basic 放弃返回值。
调用其它模块中的过程
在工程中的任何地方都能调用其它模块中的公用过程。可能需要指定这样的模块,它包含正在调用的过程。调用其它模块中的过程的各种技巧,取决于该过程是在窗体模块中、类模块中还是标准模块中。
窗体中的过程
所有窗体模块的外部调用必须指向包含此过程的窗体模块。如果在窗体模块 Form1 包含 SomeSub 过程,则可使用下面的语句调用 Form1 中的过程:
Call Form1.SomeSub(arguments)
类模块中的过程
与窗体中调用过程类似,在类模块中调用过程要调用与过程一致并且指向类实例的变量。例如,DemoClass 是类 Class1 的实例:
Dim DemoClass as New Class1
DemoClass.SomeSub
但是不同于窗体的是,在引用一个类的实例时,不能用类名作限定符。必须首先声明类的实例为对象变量(在这个例子中是 DemoClass )并用变量名引用它。
标准模块中的过程
如果过程名是唯一的,则不必在调用时加模块名。无论是在模块内,还是在模块外调用,结果总会引用这个唯一过程。如果过程仅出现在一个地方,这个过程就是唯一的。
如果两个以上的模块都包含同名的过程,那就有必要用模块名来限定了。在同一模块内调用一个公共过程就会运行该模块内的过程。例如,对于 Module1 和 Module2 中名为 CommonName 的过程,从 Module2 中调用 CommonName 则运行 Module2 中的 CommonName 过程,而不是 Module1 中的 CommonName 过程。
从其它模块调用公共过程名时必须指定那个模块。例如,若在 Module1 中调用 Module2 中的 CommonName 过程,要用下面的语句:
Module2.CommonName (arguments)
Public 用于声明对所有模块中的所有其它过程都可以使用的过程。
Private 用于声明只能在包含该声明的模块中使用的过程。
第一步,新建项目。
1
打开vb.net,也就是打开Microsoft visual studio 2010,第一次使用的时候设置为basic语言就行。新建项目--打开excel。
2
新建成功。
END
第二步,添加引用。
1
“项目”--“添加引用”。
2
添加Microsoft Excel 14.0 Object Library。
END
第三步,添加打开文件对话框工具。
1
工具箱--对话框--openfiledialog。
2
添加成功。
END
第四步,添加命令按钮控件。
1
工具箱--公共控件--button。
在控件上右击鼠标,进入属性设置。
2
text属性设置为“打开excel”。
3
name属性也设置为“打开excel”。
END
第五步,编写程序。
1
鼠标双击命令按钮,进入编程界面,编写程序。
END
第六步,运行程序。
1
鼠标单击启动调式图标,程序开始运行。
2
单击打开excel命令按钮,调用打开文件对话框,选择自己要打开的excel文件。
END
第七步,保存程序。
第一次程序运行完,关闭程序,出现关闭项目提示,选择保存。
2
选好自己要保存的位置。
运行一个可执行程序,并且如果该程序仍然在运行,则返回一个包含该程序的进程 ID 的整数。
Public Function Shell( _
ByVal PathName As String, _
Optional ByVal Style As AppWinStyle = AppWinStyle.MinimizedFocus, _
Optional ByVal Wait As Boolean = False, _
Optional ByVal Timeout As Integer = -1 _
) As Integer
参数
PathName
必选。String。要执行的程序的名称,以及任何必选的参数和命令行开关。PathName 也可以包含驱动器和目录路径或文件夹。
如果您不知道程序的路径,可以使用 My.Computer.FileSystem.GetFiles 方法进行查找。例如,调用 My.Computer.FileSystem.GetFiles("C:\", True, "testFile.txt") 可以返回驱动器 C:\ 上任意处的名称为 testFile.txt 的每个文件的完整路径。
Style
可选。AppWinStyle。从 AppWinStyle 枚举中选择的值,指定要在其中运行程序的窗口的样式。如果省略 Style,则 Shell 将使用 AppWinStyle.MinimizedFocus,它启动程序后最小化并带有焦点。
Wait
可选。Boolean。指示 Shell 函数是否应等待程序完成的值。如果省略 Wait,Shell 将使用 False。
Timeout
可选。Integer。Wait 为 True 时要等待的毫秒数。如果省略 Timeout,则 Shell 使用 -1 表示没有超时,并且 Shell 直到程序完成才会返回。因此,如果省略 Timeout 或将其设置为 -1,则 Shell 可能永远不会将控制返回您的程序。
如果你要获得显示的结果,我知道的方法是使用一个dos管道(名字玄乎,实际上没什么)
在命令的最后加一个 (filename)
这样这个命令所有的显示结果就背记录在(filename)里面了
比如
dir a.txt
这样dir显示的结果就是背全部记录在a.txt里面
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流