Ir para conteúdo
Fórum Script Brasil

kuroi

Membros
  • Total de itens

    7.184
  • Registro em

  • Última visita

Tudo que kuroi postou

  1. Explica melhor o q c quis dizer com imprimir um form. Pra imprimir pelo VB c pode usar o Printer e o comando Print. Procura q c deve achar alguma coisa sobre isso no forum. So q pra fazer uma impressao mais bem feita, acho q o VB sozinho não faz. C vai ter usar um programa proprio pra isso. Costumo usar o Crystal Reports.
  2. kuroi

    Tecnologia Hyperthreading

    Valeu cara. Vê se eu entendi direito, a tecnologia HT simula dois processadores... Isso não faria com q o desempenho ficasse 2x melhor? Mesmo assim, não bate o Atlhon 64?
  3. O q é isso? Processadores AMD utilizam essa tecnologia?
  4. kuroi

    Atlhon 64

    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?
  5. kuroi

    Atlhon 64

    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.
  6. kuroi

    Atlhon 64

    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.
  7. kuroi

    Maskedbox

    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.
  8. 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?
  9. kuroi

    Maskedbox

    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
  10. Tenta assim: Set cboCurso.DataSource = dataartigo.Recordset cboCurso.DataField = "Area_Curso"
  11. kuroi

    Mousemove

    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.
  12. em vez de Combo1_Click ponha quantidade_Click. Não tinha visto q seu combo chamava quantidade...
  13. kuroi

    Instrução Sql

    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...
  14. 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
  15. Tente por como Memorando em vez de Texto. E postar no fórum de Access.
  16. kuroi

    Bips Da Cpu

    Acho q é pau no primeiro bloco da memoria RAM e c vai ter q substituir o pente do soquete 0.
  17. 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).
  18. Valeu, não to precisando por enquanto, mas é bom saber.
  19. kuroi

    Tecla Enter

    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
  20. 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
  21. kuroi

    Erro

    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...
  22. kuroi

    Datagrid Colunas

    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.
  23. 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"
  24. 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")),"/",""))
×
×
  • Criar Novo...