vb.net怎么运行类 vb中如何运行程序

vb.net怎么样运行一个程序啊?用FileOpen行不??

不行, fileopen是用来打开、读取或创建文件的，主要是文本类的文件。

成都创新互联公司作为成都网站建设公司，专注成都网站建设公司、网站设计，有关企业网站设计方案、改版、费用等问题，行业涉及成都茶楼设计等多个领域，已为上千家企业服务，得到了客户的尊重与认可。

应该用shell方法,如:

Shell("D:\mypath\abc.exe")

注意各种参数的设置,详查msdn

在vb.net中怎么调用自定义类？

代码已测试。

一、测试需要的INI文件。名称为“setinfo.ini”，存放路径为你解决方案里“Bin“文件夹的”Debug“文件夹里。

内容：

[Location]

pnlTime.Location.X=787

pnlTime.Location.Y=0

[TopMost]

Top=True

二、操作INI文件的类。新建一个类，类中内容为：

Public Class Class1

Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _

( _

ByVal lpApplicationName As String, _

ByVal lpKeyName As String, _

ByVal lpDefault As String, _

ByVal lpReturnedString As String, _

ByVal nSize As Int32, _

ByVal lpFileName As String _

) As Int32

End Class

三、界面代码：

Imports System.IO 'for path

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

getINI()

End Sub

Private Sub getINI()

Dim iniclass As New Class1 '

Dim myBf As String 'get set_info 开辟存储的内存

myBf = New String(CChar(""), 256)

Dim myFN As String '配置文件的文件路径

myFN = Path.Combine(My.Application.Info.DirectoryPath, "setinfo.ini")

Dim myAN As String 'Application_NAME,也是Section名称

myAN = Me.TextBox1.Text

Dim myKN As String 'KEY_NAME,关键字名称

myKN = Me.TextBox2.Text

Class1.GetPrivateProfileString(myAN, myKN, "", myBf, myBf.Length, myFN) '调用读取INI文件的操作

TextBox3.Text = Microsoft.VisualBasic.Left(myBf, InStr(myBf, Chr(0)) - 1) '截取有用部分,有必要

End Sub

End Class

四、测试截图如下

用VB.NET做的程序怎么在电脑上直接运行呢？.net framework 运行环境也有了。

首先你要知道vb和vb.net是完全不同的。

vb6.0（vb最后的一款编译器）编译的软件只要没有用到外在的ocx控件则可以在windows下顺利运行，否则需要把ocx控件也安装到对方电脑中。

vb.net则需要安装.net

framework(相当与安装虚拟机)，否则无法运行。

20006年以后的vista都默认安装了.net

framework的。

vb.net 如何在一个项目中创建类，并且使用他?

在任意form类或模块中都可以创建类，跟建立函数和过程一样。

示例：

public class form1

‘创建一个属于form的子类，名称为【类名】。

public class 类名

’定义类成员text

public text as string

end class

‘定义一个【类名】类的公共变量。

dim 类名1 as 类名

’定义一个过程，使用【类名】类的text成员

public sub 过程

‘实例化【类名1】

类名1=new 类名

类名1.text=“赋值”

’定义一个【新类】类的私用变量，并实例化。

dim 新类1 as new 新类

新类1.name=“一个字符串”

新类1.age=12

end sub

end class

‘’‘创建一个与form同级的类，名称为【新类】

public class 新类

public sub new（）

end sub

public name as string

public age as integer

end class

在模块中使用：

public class module1

dim a as new form1.类名

end module