Visual Basic

No Visual Basic, é possível alternar rapidamente o valor de uma variável booleana entre True e False utilizando o operador Not. Exemplo Prático Se a variável for False, ela se tornará True, e vice-versa. Aplicação em Botões de Alternância Esse método é útil em diversas situações, como ativação e desativação de recursos em um botão:…

CommitTrans, BeginTrans, RollBack no Visual Basic Imagine que você tenha um processamento de diversas operações em um banco de dados e somente após a realização destes processos as alterações sejam realizadas de fato no Banco de dados. Utilizando BeginTrans, CommitTrans e RollBack você pode executar estes processos sem problemas permitindo que o processamento das alterações…

Operações via SQL no Visual Basic A princípio deve-se declarar a variáveis de database e dynaset: Global DBanco as database Global DyRec as dynaset Abrindo o Banco de Dados: Set DBanco = Opendatabase (app.path & “\banco.mdb”) ‘onde banco é o banco de dados Selecionando registros: Set DyRec = DBanco.Createdynaset(“select * from func”) ‘onde func é…

Use a propriedade TaskVisible do objeto App. No evento Load do form principal ou na procedure Main do módulo principal, coloque o seguinte código: App.TaskVisible = False Em adição para evitar que o título de uma janela não apareça na barra de tarefas, configure a propriedade ShowInTaskBar do form para False.

Colocar duas linhas em um botão   Para colocar 2 linhas em um botão em Visual Basic, utilizamos o seguinte comando na propriedade Caption: Command1.Caption = “Primeira Linha” & vbCrLf & “Segunda Linha”  

O Objeto Clipboard é uma referência à Área de transferência, vejamos como utiliza-lo: Clipboard.gettext Este comando retorna o conteúdo da área de transferência. Clipboard.clear Limpa conteúdo da área de transferência. Clipboard.settext “Teste” Settext adiciona um novo texto p/ a área de transferência, no entanto p/ funcionar á necessário limpá-la primeiro usando o clear.

Parâmetros Múltiplos para consultas em SQL Esta função gera um parâmetro para usar com a instrução LIKE do SQL, permitindo que o usuário possa escrever palavras compostas como critério de busca. Function Cria_Parametro_Multiplo(cParam) Screen.MousePointer = vbHourglass Dim cNew As String cParam = Chr(42) & cParam & Chr(42) For A = 1 To Len(cParam) If Mid$(cParam,…

Nesta matéria do WebMundi.com, você aprenderá como importar um arquivo texto para uma tabela do Access utilizando a linguagem de programação Visual Basic.

Em algumas aplicações, pode ser útil criar uma janela sem barra de título, especialmente para telas de login, splash screens ou interfaces personalizadas. No Visual Basic, isso pode ser feito ajustando algumas propriedades do formulário. Configuração do Formulário Para ocultar a barra de título, configure as seguintes propriedades do Form no Visual Basic: Explicação das…

Ativando o Caps lock via código 1a. Parte: Insira o seguinte código nas declarações gerais de um módulo .BAS Public Const VK_CAPITAL = &H14 Public Type KeyboardBytes kbByte(0 To 255) As Byte End Type Public kbArray As KeyboardBytes Public Declare Function GetKeyState Lib “user32” (ByVal nVirtKey As Long) As Long Public Declare Function GetKeyboardState Lib…

Verificar a existência de placa de som Private Declare Function waveOutGetNumDevs Lib “winmm.dll” () As Long Dim res As Integer res = waveOutGetNumDevs() If res > 0 Then msgbox “Existe Placa de Som” Else msgbox “Não Existe Placa de Som” End If