求助:有段代码看不明白希望大虾们指教
Imports System.IO
Public Class Favorites
Public FavoritesCollection As WebFavoriteCollection
Public ReadOnly Property FavoritesFolder() As String
Get
Return Environment.GetFolderPath(Environment.SpecialFolder.Favorites)
End Get
End Property
Public Sub ScanFavorites()
ScanFavorites(FavoritesFolder)
End Sub
Public Sub ScanFavorites(ByVal folderName As String)
If FavoritesCollection Is Nothing Then FavoritesCollection = New WebFavoriteCollection
Dim objScanFolder As New DirectoryInfo(folderName)
Dim objFavoriteFile As FileInfo
For Each objFavoriteFile In objScanFolder.GetFiles
If String.Compare(objFavoriteFile.Extension, ".Url ", True) = 0 Then
Dim objWebFavorite As New WebFavorite
objWebFavorite.Load(objFavoriteFile)
FavoritesCollection.Add(objWebFavorite)
End If
Next
End Sub
End Class
这里定义的类Favorites中为什么定义一个函数ScanFavorites()后,而这个函数又调用本身呢?
Public Sub ScanFavorites()
ScanFavorites(FavoritesFolder)
End Sub
这段代码也不是很明白忘高人指教
[解决办法]
这是.net里的东西吧。
这个类的ScanFavorites函数被重载了,类里面提供了两种调用ScanFavorites函数的方法。
一种没有参数的调用,一种是带参数的调用,两种调用实现的是相同的功能。不带参数的把类属性FavoritesFolder作为参数来调用带参数的。