kuroi

Valeu, cara, c ta ajudando muito. Como eu faco esse downclock? Se meu processador rodar a 400 e eu puser uma memo de 333, não vai ter problema nenhum? Como eu vou tar comprando peca por peca do pc, não tenho como gastar quase 2 conto num processador FX-55, por exemplo. Tava pensando em comprar um socket 939 ou 754. Você disse q esses processadores vão tar ultrapassados em breve. Será q tem como eu comprar um desses e, mais pra frente, trocar por um processador FX-55 sem trocar de placa mãe?

Valeu, era isso q eu precisava saber... Sim, mas se eu quiser por uma memório de 400, preciso de um chipset q suporte essa velocidade.

Pretendo montar um computador pra mim e ouvi falar muito nesse athlon 64 e fiquei com vontade de por um no meu pc. Mas queria saber qual a maior diferença dele pra outros processadores. - Quais são as vantagens? Melhor desempenho e velocidade? - E desvantagens? É mais caro q os outros? Quanto custa um mais ou menos? - Posso ter problema com compatibilidade? Tipo, a maioria das placas mãe são compatíveis, ou terei problema em encontrar uma q suporte? - Terei algum problema de incompatibilidade de software? - Pretendo por uma memoria de 400 Mhz com um chipset de 400 Mhz. Terei problemas pra encontrar um processador Athlon 64 com FSB de 400? - Qual a velocidade de um processador Athlon 64? É isso aí, Valeu.

Se você tava pondo o setfocus no formload, não vai conseguir. O form ta carregando, ou seja não esta aberto, e você não vai poder por o foco em um controle. O negocio é por 0 na propriedade TabIndex da MaskedBox. Assim o foco vai começar lá quando o form carregar.

Cara, explica o q ta dando errado... Faça o seguinte. Verifique os nomes dos seus objetos: 1 - Seu combo chama quantidade? 2 - As caixas de texto se chamam nomefilho1 e nomefilho2? OK. Então use o seguinte codigo: Private Sub quantidade_Click() If quantidade.ListIndex = 0 Then nomefilho1.Visible = False nomefilho2.Visible = False ElseIf quantidade.ListIndex = 1 Then nomefilho1.Visible = True nomefilho2.Visible = False ElseIf quantidade.ListIndex = 2 Then nomefilho1.Visible = True nomefilho2.Visible = True End If End Sub Adapte o código de acordo com como você quer. Vi q voce esta usando 3 textbox. Qual o proposito do terceiro, se o cara pode por no máximo apenas 2 filhos?

Cara, nunca tive problema pra usar o setfocus em maskedbox. Tem certeza q ela ta habilitada? E pra passar pro outro form, qual é a dificuldade q voce esta tendo? Faca: frmForm.mkbMaskedBox.Text=varVariavel E se a variavel tiver sem a mascara faça: frmForm.mkbMaskedBox.PromptInclude=False frmForm.mkbMaskedBox.Text=varVariavel frmForm.mkbMaskedBox.PromptInclude=True

Tenta assim: Set cboCurso.DataSource = dataartigo.Recordset cboCurso.DataField = "Area_Curso"

Olha cara, talvez tenha um jeito melhor, mas um modo como você pode fazer, é voltar pra imagem original no mousemove da outra figura. Por exemplo c tem duas imagens. No mousemove do form, c passa a imagem original pras duas. No mousemove da primeira, você muda a imagem dela e poe a original na segunda. No mousemove da segunda, você muda a imagem dela e poe a original na primeira.

em vez de Combo1_Click ponha quantidade_Click. Não tinha visto q seu combo chamava quantidade...

Cara, eu não recomendo q voce deixe nenhum campo Null no banco. você pode deixar vazio (Empty), mas não Null... você não vai conseguir pegar o ano de uma data Nula e eu não como faz pra selecionar um campo Null Se tivesse como Empty, você ia poder tentar fazer assim: sql = "select * FROM Tabela where (Year(DATA_EMISSAO) > " & FrmExc.TxtAno.Text & " Or DATA_EMISSAO = '" Conversion.CDate(Empty) "') AND COD_CLI LIKE '" & TabBuscar!COD_CLI & "'" Mas se tiver como Null, não sei se tem jeito...

