你的写法是VB6中的
创新互联建站专注于团风企业网站建设,成都响应式网站建设公司,成都做商城网站。团风网站建设公司,为团风等地区提供建站服务。全流程按需求定制开发，专业设计，全程项目跟踪，创新互联建站专业和态度为您提供的服务
在VB.Net中Print函数只能跟参数，无法用“；”连接，或者你可以用:
Print "圆的面积s=" Trim(CStr(s))
这两个作为数值运算除法的区别：
1，/ ----就是通常数值的除法运算，例如：
8 / 2 的结果是4
6 / 5 的结果为 1.2
2，\ ----也是作数值的除法运算，但是返回的仅仅是商的整数部分，例如：
8 \ 2 的结果是 4
6 \ 5 的结果为 1
15 \ 4 的结果为 3
20 \ 3 的结果为 6
在VB.NET的类里，实现一个接口的语句是：
implements接口名称
例如，下面定义一个车（总称）的接口，这里的车是各种车的总称：
Public Interface ICar
Property color() As String
Property speed() As Long
Sub PrintInfo()
End Interface
然后在不同类型的“车”类里实现它：
Public Class A_Car
Implements ICar
Dim m_color As String, m_speed As Long
Public Property color() As String Implements ICar.color
Get
Return m_color
End Get
Set(ByVal Value As String)
m_color = Value
End Set
End Property
Protected Overrides Sub Finalize()
MsgBox(I was deconstructed!)
End Sub
Public Sub New()
m_color = Red
m_speed = 210
MsgBox(I was constructed!)
End Sub
Public Property speed() As Long Implements ICar.speed
Get
Return m_speed
End Get
Set(ByVal Value As Long)
m_speed = speed
End Set
End Property
Public Sub PrintInfo() Implements ICar.PrintInfo
MsgBox(Color: m_color vbNewLine Speed: m_speed, MsgBoxStyle.Information)
End Sub
End Class
在 Form 的 Load 事件中编写：
Dim myCar As New A_Car
myCar.PrintInfo()
运行之后就创建了一个 A_Car 类的实例 myCar，然后出现两个对话框，分别说明实例已经创建和汽车的信息。当窗体卸载时，这个类的实例 myCar 将自动销毁，这时将出现一个“I was deconstructed!”的对话框。
声明一个接口时,需要考虑以下几点：
1.接口主体只限于对方法,索引器以及属性的声明；
2.接口成员是隐式公开的,如果对其显式指定访问级别,就会出现编译器错误；
3.接口中不能包含字段,构造函数和常量等；
4.在接口中不能实现任何方法,属性或者索引器；
5.在指定方法时,只需要给出返回类型,名称和参数列表,然后分号结束。
面向对象的接口
在C++中，一个类被允许继承多个类。但是在Java以后的语言不被允许。
这样，如果想继承多个类时便非常困难。所以开发方想出了新办法：接口。
一个接口内，允许包含变量、常量等一个类所包含的基本内容。但是，接口中的函数不允许设定代码，也就意味着不能把程序入口放到接口里。由上可以理解到，接口是专门被继承的。接口存在的意义也是被继承。和C++里的抽象类里的纯虚函数是相同的。不能被实例化。
定义接口的关键字是interface，例如：
publicinterfaceMyInterface{
public void add(int x,int y);
public void volume(int x,int y,int z);
}
继承接口的关键字是implements，相当于继承类的extends。
需要注意的是，当继承一个接口时，接口里的所有函数必须全部被覆盖。例如：
class Demo implements MyInterface{
public void add(int x,int y){
System.out.println( +(x+y));
}
public void volume(int x,int y,int z){
System.out.println( +(x*y*z));
}
public static void main(String args[]){
Demo d=new Demo();
d.add(10,20);
d.volume(10,10,10);
}
}
输出结果：
30
1000
当想继承多个类时，开发程序不允许，报错。这样就要用到接口。因为接口允许多重继承(,)，而类不允许。所以就要用到接口。
您好，在Visual Basic.NET中，是没有像这样的文件I/O操作的，一般都是通过System.IO.StreamReader和System.IO.StreamWriter类，System.IO.BinaryReader和System.IO.BinaryWriter类来读写文件以及利用My.Computer.FileSystem类读写文件，利用System.IO.Filestream类来创建文件，通过引用Microsoft Scripting Runtime来执行文件（夹）和驱动器的特殊操作，常用的是System.IO.StreamReader和System.IO.StreamWriter类。
例如说要读取一个文件，我们可以利用System.IO.StreamReader类编写一个方法（也就是函数），但是首先要在当前类的开头添加一个引用，引用名称：System.IO，添加引用的代码如下
Imports System.IO
添加引用之后，就在当前类的内部创建方法：
Private Function ReadFile(ByVal FileURL As String) As String
Dim sr As StreamReader = New StreamReader(FileURL)
ReadFile = sr.ReadToEnd()
sr.Close()
sr = Nothing
End Function
示例说明：
该方法是一个返回String（字符串）数据的函数，FileURL作为参数是用来存放需要访问的文件的URL，当然，要获取一个文件的URL，就是利用这一句代码实现的：
Dim sr As StreamReader = New StreamReader(FileURL)
当获取了URL之后，就要对文件进行读取操作了，然后将读取的结果返回给方法：
ReadFile = sr.ReadToEnd()
读取文件完毕之后，要对文件执行关闭操作：
sr.Close()
当然别忘了清理资源：
sr = Nothing
StreamReader类可以从流或文件中读取字符，在创建StreamREader类的对象时，可以指定一个流对象，也可以指定一个文件URL，创建对象后就可以调用他的方法，从流中读取数据，其常用方法如下：
Peek：返回下一个可用字符，但不使用它。
Read：读取输入流中下一个字符或一组字符并移动流或文件指针。
ReadBlock：从当前流中读取最大数量字符并从index开始将数据写入buffer。
ReadLine：从当前流中读取一行字符并将字符作为String返回。
REadToEnd：从流的当前位置到末尾读取流。
Close：关闭打开的对象，释放资源。
注：流，一种新的数据格式，这种格式可通过System.IO命名空间下的类访问。流用Stream类表示，所有的流都是从这个类中继承的。流向用户提供了一个一般的数据视图，隐藏了操作系统和底层设备的实现细节，所有的流都支持读写操作。在打开文件时将返回对应的流对象，用户可以对流对象进行读写操作。
如果要对文件执行按行读取操作，这时就会用到枚举，这时候，代码就要更改一下了：
Private Function ReadFile(ByVal FileURL As String) As String
Dim sr As StreamReader = New StreamReader(FileURL)
For Each fLine As String In sr.ReadToEnd()
Line = sr.ReadLine()
ReadFile = ReadFile fLine
Next sr.ReadLine
sr.Close()
End Function
示例说明：
For Each…Next：派生于For…Next循环，用于枚举一系列对象中的成员，而这些对象组成集合，如果集合中至少存在一个元素，程序就会静茹For Each块执行。其格式如下：
For Each 元素 [As 数据类型] In 元素集合
[循环体]
[Exit For]
[循环体]
Next [元素]
比如：
Dim CountNumber As ULong = 0
Dim FolderName() As String = New String() {" "}
For Each strFolder As String In My.Computer.FileSystem.GetDirectories("C:\")
CountNumber = CountNumber + 1
ReDim Preserve FolderName(1 To CountNumber)
FolderName = strFolder
Next strFolder
注：My.Computer.FileSystem.GetDirectories：主要用来枚举指定目录的子文件夹。
Preserve：主要用来避免重定义数组而不损失数组元素的原有数据。
另外，利用My.Computer.FileSystem也可以实现文件的读取，其代码如下：
Dim fpReader As String = My.Computer.FileSystem.ReadAllText("C:\test.txt")
示例说明：
定义一个字符串变量利用My.Computer.FileSystem.ReadAllText来实现对“C:\test.txt”的读取。
如果是已经编码的文本，则可以使用My.Computer.FileSystem对象中的ReadAllText方法并提供路径和文件编码类型，将文本写入字符串变量中，例如：
Dim fpReader As String = My.Computer.FileSystem.ReadAllText("C:\test.txt", _
System.Text.Encoding.UTF32)
当然，System.Text.Encoding的成员不止一个，它还有如下成员：
System.Text.Encoding.UTF8
System.Text.Encoding.UTF16
System.Text.Encoding.ASCII
System.Text.Encoding.Unicode
这些是常见的成员，也是主要的成员。
另外，利用My.Computer.Filesystem类无法实现文件的行操作，还有，如果您的计算机未安装完整的Microsoft.NET Framework Runtime，则无法实现这种操作！
写入文件的操作同样简单，Visual Basic.NET 允许用户使用StreamWriter来对文件写入内容，下面就让我们来创建一个子例程，来实现文件的写入：
Private Sub WriterFile(ByVal FileURL As String, ByVal FileCon As String)
Dim sr As StreamWriter = New StreamWriter(FileURL)
sr.Write(FileCon)
sr.Close()
sr = Nothing
End Sub
示例说明：
sr.Write(FileCon)：将FileCon写入文件FileURL之中。
另外，StreamWriter常用方法如下：
WriteLine：向流中写入一行，后面跟结束符。
Write：写入流，向流对象中写入字符并移动流或文件指针。
Close：关闭打开的对象，释放资源。
附：Visual Basic 6.0文件操作解说：
打开： Open 文件名 For Input | Output | Append As [#]文件号
Input打开读入，文件不存在报错。Output打开覆盖写入，文件不存在则创建。Append打 开追加写入，文件不存在则创建。
读： Line Input #文件号, 字符串变量
读一行数据存入字符串变量，数据包括空格、Tab、等，不包括回车符和换行符，所以要显示文件的换行效果，要手动添加回车符和换行符（vbCrLf）
Input #文件号, 变量1[, | ;] [变量2]...
这种方式可以存入多个变量，而且变量类型不限于字符串型。
写： Print #文件号, 参数1[, | ;] [参数2]...
将各参数逐个写入文件。参数间用逗号隔开时，文件中相应插入多个空格；用分号隔开时，插入一个空格。可以用Spc(n)、Tab(n)等进行排版。
Write #文件号, 参数1[, | ;] [参数2]...
这种写入方式将自动添加界定符，对不同参数的类型加以界定。
Visual Basic 6.0文件操作函数：
Seek： Seek(文件号)
返回文件正在访问的位置，返回值为长整型。对顺序文件和二进制文件，返回值以字节为单位；对随机访问文件，返回值以记录号为单位。
Seek： Seek [#]文件号，位置
定位文件到指定位置。位置单位同上所述。
Input： Input (字节数，[#]文件号)
从文件的访问当前位置读入指定字节数的数据。仅适用于顺序文件和二进制文件。
EOF： EOF(文件号)
判断文件的访问位置是否在文件尾，如果是，返回True，否则，返回False。
LOF： LOF(文件号)
返回文件长度，单位为字节。
FileLen： FileLen (文件名)
返回文件名对应文件的长度，单位是字节。该函数取磁盘文件标识中的长度，即文件打开前的长度，可以取未打开的文件长度。
GetAttr： GetAttr (Pathname)
返回指定文件或文件夹的属性。
FileAttr： FileAttr (文件号)
返回文件号对应文件的打开方式。
GetDateTime： GetDateTime (Pathname)
返回文件被创建或修改的最后日期和时间。
Free： FreeFile[(0|1)]
返回未被占用的文件号，Free或Free(0)返回1～255之间未占用的文件号，Free(1)返回256～511之间未占用的文件。
Dir： Dir (Pathname [,Attributes])
测试指定路径是否有某文件，Attributes附加文件属性条件，取值vbNormal、vbReadOnly、vbHidden、vbSystem、vbVolume、vbDirectory。
Kill： Kill (文件名)
删除指定文件，文件名可包含路径。
FileCopy： FileCopy 源文件，目标文件
拷贝文件。
Name： Name 旧文件名 As 新文件名
文件重命名。前后路径不一致时，操作为移动文件并重命名。
MkDir： MkDir path
新建文件夹。
RmDir： Rmdir path
删除文件夹。
ChDrive： ChDrive Drive
改变当前驱动器 ChDrive "D"
CurDir： CurDir [(driver)]
返回当前工作路径，指定driver则返回目标驱动器的当前工作路径。
举例：
'新建文件，并写入数据，关闭
Open "a.txt" For Output As #1
Print #1, "ABCDEFG"; vbCrLf; "HIJK"
Close #1
'打开文件，并全部写入新文件，关闭
Open "a.txt" For Input As #2
Open "b.txt" For Output As #3
Dim str As String
While (Not EOF(2))
Line Input #2, str
Print #3, str
Wend
Close
注：关于Visual Basic 6.0的文件操作资料来自于
如果您觉得我的回答帮助了您解决难题，别忘了采纳哦，如果我的回答未能解决您的问题，您可以在互联网上寻找更多的解决方案！
VB中PRINT语句后面用分号和逗号区别为：表示不同、输出格式不同、适合不同。
一、表示同
1、用分号：用分号表示下次开始紧接着上次结束的位置。
2、用逗号：用逗号表示下次开始的位置和上次结束位置相隔一个Tab的位置。
二、输出格式不同
1、用分号：用分号的输出格式为紧凑格式输出。
2、用逗号：用逗号的输出格式为默认标准格式输出。
三、适合不同
1、用分号：用分号适合于只有中文内容或只有英文内容输出。
2、用逗号：用逗号适合于中文、英文内容混合输出。
使用 ADO 连接到 Excel
ADO 使用 MDAC 中以下两个 OLE DB 提供程序中的任何一个都可以连接到 Excel 数据文件。
Microsoft Jet OLE DB Provider — 或 —Microsoft OLE DB Provider for ODBC Drivers
使用 Microsoft Jet OLE DB Provider
Jet 提供程序只需要两条信息就可以连接到 Excel 数据源：路径（包括文件名），和 Excel 文件版本。
Jet 提供程序使用连接字符串
Dim cn as ADODB.Connection
Set cn = New ADODB.Connection
With cn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source=C:\MyFolder\MyWorkbook.xls;" _
"Extended Properties=Excel 8.0;"
.Open
End With
提供程序版本：必须使用 Jet 4.0 提供程序；Jet 3.51 提供程序不支持 Jet ISAM 驱动程序。如果指定了 Jet 3.51 提供程序，在运行时会出现以下错误信息：
Couldn't find installable ISAM.
Excel 版本：对于 Excel 95 工作簿（Excel 版本 7.0），应指定 Excel 5.0；对于 Excel 97、Excel 2000 或 Excel 2002 (XP) 工作簿（Excel 版本 8.0、9.0 和 10.0），应指定 Excel 8.0 版本。
使用“数据链接属性”对话框的 Jet 提供程序
如果在应用程序中使用“ADO 数据控件”或“数据环境”，就会出现数据链接属性对话框来收集必要的连接设置。
在提供程序选项卡上，选择 Jet 4.0 提供程序；Jet 3.51 提供程序不支持 Jet ISAM 驱动程序。如果指定了 Jet 3.51 提供程序，在运行时会出现以下错误信息：
Couldn't find installable ISAM.
在连接选项卡上，浏览到工作簿文件。忽略“用户 ID”和“密码”项，因为这些不适用于 Excel 连接。（无法打开受密码保护的 Excel 文件作为数据源。）
在所有选项卡上，从列表中选择扩展属性，然后单击编辑值。输入 Excel 8.0;，用分号 (;) 将其与任何其他已有的项分隔。如果忽略此步骤，测试连接时将出现一条错误信息。这是因为如果不另行指定，Jet 提供程序期望 Microsoft Access 数据库。返回到连接选项卡，并单击测试连接。将出现一个消息框，通知测试已成功完成即可。