网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

vb点虐 仿dos的简单介绍

VB.NET如何使用DOS命令

运行一个可执行程序,并且如果该程序仍然在运行,则返回一个包含该程序的进程

创新互联公司是网站建设技术企业,为成都企业提供专业的成都网站制作、网站建设,网站设计,网站制作,网站改版等技术服务。拥有十多年丰富建站经验和众多成功案例,为您定制适合企业的网站。十多年品质,值得信赖!

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里面

使用vb点虐 如何读取XML文件

使用DataSet类来完成这项任务。

DataSet对象在传输时,是以XML流的形式而不是以COM形式传输的。DataSet对象可以读取XML数据文件或者数据流,从而将树型结构的XML数据转换成关系型的数据,如表(DataTable)、列(DataColumn)、行(DataRow)等。

在这个实例中,我们将XML文件命名为“xmlfile.xml”,具体内容如下:

?xml version=\"1.0\"standalone=”yes”?

Detail

Person

NameManish/Name

Age22/Age

/Person

/Detail \'用VB.NET读写XML文件

C1aSS WriteXML

Shared Sub main()

Dim obj DataSet As New System.Data.DataSet()

Dim strVirtualPath As String=”t.xml”

\'载入XML文件DataSet

objDataSet.ReadXml(”xmlfile.xml”)

\'通过控制器读取XML内容

Console.Write(objDataSet.GetXml)

\'从原XML文件中得到数据

ConSOle.Write(”Enter Name:”)

Dim fname,age As String

fname=ConS01e.ReadLine

\'写入你希望的代码

ConS01e.Write(”Enter Age:”)

age=Console.ReadLine

ConS0le.Write(fname&age)

Dim v(1)As String

v(0)=fname

V(1)=age

\'增加数据DataSet

objDataSet.Tables(0).Rows.Add(V)

\'更新XML文件

objDataSet.WriteXml(”xmlfile.xml”)

Console.Write(obj DataSet.GetXml)

End Sub

End C1ass

运行该程序有两种方式,一种是在Microso~VS.NET框架中编译完后运行;另一种则是在仿DOS的Command窗口中运行。在第一种方式中,必须加上System、System.Data、System.xML的引用。具体方法为:先创建一个空的项目,然后加入这个文件名字;在“解决方案资源管理器”中加入引用,此时需要选择相应的.dll文件;注意,xmlfile.xml文件应该放在工程的/bin目录下面。我们可以输出结果也可以用浏览器直接查看改变后的XML文件。在第二种方式中,选择桌面的“程序”一“Microso~Visual Studio.NET”一“VisualStudio.NET工具”一“Visual Studio.NET命令提示”命令,在DOS命令提示框敲入命令:[Page]

vbc/r:system.d11/r:system.data.d11/r:system.xml.d11 xml.vb其中,程序名为xml.vb,这里的3个.dll文件都是必须调用的库文件。应该在存放VB.NET文件的目录中运行上述命令,否则找不到相应的程序,当然设置PATH也可以做到。此外,Xml_vb文件应该和XML文件放在同一目录下面。每次运行此程序都会往文件中写进同样的内容,都是写入Person/,运行一次写一行。其实,我们只要稍微修改一下这个程序,就可以往XML中写入我们所需要的数据。

VB如何模拟DOS

我的思路是……每次输入一行命令就让cmd输出一个结果文件,再从这个文件里读取到text里。


网站题目:vb点虐 仿dos的简单介绍
URL分享:http://bjjierui.cn/article/ddjjjjh.html

其他资讯