VB.NET String.ToUpper方法代码示例

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

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

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

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

示例1: Example

' 导入命名空间
Imports System.Globalization

Public Module Example
   Public Sub Main()
      Dim str1 As String = "indigo"
      Dim str2, str3 As String
      
      ' str2 is an uppercase copy of str1, using English-United States culture.
      str2 = str1.ToUpper(New CultureInfo("en-US", False))
      
      ' str3 is an uppercase copy of str1, using Turkish-Turkey culture.
      str3 = str1.ToUpper(New CultureInfo("tr-TR", False))
      
      ' Compare the code points and compare the uppercase strings.
      ShowCodePoints("str1", str1)
      ShowCodePoints("str2", str2)
      ShowCodePoints("str3", str3)
      Console.WriteLine("str2 is {0} to str3.", _
                        IIf(String.CompareOrdinal(str2, str3) = 0, "equal", "not equal"))
   End Sub
   
   Public Sub ShowCodePoints(varName As String, s As String)
      Console.Write("{0} = {1}: ", varName, s)
      For Each c In s
         Console.Write("{0:X4} ", AscW(c))
      Next
      Console.WriteLine() 
   End Sub 
End Module

开发者ID:VB.NET开发者，项目名称:System，代码行数:30，代码来源:String.ToUpper

输出：

str1 = indigo: 0069 006E 0064 0069 0067 006F
str2 = INDIGO: 0049 004E 0044 0049 0047 004F
str3 = İNDİGO: 0130 004E 0044 0130 0047 004F
str2 is not equal to str3.

示例2: Example

Module Example
   Public Sub Main()
      Dim n As Integer = 0
      For ctr As Integer = &h20 To &h017F
         Dim string1 As String = ChrW(ctr).ToString()
         Dim upperString As String = string1.ToUpper()
         If string1 <> upperString Then
            Console.Write("{0} (\u+{1}) --> {2} (\u+{3})         ", _
                          string1, _
                          Convert.ToUInt16(string1.Chars(0)).ToString("X4"), _ 
                          upperString, _
                          Convert.ToUInt16(upperString.Chars(0)).ToString("X4"))                     
            n += 1
            If n Mod 2 = 0 Then Console.WriteLine()
         End If
      Next 
   End Sub
End Module

开发者ID:VB.NET开发者，项目名称:System，代码行数:18，代码来源:String.ToUpper

输出：

