Carolina Lopes

Estou precisando de ajuda para escrever um código VBA pra access. A função teria que buscar valores no campo da 'Situação' da Tabela e se for "1" ele deixa os registros na cor de fonte preta, senão deixa os registros na cor de fonte vermelha. Fiz da seguinte forma mas não tenho conteúdo da linguagem suficiente para montar. Poderiam me ajudar? Function Situacao(Sit) As Boolean Dim lngBlack As Long Dim lngRed As Long lngBlack = RGB(0, 0, 0) lngRed = RGB(255, 0, 0) Dim db As Database Dim Rs As Recordset Set db = CurrentDb() Set Rs = db.OpenRecordset("Tabela", dbOpenDynaset) Rs.Find " txtSituacao.Text = '1' " If Rs.NoMatch Then txtCodigo.ForeColor = lngRed txtCliente.ForeColor = lngRed Else txtCodigo.ForeColor = lngBlack txtCliente.ForeColor = lngBlack End If Rs.Close End Function

Sou iniciante em C e tenho que escrever o seguinte programa. Alguém poderia me ajudar? 1. Escrever um programa que abre um arquivo para leitura, em modo texto, cujo nome deverá ser fornecido pela linha de comando. O programa deverá ler caracter por caracter até o fim do arquivo, e no fim totalizar: - Caracteres alfabéticos maiúsculos (65 a 90) - Caracteres alfabéticos minúsculos (97 a 122) - Caracteres numéricos (48 a 57) - Caracteres de pontuação: imprimíveis não alfabéticos e não numéricos. Obs.: caracteres imprimíveis: 32 a 126 Outro programa que abre um arquivo em modo binário, nome fornecido pela linha de comando. O programa deve ler o arquivo byte por byte, e a cada byte lido deverá: - Ligar o bit 0 - Desligar os bits 6 e 7 - Inverter os bits 2 e 5.

Tenho um Banco de Dados no Access e precisaria que toda vez que abrisse o arquivo .accdb, em uma pasta já pré-definida, fizesse um novo backup e criasse um novo arquivo em excel com a tabela do access automaticamente. Alguém teria um script ou uma macro que fizesse algo assim?

Por exemplo... O nº 12 em binário (ou C em hexa) --> 1100 Fazendo o complemento de dois, o número tem que ser invertido. O que é 1 vira 0 e o que é 0 vira 1. Depois soma 1. O resultado é o complemento. --> 1100 0011 (inverte) --> 0011 + 1 0100 (complemento)

Sou iniciante e preciso escrever um programa em Pascal que faça o complemento de dois de números em binários. Alguém me ajudaria? Obrigada