você ta fazendo certo, só q no evento errado. Se você puser no Nomefilho1_Change ele só vai esconder as caixas de texto, quando você alterar o esse campo. Ponha esses códigos no evento onclick do ComboBox. Tipo assim: Private Sub Combo1_OnClick '<- Esse evento If quantidade.ListIndex = 2 Then nomefilho1.Visible = False nomefilho2.Visible = True nomefilho3.Visible = True End If End Sub

Tente por como Memorando em vez de Texto. E postar no fórum de Access.

Acho q é pau no primeiro bloco da memoria RAM e c vai ter q substituir o pente do soquete 0.

Crie os dois TextBox e deixem com Visible=False. No evento OnClick do combo, verifique a propriedade ListIndex. Se for 0, esconda os dois textbox, se for 1, mostre apenas 1 e se for 2, mostre os dois, usando a propriedade Visible (True/False).

Valeu, não to precisando por enquanto, mas é bom saber.

Costumo usar o evento KeyDown em vez do KeyPress: Private Sub txtCodProd_KeyDown(KeyCode As Integer, Shift As Integer) Dim criterio, codigo As String If KeyCode = 13 Then Exit Sub 'Se não for enter, ele sai fora codigo = txtcodprod.Text If codigo = Empty Then Exit Sub criterio = "codigodoproduto ='" & codigo & "'" rs3.MoveFirst rs3.Find criterio, 0, adSearchForward

Não sei exatamente o q tem nessa sua procedure apresentar_imobiliaria, mas acho q você deveria dar o movenext antes de chamá-la. rs_imobiliaria.MoveNext Call apresentar_imobiliaria E pra ir pro registro anterior, o certo é moveprevious e não last. MoveFirst - move pro 1º registro MovePrevious - move pro registro anterior MoveNext - move pro próximo registro MoveLast - move pro último registro

Isso não interfere em nada... Se você consegue acessar e ele não, deve ser problema do pc dele... Talvez a configuração do browser...

Pra centralizar, c faz: Grade.Columns(Número da Coluna).Alignment = dbgCenter Pra por em negrito eu já não sei. Tb queria saber... Se alguém souber, fala ae... A propriedade Font atinge o grid todo... Pra pegar o total, você podia fazer outro select para outro recordset pondo um sum no campo q quer somar. Se você quer pegar direto do grid, pode fazer um while q va do primeiro ao ultimo registro do recordset e ir somando numa variavel.

Form.Caption=""

Em q linha exatamente, da esse erro? As variaveis tão criadas direitinho? Talvez você deva usar dataartigo.Recordset!Area_Curso ou Set dataartigo.Recordset = App.Path & "W:\Base SISC\base_helpdesk.mdb"

Não precisa converter. você pode comparar datas. Tipo: If Data1 < Data2 Then MsgBox "Data1 é menor." Se quiser converter pra inteiro, tire as barras e converta. Assim: intVar = Conversion.CInt(Replace(Conversion.CStr(Format(Data1,"DD/MM/YYYY")),"/",""))

Entendi.Valeu

Olha, dependendo do q c quer, isso não é muito recomendavel. Tipo, se c quer passar todos os registros pra uma array, e o banco for muito grande o array pode não aguentar. Mas o esquema é criar um array sem definição de indices e depois redimensionar de acordo com a quantidade de registros. E depois faça um loop até chegar no fim do seu RecordSet. Exemplo: Dim array() as String 'Cria um vetor de definições de indice Dim Cont as Integer Redim array(RecordSet.RecordCount-1) Cont=0 Do While Not RecordSet.EOF array(Cont) = RecordSet!Nome RecordSet.MoveNext Cont=Cont+1 Loop Usando o comando ReDim, você redimensiona o seu vetor, a razão do -1 é q o indice comeca a ser contado do 0. Se o seu recordset tiver 5 registros, você vai querer q seu array tb tenha 5 indices, de 0 a 4.

Valeu graymalkin. Agora ficou mais claro. So uma coisa... No seu exemplo: Essa variavel "fruta" é de q tipo? Declaro como variant tb?