Ir para conteúdo
Faça parte da equipe! (2024) ×
Conheça nossa Beta Zone! Novas áreas a caminho! ×

  • Quem está por aqui   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.

Vários tutoriais Visual Basic

ℛiqu∊

Por ,
em Visual Basic

 Compartilhar

Posts Recomendados

ℛiqu∊ Novato

ℛiqu∊ 13

Postado
Postado

Indice:

 

 

  • Função para escrever por extenso os valores em Real (em VBA - suporta até R$ 9.999.999.999,99)
  • Veja como montar uma string de conexão com dados oriundos de um arquivo INI
  • Fazendo o Access falar
  • Trabalhando com .SWF
  • Validar data em Visual Basic
  • List Servers usando WMI provider
  • Listando usuáarios em um grupo em um domínio ou membro de servidor local
  • Mudando uma senha usando ADSI
  • Adicionando um usuário a um computador remoto e colocando ele em um grupo
  • Criando usuários, ajustando senha e propriedades de usuários usando ADSI
  • Escrever um número por extenso
  • Impressão no Crystal de registros entre período de datas
  • Conexão de multiplos clientes em um único servidor (Winsock)
  • Função que abre um arquivo texto e retorna seu conteúdo
  • Copiando Textos de Documentos do Word
  • Pegando o nome do computador
  • Busca de Strings em um TextBox (usando CTRL+F e F3)
  • Acesso à área de Transferência

Função para escrever por extenso os valores em Real (em VBA - suporta até R$ 9.999.999.999,99)

É necessário se cadastrar para acessar o conteúdo.

Veja como montar uma string de conexão com dados oriundos de um arquivo INI

[/center]

 

Arquivo Conexao.INI com as seguintes informações: [OLEDB]

SQLSERVER

[sERVIDOR]

NOME_SERVIDOR

[bANCO]

NOME_BANCO

Função para ler o arquivo INI e montar a string de conexão.

É necessário se cadastrar para acessar o conteúdo.

Fazendo o Access falar

 

Este é um recurso que pode ser muito util para a auto-ajuda em um determinado aplicativo, desenvolvido tanto em Access como em VB. O primeiro passo é ter estes dois componentes instalados na máquina que vai rodar a aplicação: L&HTTS 3000 Português (Brasil) e MS Speech API 4.0. Ambos poderão ser feitos os downloads no site da microsoft.

Uma vez estes dois dois componentes intalados o próximo passo é fazer o seu aplicativo falar literalmente.

 

 

 

Abra um ou crie um formulário

Insira o activeX TexToSpeech, encontrado na lista "Controle AtictiveX"

Na opção carregar formulário ou no código de um botão, digite a seguinte linha de comando.

TextTospeech0.speack "Seja bem vindo ao aplicativo"

 

 

Pronto. Quando o formulário for aberto ou o referido botão for pressionado, o usuário escutará a fraze que está entre " ".

Vale lembrar que TextTospeech0 é o nome do controle ActiveX quando inserido no formulário e você poderá altera-lo, desque que faça referência a esse novo nome no seu codigo.

Outro aplicativo que poder ser util é o MS Speech Control Panel que também pode ser feito o download no site da Microsft. Este aplicativo permite você configurar o tipo de voz, velocidade e tonalidade de voz que o aplicativo vai utilizar. Quanto instalado, você poderá acessa-lo através do Painel de Controle do Windows.

Os componentes acima mencionados neste artigo, referem-se ao MS Agente. O download dos arquivos de vozes e painel de controle poderá ser feito no seguinte link:

É necessário se cadastrar para acessar o conteúdo.
inclusive podendo ser baixados em vários idiomas.

Espero que este código seja util.

 

Trabalhando com .SWF

 

Para muitos usuários que precisem ou gostem de trabalhar com terminadas animações em seu banco de dados, uma das melhores opção em substituição aos arquivos .GIF ou .MPG, etc. é trabalhar com um arquivo .SWF. Isso mesmo um arquivo flash. Trabalhar com este tipo de arquivo no access bem como no vb é muito facil.

O primeiro passo é incluir no seu formulário o Shockwave Flash Object. Um activeX que permite rodar os arquivos .swf em sua aplicação.

Uma vez incluindo este componente em seu formulário, o próximo passo é determinar qual arquivo o componente vai utilizar.

Você pode trabalhar de duas formas: um arquivo diretamente do seu hd ou deiretamente do seu site.

