Joaozava

Bom...valeu quem tento me ajudar, mas eu fiz assim e funcionou: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim i As Byte If KeyAscii = 13 Then If Text1 <> "" Then For i = 1 To GrdLista.Rows - 1 If UCase(Text1) = UCase(GrdLista.TextMatrix(i, 2)) Then GrdLista.Row = GrdLista.TopRow GrdLista.Col = 0 GrdLista.ColSel = GrdLista.Cols - 1 End If Next End If End If End Sub Se alguém souber outro jeito posta ai!!...

Gostaria de saber como fazer para que depois que o usuario fazer uma consulta em um textbox a linha do flexgrid que contem esse registro fique selecionada. o tio macoratti deu um exemplo assim, so que é com datagrid. Eu queria saber fazer isso com flexgrid! http://www.macoratti.net/d050102.htm Obrigado!

Não eu não tava querendo uma partição 98/xp... é que não tava dando certo instalar o xp, dai eu tentei o 98... como deu tanto pau eu voltei no xp... antes de intalar o 98 eu formatei com fat.... minha rede é discada sim.. sobre trocar o cd chegei a trocar so que invés de instalar o xp eu tentei o 2000...deu o mesmo erro valeu pela ajuda..

Para instalar o win xp eu fiz um boot pelo proprio cd (não tinha nada no hd, ele era novo), quando eu mandava formatar a partição eu escolhia ntfs, mas no meio da formatação aparecia uma tela de erro dizendo que algum hardware ou sofware estava mal instalado e pedia atualização do win.... mas estava tudo certo... depois eu consegui instalar o win xp...so que a unica coisa que eu fiz diferente foi trocar formaçaõ ntfs por ntfs rapida.... dai instalou tudo certo... eu tentei instalar o win 98....mas deu tanto pau no meio da instalação e tb depois que instalou que eu desisti e formatei de novo... o que pode ser isso???...sera alguma falha em algum hardware?? é que o pc é novo.... obs: a unica coisa que não to conseguindo fazer funcionar é o modem....ele ta configurado certinho e o win diz que ele esta funcionando certo, mas não conecta valu pela ajuda!!

Faça assim: If Val(Txt1) < Val(Txt2) Then MsgBox "Valor negativo!" Else Total = Txt1 - Txt2 MsgBox Total End If

SQL = "Select * From NomeTabela" Set TBLivro = db.OpenRecordset (SQL) Se você não fizer isso não vai ter nada no Recordset, que no caso é o TBLivro, não tendo nada ele não vai poder achar nada pra você se você fizer a consulta assim: TBLivro.FindFirst "NMLivro >= '" & "Faroeste" & "'" Fazendo a consulta SQL mostrada assima já vai dar certo... Entendeu??

O RecorSet esta cheio??.....quero diser, você fez um select * From NomeTabela e depois setou o RecorSet TBLivro??

hehehe.... tb gostaria de saber!! é uma otima ideia...espero que seja possivel!

No vb use um frame tb... Ao invés de abrir um novo form deixe um frame invisivel ao clicar no botão o frame fica visivel na posição deseja (eu uso muito isso)..... dentro do frame coloque os controles que deseja, com se fosse um novo form mesmo.

Em ADO 'Consulta Aproximada rst1.Find "Campo_Tabela Like '*" & criterio & "*'", , , 1 'Consulta Exata rst1.Find "Campo_Tabela= '" & criterio & "'", , , 1 DAO 'Consulta Aproximada rst1.FindFirst "Campo_Tabela >= '" & Criterio & "'" 'Consulta Exata rst1.FindFirst "Campo_Tabela = '" & Criterio & "'"

Da uma pesquisa na seção de códigos do SB, acredito que va ter algum exemplo!

Para abrir o form use assim: Private Sub s_Click() Load about about.Show Unload Me End Sub

??? ???

Eu concordo com o bicicleta!

alguém??

use uma instrução sql assim: Sql = "Select * from Tabela where Data Between #" & Format(Mask_DataIni.Text, "mm/dd/yyyy") _ & "# And #" & Format(Mask_DataFin.Text, "mm/dd/yyyy") & "#" onde os campos Mask_DataIni.Text e Mask_DataFin.Text são os campos da data inicial e data final. Até!

faça assim: Private Sub Text1_KeyPress(KeyAscii As Integer) If Len(Text1) = 6 Then Text2.SetFocus End If End Sub Até!

alguém sabe como colocar um campo check em um data grid?? e quando o campo sor do tipo data, ao usuário digitar a data já aparecer as barras, com se fosse um maskedit... até!

So pra lembrar.....tutorial do macoratti não vale...hehehe... O que explica la eu já sei!! Queria algo que explicasse como alterar os dados da tabela exibidos do Data Repeater!

Deve ser alguma variável que você não declarou ou algum objeto que não existe.

alguém sabe de um bom tutorial em portugues ou algum exemplo de como usar o Data Repeater pra me passar?? Valeu!

Eu consegui esse, se alguém precisar: http://www.macoratti.net/ajuda.htm (ainda não li mas deve ser bom) O site do tio Macoratti é bem completo mesmo! hehe

Da uma olhada neste tuto http://www.macoratti.net/deploy.htm falow!

Usa o Package & Deployment Wizard. menu iniciar = > programas = > Microsoft Visual Studio 6.0 => Microsoft Visual Studio 6.0 tools => Package & Deployment Wizard Até!

alguém conhece algum tuto que ensina a usar o Html Help Workshop? Valeu!