a (\u+0061) --> A (\u+0041)         b (\u+0062) --> B (\u+0042)
c (\u+0063) --> C (\u+0043)         d (\u+0064) --> D (\u+0044)
e (\u+0065) --> E (\u+0045)         f (\u+0066) --> F (\u+0046)
g (\u+0067) --> G (\u+0047)         h (\u+0068) --> H (\u+0048)
i (\u+0069) --> I (\u+0049)         j (\u+006A) --> J (\u+004A)
k (\u+006B) --> K (\u+004B)         l (\u+006C) --> L (\u+004C)
m (\u+006D) --> M (\u+004D)         n (\u+006E) --> N (\u+004E)
o (\u+006F) --> O (\u+004F)         p (\u+0070) --> P (\u+0050)
q (\u+0071) --> Q (\u+0051)         r (\u+0072) --> R (\u+0052)
s (\u+0073) --> S (\u+0053)         t (\u+0074) --> T (\u+0054)
u (\u+0075) --> U (\u+0055)         v (\u+0076) --> V (\u+0056)
w (\u+0077) --> W (\u+0057)         x (\u+0078) --> X (\u+0058)
y (\u+0079) --> Y (\u+0059)         z (\u+007A) --> Z (\u+005A)
à (\u+00E0) --> À (\u+00C0)         á (\u+00E1) --> Á (\u+00C1)
â (\u+00E2) --> Â (\u+00C2)         ã (\u+00E3) --> Ã (\u+00C3)
ä (\u+00E4) --> Ä (\u+00C4)         å (\u+00E5) --> Å (\u+00C5)
æ (\u+00E6) --> Æ (\u+00C6)         ç (\u+00E7) --> Ç (\u+00C7)
è (\u+00E8) --> È (\u+00C8)         é (\u+00E9) --> É (\u+00C9)
ê (\u+00EA) --> Ê (\u+00CA)         ë (\u+00EB) --> Ë (\u+00CB)
ì (\u+00EC) --> Ì (\u+00CC)         í (\u+00ED) --> Í (\u+00CD)
î (\u+00EE) --> Î (\u+00CE)         ï (\u+00EF) --> Ï (\u+00CF)
ð (\u+00F0) --> Ð (\u+00D0)         ñ (\u+00F1) --> Ñ (\u+00D1)
ò (\u+00F2) --> Ò (\u+00D2)         ó (\u+00F3) --> Ó (\u+00D3)
ô (\u+00F4) --> Ô (\u+00D4)         õ (\u+00F5) --> Õ (\u+00D5)
ö (\u+00F6) --> Ö (\u+00D6)         ø (\u+00F8) --> Ø (\u+00D8)
ù (\u+00F9) --> Ù (\u+00D9)         ú (\u+00FA) --> Ú (\u+00DA)
û (\u+00FB) --> Û (\u+00DB)         ü (\u+00FC) --> Ü (\u+00DC)
ý (\u+00FD) --> Ý (\u+00DD)         þ (\u+00FE) --> Þ (\u+00DE)
ÿ (\u+00FF) --> Ÿ (\u+0178)         ā (\u+0101) --> Ā (\u+0100)
ă (\u+0103) --> Ă (\u+0102)         ą (\u+0105) --> Ą (\u+0104)
ć (\u+0107) --> Ć (\u+0106)         ĉ (\u+0109) --> Ĉ (\u+0108)
ċ (\u+010B) --> Ċ (\u+010A)         č (\u+010D) --> Č (\u+010C)
ď (\u+010F) --> Ď (\u+010E)         đ (\u+0111) --> Đ (\u+0110)
ē (\u+0113) --> Ē (\u+0112)         ĕ (\u+0115) --> Ĕ (\u+0114)
ė (\u+0117) --> Ė (\u+0116)         ę (\u+0119) --> Ę (\u+0118)
ě (\u+011B) --> Ě (\u+011A)         ĝ (\u+011D) --> Ĝ (\u+011C)
ğ (\u+011F) --> Ğ (\u+011E)         ġ (\u+0121) --> Ġ (\u+0120)
ģ (\u+0123) --> Ģ (\u+0122)         ĥ (\u+0125) --> Ĥ (\u+0124)
ħ (\u+0127) --> Ħ (\u+0126)         ĩ (\u+0129) --> Ĩ (\u+0128)
ī (\u+012B) --> Ī (\u+012A)         ĭ (\u+012D) --> Ĭ (\u+012C)
į (\u+012F) --> Į (\u+012E)         ı (\u+0131) --> I (\u+0049)
ĳ (\u+0133) --> Ĳ (\u+0132)         ĵ (\u+0135) --> Ĵ (\u+0134)
ķ (\u+0137) --> Ķ (\u+0136)         ĺ (\u+013A) --> Ĺ (\u+0139)
ļ (\u+013C) --> Ļ (\u+013B)         ľ (\u+013E) --> Ľ (\u+013D)
ŀ (\u+0140) --> Ŀ (\u+013F)         ł (\u+0142) --> Ł (\u+0141)
ń (\u+0144) --> Ń (\u+0143)         ņ (\u+0146) --> Ņ (\u+0145)
ň (\u+0148) --> Ň (\u+0147)         ŋ (\u+014B) --> Ŋ (\u+014A)
ō (\u+014D) --> Ō (\u+014C)         ŏ (\u+014F) --> Ŏ (\u+014E)
ő (\u+0151) --> Ő (\u+0150)         œ (\u+0153) --> Œ (\u+0152)
ŕ (\u+0155) --> Ŕ (\u+0154)         ŗ (\u+0157) --> Ŗ (\u+0156)
ř (\u+0159) --> Ř (\u+0158)         ś (\u+015B) --> Ś (\u+015A)
ŝ (\u+015D) --> Ŝ (\u+015C)         ş (\u+015F) --> Ş (\u+015E)
š (\u+0161) --> Š (\u+0160)         ţ (\u+0163) --> Ţ (\u+0162)
ť (\u+0165) --> Ť (\u+0164)         ŧ (\u+0167) --> Ŧ (\u+0166)
ũ (\u+0169) --> Ũ (\u+0168)         ū (\u+016B) --> Ū (\u+016A)
ŭ (\u+016D) --> Ŭ (\u+016C)         ů (\u+016F) --> Ů (\u+016E)
ű (\u+0171) --> Ű (\u+0170)         ų (\u+0173) --> Ų (\u+0172)
ŵ (\u+0175) --> Ŵ (\u+0174)         ŷ (\u+0177) --> Ŷ (\u+0176)
ź (\u+017A) --> Ź (\u+0179)         ż (\u+017C) --> Ż (\u+017B)
ž (\u+017E) --> Ž (\u+017D)

示例3: String.ToUpper()

Public Class Tester
    Public Shared Sub Main
        Dim quote As String = "AbCdEfG"
        Dim result As New System.Text.StringBuilder

        result.AppendLine("Original:   " & quote)
        result.AppendLine("Upper Case: " & quote.ToUpper())
        result.AppendLine("Lower Case: " & quote.ToLower())
        result.AppendLine("Mixed Case: " & MixedCase(quote))

        Console.WriteLine(result.ToString())
    End Sub
    Public Shared Function MixedCase(ByVal origText As String) As String
        Dim counter As Integer
        Dim textParts() As String = Split(origText, " ")

        For counter = 0 To textParts.Length - 1
            If (textParts(counter).Length > 0) Then _
               textParts(counter) = _
               UCase(Microsoft.VisualBasic.Left( _
               textParts(counter), 1)) & _
               LCase(Mid(textParts(counter), 2))
        Next counter

        Return Join(textParts, " ")
    End Function

End Class

开发者ID:VB程序员，项目名称:System，代码行数:28，代码来源:String.ToUpper

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