當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET ResourceManager構造函數代碼示例

本文整理匯總了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;未經允許,請勿轉載。