0

我在网上找到了一些有用的代码，其中只提供了库文件，我重新创建了源代码，但发现了一些我不确定的错误。

<StandardModule()> _
Friend NotInheritable Class CreateFiles
' Methods

' Fields
Private Shared Configuration As Configuration = New Configuration

' Nested Types
Private Delegate Sub showITDelegate(ByVal message As String)

<STAThread()> _
Public Shared Sub Main()
    CreateFiles.Configuration.ReadConfig()
    CreateFiles.DisplayConfig(CreateFiles.Configuration)
    CreateFiles.CreateFiles()
End Sub

Public Shared Sub CreateFiles()

我试图了解是否缺少另一个类，因为主中的 CreateFiles.* 行和此类中的这些参考子行存在错误： CreateFiles 在其下具有“表达式不产生值”。为什么它会引用自己以及同一类中的方法和子类。

4

1 回答 1

2

似乎它着眼于Sub CreateFiles()而不是类。并且子（例程）不返回任何值。您可以删除子例程CreateFiles中的 (first)。Main

这应该有效：

<StandardModule()> _
Friend NotInheritable Class CreateFiles
' Methods

' Fields
Private Shared Configuration As Configuration = New Configuration

' Nested Types
Private Delegate Sub showITDelegate(ByVal message As String)

<STAThread()> _
Public Shared Sub Main()
    Configuration.ReadConfig()
    DisplayConfig(Configuration)
    CreateFiles()
End Sub

Public Shared Sub CreateFiles()

鉴于您在其他任何地方都没有问题。

于 2013-01-23T18:59:54.123 回答