我们刚做了个项目，自己写了很多个功能函数，怎样把它们写成一些类，以供以后重用？

[LovenDreams]

比如，一个很简单的过程：

'删除传入文件夹下的所有文件和文件夹
'参数：文件夹完整路径
Sub DelFolder(ByVal Dir As String)
Dim Dirs, Files As String()
Dim s As String
Files = System.IO.Directory.GetFiles(Dir)
For Each s In Files
Kill(s)
Next

Dirs = System.IO.Directory.GetDirectories(Dir)
For Each s In Dirs
DelFolder(s) '递归遍历
RmDir(s)
Next
End Sub
怎样把它封装成类，并存进自己的类库？
当然这函数是很简单的，我们只是想知道类的实现。

[Latitude]

在vb.net的索引框里，你键入“类”就会出现很多与其相关的内容，你从“定义”开始看吧

----
Good Luck!

by Henry

[LovenDreams]

Latitude(Henry),Thank you!
能否帮我把上面那个过程写成一个类？我想用例子学习会快一点。
谢谢了！

[tempabc]

具体操作实例：
在菜单“文件”-〉“添加新项”，在出现的窗口中选择“类”，输入名称，按“打开”，即添加了一个类文件，在该文件中写类的代码即可。如：
Public Class Class1

Public MyMsg as string

Public Sub showMsg()
Msgbox(MyMsg)
End Sub

End Class