Parâmetros Múltiplos para consultas em SQL

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,

Continuar lendo »

Ativando o Caps lock via código

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

Continuar lendo »
Pages:«1...56789101112»