kuroi

se não funcionar assim: Select Top 1 * from (Select Top 2 * from Tabela Order By codigoautomatico Desc) tenta assim: Select Top 1 * from (Select * From (Select Top 2 * from Tabela Order By codigoautomatico) Order By codigoautomatico Desc)

vixe, jogo da velha não acho que é tão simples assim não. tipo é simples se você fizer uma pessoa jogando contra a otra (fiz um desse em clipper, já faz tempo), agora se você quiser fazer o jogo contra o computador ai é foda. tem que monta toda a inteligencia artificial, etc. mas na verdade eu tava fazendo um desse em c#, so que agora está parado, quando eu volta de viagem eu continuo. agora tenho uma ideia de como fazer pro computador jogar, preve as jogadas, etc, mas acho que vai ser meio foda por isso em codigo

se eu entendi o que você quer, pegue a propriedade ActiveControl do form (Me.ActiveControl). nela você pode acessar todas as propriedades do seu objeto. tipo, pra saber se é a sua listview que tem o foco, acessa a propriedade Me.ActiveControl.Name e veja se o nome dela é o mesmo da sua listview.

essa apostila deve indicar quais os nomes dos componentes, não?? pra adicionar o maskedbox, a opcao é Microsoft MaskEd Edit Controls, se não me engano. pra conseguir ocxs extras depende do que você quer. sua apostila deve listar apenas componentes que já vem com o visual basic. se você não encontrar o componente que você quer pode ter sido algum problema na hora de instalar o visual basic. talvez você tenha tirado a opcao de copiar os componentes. ou talvez seja sua versao do visual basic.

você não pode setar valores diretamente pras colunas de uma datagrid. você teria que trazer os dados de um recordset pra preenche-lo. a solucao seria usar o msflexgrid.

a foi mal, tava foda de entender hhahaahhahaa

está, você quer - que o um formulario do seu projeto quando for aberto restaure a janela como estava antes de ser fechado enquanto ele não fechar o sistema ou - que o programa quando for aberto restaure a janela como estava antes de ser fechado ?? se for o primerio caso é so fazer exatamente como eu falei se for o segundo, também so que ai você teria que dar um jeito de guardar os dados no hd. tipo por um arquivo .ini, etc, ou ate guardar no registro do windows.

veja se ajuda: http://scriptbrasil.com.br/forum/index.php?showtopic=76744

tente fazer assim: set RS_VERBAS_INSERT = cn.Execute ('select top 1 cod_cliente from tb_verbas order by cod_cliente desc') variavel_1 = RS_VERBAS_INSERT("cod_cliente") variavel_2 = CDbl(Request.form("FORM_COD_CLIENTE")) If CDbl(variavel_1) = CDbl(variavel_2) Then Response.Write "Dados já inclusos, volte e crie outro!" Else ' executa o que tiver abaixo End If %>[/code] isso ocorre, acredito, porque os tipos das variaveis são diferentes. você convertendo pra numero (funcao CDbl) deve resolver isso. alias, estou levando em conta que seu codigo é numerico. se for string, acho que não ocorreria esse problema, mas tente trocar CDbl por CStr pra ver se funciona.

Talvez isso fosse verdade há 5 anos. Hoje em dia, eu recomendaria Python. aiaiai na faculdade eu e uns maluco discutimo isso numa lista de discussao e qsuae saiu porrada. recomendo o pascal com certeza já que o pascal tem a estrutura base pra todas as linguagens mas usadas. python já é uma linguagem bem diferente de tudo que já conhece. conhecendo primeiro pascal, o cara teria mais facilidade de se adaptar as otras linguagens. comecando por python isso seria mais dificil.

como assim?? você não sabe fazer os codigos?? bom, no module, crie as variaveis como publicas. ex: Public h as Integer, w as Integer ai quando ele mudar o tamanho do formulario (se não me angano, evento Resize), você muda as variaveis. exemplo: Private Sub Form_Resize h = Me.Heigth w = Me.Width End Sub[/code] e no load do formulario você carrega das variaveis: [code]Private Sub Form_Load If h <> 0 Then Me.Heigth = h If w <> 0 Then Me.Width = w End Sub

tive esse problema e isso funcionou: http://scriptbrasil.com.br/forum/index.php...st&p=360683

acho que seria assim: SQL = "SELECT * FROM brindes where titulo LIKE '%" & var_codigo1 & "%'"

esse problema é só nesse relatorio ou em otros também?? pelo que eu sei não precisa de nd, talvez a sua versao do crystal não tenha essa opcao.

hum... não sei se tem um jeito mais simples, mas o que você pode fazer é guardar em variaveis publicas o tamanho (Width e Heigth) e o estado da janela (WindowState - que diz se esta maximizado, minimizado, etc). ai toda vez que você abrir o formulario, você restaura o tamanho pegando pelas variaveis

você adicionou no seu projeto a biblioteca Microsoft ActiveX Data Objects 2.X?? pra isso clique no menu Project -> References.

mano ce está aqui pra fazer o seu programa ou pra xingar os otros?? bom e panaka seria quem tiver achado a resposta do graymalkin inutil. e se, por um acaso, você esta interessado mesmo em saber, é so usar um if (como disse o graymalkin) que o seu problema se resolve. If Text4.Text <> "" Then 'Vazio - Mostra - End If[/code]

acho que num da não, mas isso que é legal no gmail (larga de frescura... zuera ahhaah)

simplesmente porque uma forumla não pode pegar o valor dela mesma. pra fazer uma soma você tem que fazer via summary field. tente fazer sua formula assim: If {CONTALAN.TIPO} = 'CRED' Then //SE FOR CREDITO SOMAR formula = {CONTALAN.VALOR} Else //Se for DEBITO SUBTRAIR formula = {CONTALAN.VALOR} * -1 End If[/code] então, faca a soma desse campo (Summary Field)

pra isso, utilize a instrucao LIKE na query. meu num to conseguindo lembra a sintaxe dela to mal mesmo. acho que seria tipo assim: bom se num for isso faca uma busca no forum que devem te varios exemplos. ai no seu programa, você pode fazer um replace de * por % do seu textbox e colocar na query. e como você usa o visual basic 2005 (.NET), poste no forum .NET, beleza??

isso tem algo a ver com Visual Basic??

as versoes do visual basic são iguais nos dois pcs?? talvez esteja faltando alguma dll. tente reisntalar o visual no pc que da pau. mas qual a mensagem do erro do str()?? no problema das variaveis, veja se no seu programa em algum local aparece escrita a instrucao Option Explicit. se tiver, apague, porque é ela que obriga você a ter que declarar todas as variaveis que forem usadas.

nesse caso, você não pode criar o campo como autonumeracao, crie como inteiro ou duplo e você tera que fazer a numeracao pra cada data via programacao. mas o seu formulario esta no visual basic ou no access??

con é um recordset?? se for, acho que na verdade, você teria que fazer assim: Private Sub Form_Load() Set con = Conexao.Execute(" Select COUNT(*) As Campo from AGE where DATAGE = Now() ") If con!Campo < 1 Then Agenda.Show End If End Sub[/code]

não entendi direito o que você quer fazer, mas de uma olhada na funcao DateDiff().