Propriedade My.Application.UICulture

Artigo
08/25/2010

Obtém a cultura utilizada pelo segmento atual para manipulação e formatação de cadeia de caracteres.

' Usage
Dim value As System.Globalization.CultureInfo = My.Application.Culture
' Declaration
Public ReadOnly Property Culture As System.Globalization.CultureInfo

Valor de retorno

Valor de propriedade

Retorna um objeto CultureInfo que representa a cultura que o encadeamento atual usa para manipulação e formatação de sequência de caracteres.

Comentários

A propriedade My.Application.CurrentCulture obtém o objeto CultureInfo que usa o encadeamento atual para manipulação e formatação de sequência de caracteres.Este objeto é idêntico a aquele retornado pela propriedade CurrentCulture, que controla muitos dos cômputos relacionados a sequências naquele encadeamento.A propriedade CurrentCulture determina os formatos padrão para datas, horas, moeda e números.Ele também determina como classificar, comparar e colocar a primeira letras das palavras em maiúscula em sequências de caracteres.

Para alterar a cultura, você pode usar a Método My.Application.ChangeCulture ou atribuem um objeto CultureInfo diferente para a propriedade CurrentCulture.

A configuração CurrentCulture é diferente da configuração de idioma.Ele contém apenas dados relacionados às configurações padrão para uma região geográfica.

Use o método My.Application.CurrentUICulture para alterar a cultura que o segmento atualusa para recuperar recursos específicos de uma cultura.

Exemplo

Este exemplo demonstra como mudar a cultura altera a representação de sequência de caracteres de datas.

Private Sub TestChangeCulture()
    ' Store the current culture.
    Dim currentculture As String = My.Application.Culture.Name
    MsgBox("Current culture is " & currentculture)

    Dim jan1 As New Date(2005, 1, 1, 15, 15, 15)

    My.Application.ChangeCulture("en-US")
    MsgBox("Date represented in en-US culture: " & jan1)
    ' 1/1/2005 3:15:15 PM

    My.Application.ChangeCulture("")
    MsgBox("Date represented in invariant culture" & jan1)
    ' 01/01/2005 15:15:15

    ' Restore the culture.
    My.Application.ChangeCulture(currentculture)
End Sub

Requisitos

Namespace:Microsoft.VisualBasic.ApplicationServices

Classe:WindowsFormsApplicationBase, ApplicationBase

Assembly: Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)

Disponibilidade por Tipo de Projeto

Tipo de Projeto	Disponível
Aplicativo do Windows	Sim
Biblioteca de Classe	Sim
Aplicativo de Console	Sim
Biblioteca de Controle do Windows	Sim
Biblioteca de Controle da Web	Não
Serviço do Windows	Sim
Site	Não