'------------------------------------------------------------------------------ ' ' 此代码由工具生成。 ' 运行时版本:4.0.30319.42000 ' ' 对此文件的更改可能会导致不正确的行为,并且如果 ' 重新生成代码,这些更改将会丢失。 ' '------------------------------------------------------------------------------ Option Strict On Option Explicit On Imports System Namespace My.Resources '此类是由 StronglyTypedResourceBuilder '类通过类似于 ResGen 或 Visual Studio 的工具自动生成的。 '若要添加或移除成员,请编辑 .ResX 文件,然后重新运行 ResGen '(以 /str 作为命令选项),或重新生成 VS 项目。 ''' ''' 一个强类型的资源类,用于查找本地化的字符串等。 ''' _ Friend Module Resources Private resourceMan As Global.System.Resources.ResourceManager Private resourceCulture As Global.System.Globalization.CultureInfo ''' ''' 返回此类使用的缓存的 ResourceManager 实例。 ''' _ Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager Get If Object.ReferenceEquals(resourceMan, Nothing) Then Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("幸运抽奖.Resources", GetType(Resources).Assembly) resourceMan = temp End If Return resourceMan End Get End Property ''' ''' 重写当前线程的 CurrentUICulture 属性,对 ''' 使用此强类型资源类的所有资源查找执行重写。 ''' _ Friend Property Culture() As Global.System.Globalization.CultureInfo Get Return resourceCulture End Get Set resourceCulture = value End Set End Property End Module End Namespace