A linha de comando é simples e vou listar as duas. Você poderá utilizar a linha de comando em um botãou ou ao carregar o seu formulário. Poderá também criar condições em seu formulário que dependendo da condição, ora utilize um, ora outro, uma vez que a configuração do controle é dado via código.

 

 

É necessário se cadastrar para acessar o conteúdo.

Validar data em Visual Basic

[/center]

É necessário se cadastrar para acessar o conteúdo.

List Servers usando WMI provider

 

Script autentica um controlador de domínio e retorna um recordset com uma lista de computadores.

 

É necessário se cadastrar para acessar o conteúdo.

Listando usuáarios em um grupo em um domínio ou membro de servidor local

[/center]

É necessário se cadastrar para acessar o conteúdo.

Mudando uma senha usando ADSI

[/center]

É necessário se cadastrar para acessar o conteúdo.

Adicionando um usuário a um computador remoto e colocando ele em um grupo

[/center]

É necessário se cadastrar para acessar o conteúdo.

Criando usuários, ajustando senha e propriedades de usuários usando ADSI

[/center]

É necessário se cadastrar para acessar o conteúdo.

Escrever um número por extenso

[/center]

É necessário se cadastrar para acessar o conteúdo.

Impressão no Crystal de registros entre período de datas

[/center]

É necessário se cadastrar para acessar o conteúdo.

Conexão de multiplos clientes em um único servidor (Winsock)

[/center]

Para conectar diversos clientes em um único servidor é necessário: SERVIDOR

No aplicativo de servidor cria a seguinte rotina:

 

É necessário se cadastrar para acessar o conteúdo.

Esta rotina fará com que toda vez que for solicitada uma nova conexão ele incrementa o contador CNNSVR e pede para carregar um novo controle WINSOCK para receber esta solicitação.

CLIENTE

No Aplicativo de cliente as funções serão as mesmas.

 

 

É necessário se cadastrar para acessar o conteúdo.

Função que abre um arquivo texto e retorna seu conteúdo

[/center]

É necessário se cadastrar para acessar o conteúdo.

Copiando Textos de Documentos do Word

[/center]

 

No evento desejado:

 

É necessário se cadastrar para acessar o conteúdo.

Abre o documento

É necessário se cadastrar para acessar o conteúdo.

Seleciona o documento inteiro

É necessário se cadastrar para acessar o conteúdo.

Joga o conteúdo da seleção numa caixa de Texto.

É necessário se cadastrar para acessar o conteúdo.

Pesquise o VBA, pois utilizando-o é possível selecionar palavras,

parágrafos, tabelas, etc. Ou seja, qualquer parte do documento.

 

Pegando o nome do computador

 

No módulo coloque:

 

É necessário se cadastrar para acessar o conteúdo.

A função

GetComputerName requer dois argumentos. O primeiro argumento, sBuffer, é

o buffer que irá armazenar o nome do computador depois que a função é

executada. O tamanho do buffer deve ser grande o suficiente para que o

nome inteiro caiba nele. O segundo argumento, lSize, deve ser

inicializado com o tamanho de sBuffer.

 

Depois de ter executado a função GetComputerName, a variável lSize

conterá o número de caracteres (contador) armazenados na string sBuffer.

Este valor de contagem não inclui o caractere terminador NULL.

 

Para verificar coloque no Form, um componente TextBox e outro

CommandButton e o seguinte código:

 

 

É necessário se cadastrar para acessar o conteúdo.

Busca de Strings em um TextBox (usando CTRL+F e F3)

[/center]

No Form, coloque:

 

É necessário se cadastrar para acessar o conteúdo.

Acesso à área de Transferência

[/center]

 

O Objeto Clipboard é uma referência à Área de transferência, vejam:

É necessário se cadastrar para acessar o conteúdo.

Retorna o conteúdo da área de transferência:

É necessário se cadastrar para acessar o conteúdo.

Settext adiciona um novo texto p/ a área de transferência, no entanto p/ funcionar á necessário limpá-la primeiro usando o clear.

 

 

 

Créditos:

ℛiqu∊

Myck

Linha de Código

 

OBS:Este tópico será sempre atualizado , para que vocês , entendam mais de Visual Basic
ﾠﾠMural de Coleçõesﾠﾠ

Clique aqui e adquira suas medalhas
Link para o comentário
Compartilhar em outros sites
Este tópico está impedido de receber novos posts.
 Compartilhar
Ir para a lista de tópicos
×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.

 Accept Cookies  Reject Cookies