Imprimir como no DOS

Imprimir como no DOS Para imprimir utilizando impressoras matriciais, a melhor forma é como no antigo DOS, utilizando os próprios caracteres da impressora, pois a impressão através Gerenciador do Windows é muito lenta. Para isso, deve-se abrir a porta da impressora como se fosse um arquivo texto. Exemplo: Open “LPT1:” for output as #1 for

Continuar lendo »

Como Abrir base de dados com Senha ?

Este exemplo utiliza o objeto Dao Jet. Para outros objetos consulte o Help do VB. Para abrir o banco é necessário passar a senha no parâmetro Connect. No exemplo abaixo, a senha é “web”. Dim wrk As Workspace Dim db As Database Set wrk = DBEngine.Workspace(0) Set db = wrk.OpenDatabase(“MYDB.MDB”, false, false, “;PWD=web”) O parâmetro

Continuar lendo »

Bookmark

A utilização de Bookmarks permitem ao desenvolvedor “memorizar” um determinado registro da tabela para que possa retornar mais tarde ao mesmo registro memorizado, Este recurso é muito simples e fácil de utilizar.. Para marcar um determinado local em uma tabela , utilize a seguinte instrução: No (General) (Declarations) do Form, crias uma variavel tipo string

Continuar lendo »

Ativando o Num Lock via código

Ativando o Num Lock via código 1a. Parte: Insira o seguinte código nas declrações gerais de um módulo .BAS Public Const VK_NUMLOCK = &H90 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:«12345678...37»