VB.NET ResourceManager构造函数代码示例

OGeek|极客世界-中国程序员成长平台 › 门户 › 编程› VB.NET›VB.NET教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

本文整理汇总了VB.NET中System.Resources.ResourceManager.ResourceManager构造函数的典型用法代码示例。如果您正苦于以下问题：VB.NET ResourceManager构造函数的具体用法？VB.NET ResourceManager怎么用？VB.NET ResourceManager使用的例子？那么恭喜您, 这里精选的构造函数代码示例或许可以为您提供帮助。您也可以进一步了解该构造函数所在类System.Resources.ResourceManager的用法示例。

在下文中一共展示了ResourceManager构造函数的2个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于我们的系统推荐出更棒的VB.NET代码示例。

示例1: Example

' 导入命名空间
Imports System.Resources
Imports System.Globalization
Imports System.Threading

<Assembly:NeutralResourcesLanguage("en")>

Module Example
   Public Sub Main()
      Dim cultureNames() As String = {"en-US", "fr-FR", "ru-RU", "sv-SE" }
      Dim noon As New Date(Date.Now.Year, Date.Now.Month, 
                           Date.Now.Day, 12,0,0)
      Dim evening As New Date(Date.Now.Year, Date.Now.Month,
                              Date.Now.Day, 18, 0, 0)                          
      
      Dim rm As New ResourceManager(GetType(GreetingResources))
      
      For Each cultureName In cultureNames
         Thread.CurrentThread.CurrentUICulture = CultureInfo.CreateSpecificCulture(cultureName)
         Console.WriteLine("The current UI culture is {0}", 
                           CultureInfo.CurrentUICulture.Name)
         If Date.Now < noon Then
            Console.WriteLine("{0}!", rm.GetString("Morning"))
         ElseIf Date.Now < evening Then
            Console.WriteLine("{0}!", rm.GetString("Afternoon"))
         Else
            Console.WriteLine("{0}!", rm.GetString("Evening"))
         End If 
         Console.WriteLine()
      Next
   End Sub
End Module

Friend Class GreetingResources
End Class

开发者ID:VB.NET开发者，项目名称:System.Resources，代码行数:35，代码来源:ResourceManager

输出：

The current UI culture is en-US
Good afternoon!

The current UI culture is fr-FR
Bonjour!

The current UI culture is ru-RU
Добрый день!

The current UI culture is sv-SE
Good afternoon!

示例2: Example

' 导入命名空间
Imports System.Globalization
Imports System.Reflection
Imports System.Resources

Module Example
   Public Sub Main()
      ' Retrieve the resource.
      Dim rm As New ResourceManager("ExampleResources", 
                                    GetType(Example).Assembly)
      Dim greeting As String = rm.GetString("Greeting")
      
      Console.Write("Enter your name: ")
      Dim name As String = Console.ReadLine()
      Console.WriteLine("{0} {1}!", greeting, name)
   End Sub
End Module

开发者ID:VB.NET开发者，项目名称:System.Resources，代码行数:17，代码来源:ResourceManager

输出：

Enter your name: John
Hello John!

注：本文中的System.Resources.ResourceManager.ResourceManager构造函数示例由纯净天空整理自Github/MSDocs等源码及文档管理平台，相关代码片段筛选自各路编程大神贡献的开源项目，源码版权归原作者所有，传播和使用请参考对应项目的License；未经允许，请勿转载。