borderAndreaVB free resources for Visual Basic developersborder

borderAndreaVB Visual Basic and VB.NET source code resources - Copyright © 1999-2007 Andrea Tincaniborder

AndreaVB | Forum | News | Downloads | Register | Help | Member List | Statistics | Search | PM | Profile

Print This Topic
Previous Topic (Para quem não conseguir usar alguns controls ActiveX da Microsoft e/ou trabalhar com bases de dados:)Next Topic (Arquivo Sequencial - Como faço para ler um arquivo sequencial com mais de 32.767 bytes) New Topic New Poll Post Reply
AndreaVB Forum : Non-English ONLY : API - Identificar no Windows, em Configurações Regionais, se a configuração é de ponto ou vírgula
Poster Message
robap
Level: Guest


icon API - Identificar no Windows, em Configurações Regionais, se a configuração é de ponto ou vírgula  Archived to Disk

Oi Pessoal!

Gostaria de saber como faço para saber se o painel de configurações do Windows está configurado com ponto ou com vírgula?
  Obrigado.
      Roberta.   

26-04-2002 at 07:34 PM
| Quote Reply
acrbasic
Level: Guest

icon Re: API - Identificar no Windows, em Configurações Regionais, se a configuração é de ponto ou vírgula  Archived to Disk

Function PontoOuVírgula () As Integer

'Retorna 0 se for ponto
'Retorna 1 se for vírgula

    PontoOuVírgula = Sgn(InStr(Format$(.1, "0.0"), ","))

End Function

15-05-2002 at 03:29 PM
| Quote Reply
acrbasic
Level: Guest

icon Re: API - Identificar no Windows, em Configurações Regionais, se a configuração é de ponto ou vírgula  Archived to Disk

Function PontoOuVírgula () As Integer

'Retorna 0 se for ponto
'Retorna 1 se for vírgula

    PontoOuVírgula = Sgn(InStr(Format$(.1, "0.0"), ","))

End Function

15-05-2002 at 03:31 PM
| Quote Reply
AndreaVB Forum : Non-English ONLY : API - Identificar no Windows, em Configurações Regionais, se a configuração é de ponto ou vírgula
Previous Topic (Para quem não conseguir usar alguns controls ActiveX da Microsoft e/ou trabalhar com bases de dados:)Next Topic (Arquivo Sequencial - Como faço para ler um arquivo sequencial com mais de 32.767 bytes) New Topic New Poll Post Reply
Surf To:


Not Logged In? Username: Password: Lost your password?
Partners: Download Actual Software | Free Software Download
borderAndreaVB free resources for Visual Basic developersborder

borderAndreaVB Visual Basic and VB.NET source code resources - Copyright © 1999-2007 Andrea Tincaniborder