Graymalkin

Foi realmente algo assim que eu pensei também. Vou fazer um teste aqui pra ver se faço mudar a cor da linha, por exemplo. Abraços, Graymalkin

O critério tem que ser uma string com os campos e os respectivos valores. Portanto, o correto seria você fazer algo assim: criterio = "DateValue(data)=DataValue('" & cboData.Text & "') AND nome='" & cboNome.Text & "'" TBImc.Open "Select * From Imc WHERE " & criterio, cnn, adOpenKeyset, adLockOptimistic, adCmdText E, você não precisará daquele Find, já que somente os registros que atenderem ao critério estarão em "TBImc". Abraços, Graymalkin

O mais correto nesse caso seria passar a caixa de texto para a função e retornar o valor de KeyAscii (note que ali você usou KeyAscii... mas de onde está vindo essa variável??? ). O código seria algo assim: public function Vírgula(byref txt as textbox, byval keyascii as integer) as integer If KeyAscii <> 8 Then texto = txt.Text cursorpos = txt.SelStart posição = InStr(1, texto, ",") If cursorpos >= posição Then If posição > 0 Then depois = Right(texto, Len(texto) - posição) If Len(depois) > 1 Then KeyAscii = 0 End If End If End If End If Vírgula = keyascii end function E para utilizar essa função você teria que colocar no evento *KEYPRESS* de *CADA UMA* das textboxes, o seguinte: keyascii = Vírgula(NOME_DA_TEXTBOX, keyascii) Onde, é claro, você trocaria "NOME_DA_TEXTBOX" pelo respectivo nome da textbox. Certo? Graymalkin

Form_Load? Você tem que colocar esse código no evento KeyPress da caixa de texto (eu disse isso no outro post). E também eu já expliquei, em termos gerais, o que esse código faz. Se você quiser tirar alguma dúvida sobre o que uma determinada coisa faz, pergunte especificando-a. Abraços, Graymalkin

Achou a propriedade SelStart? Sim, você pode colocar isso aqui no evento KeyPress: If KeyAscii <> 8 Then texto = Text1.Text cursorpos = Text1.SelStart posição = InStr(1, texto, ",") If cursorpos >= posição Then If posição > 0 Then depois = Right(texto, Len(texto) - posição) If Len(depois) > 1 Then KeyAscii = 0 End If End If End If End If Esse código aí verifica se já existem dois caracteres depois da vírgula e se o caboclo está digitando depois dela; caso positivo, ele bloqueia a tecla. Sacou? Abraços, Graymalkin

IronPython (uma implementação de Python para a .NET): http://www.gotdotnet.com/workspaces/worksp...c0-57ac5a3a9742 Boo (uma linguagem extensível, criada por um brasileiro, e com sintaxe python-like): http://boo.codehaus.org/ Python.NET (uma ponte entre a implementação CPython e a .NET Framework): http://www.zope.org/Members/Brian/PythonNet Nemerle (uma linguagem que une características dos paradigmas OO e funcional): http://nemerle.org/ MonoBASIC (compilador de BASIC [VB.NET], desenvolvido por brasileiros, para .NET/Mono): http://monobasic.sl.org.br/ H# ou Haskell.NET (compilador para a linguagem funcional Haskell - desenvolvido também por brasileiros, da UFPE): http://php.cin.ufpe.br/~haskell/haskelldotnet/ (este projeto foi abandonado?) Lua.NET (a famosa linguagem Lua agora para a .NET, e pode funcionar como uma ponte ou através da geração de bytecodes IL): http://www.lua.inf.puc-rio.br/luanet/ PerlSharp (uma ponte entre Perl e a .NET): http://taubz.for.net/code/perlsharp/ Ruby/.NET Bridge (uma ponte entre Ruby e a .NET): http://www.saltypickle.com/rubydotnet/ #SmallTalk (compilador de SmallTalk, a linguagem 100% OO): http://www.refactory.com/Software/SharpSmalltalk/ Eiffel (outra linguagem 100% OO): http://www.eiffel.com/ Phalanger (compilador/interpretador da linguagem PHP para a .NET): http://www.php-compiler.net/ IronPHP (outro compilador/interpretador PHP sendo desenvolvido para a .NET): https://sourceforge.net/projects/ironphp/ Outra sugestões são bem-vindas! Abraços, Graymalkin

Não, existe um outro chamado wxDesigner. E creio que se você der uma procurada no Google você vai encontrar outros. Mas, também não é difícil criar GUIs por código mesmo, pelo menos utilizando a wxPython. Abraços, Graymalkin

Não? Quando você fala "text" você quer dizer uma "TextBox", certo? Então, faça o seguinte: Text1.SelStart = 3 Onde "Text1" é uma TextBox, e veja o resultado. Abraços, Graymalkin

Acredito que você só tenha que mudar a linha... Set oRS = oConn.Execute(qry) ... para: Set oRS = Server.CreateObject("ADODB.Recordset") oRS.Open qry, oConn, 2, 3 Veja aí se dá certo. Abraços, Graymalkin

Dê uma olhada na propriedade SelStart. Abraços, Graymalkin

As "entradas" e "saídas" (doravante E/S) no C serão as mesmas que em qualquer outro lugar. "Entrada" (ou, do inglês, "input") é quando se *entra* com dados (seja via teclado, portas de comunicação, transferência telepática, etc.). "Saída" (ou, do inglês, "output") é quando os dados são expostos, ou seja, quando eles *saem* para um meio "visível" (seja um monitor, medidor, telas de LCD, hologramas, etc.). O mais comum quando se fala de E/S, em C, é a referência as funções scanf() e printf(), sendo que existem outras. Experimente fazer uma busca aqui no fórum por elas e você encontrará exemplos. Abraços, Graymalkin

Brother... isso não é a uma coisa que você já vai encontrar pronta (a não ser que alguém já tenha feito - creio que você já tenha consultado o Grande Guru [Google ] antes de perguntar aqui, não?). Portanto, você vai ter que programar cada uma das coisas que você quer que ocorram. Para começar, você já consegue desenhar a linha? Abraços, Graymalkin

Não entendi bem o que você quer... você quer procurar por dois campos ao mesmo tempo? Seria isso? Se for, é só associar as duas condições pelo operador AND. Abraços, Graymalkin

Acho que não entendi bem, mas... a linha do Grid tem espaço suficiente (largura) para acomodar o que você quer colocar lá? Abraços, Graymalkin

Como eu imaginei, as diferenças foram mínimas. No caso, fiz o código para calcular os 1000 primeiros números primos. Os tempos de execução (em 5 execuções sucessivas) para a versão em C++ (note que não fiz em C, mas sim em C++, porém as diferenças são poucas) foram: 864ms 872ms 864ms 866ms 861ms E, para a versão em VB foram: 1023ms 1021ms 1029ms 1026ms 1025ms Você pode baixar o código-fonte e o compilado de ambas as versões através dos links: http://www.graymalkin.globalhosts.com.br/stuff/Primos_C.zip http://www.graymalkin.globalhosts.com.br/stuff/Primos_VB.zip Certo? Abraços, Graymalkin

Por que escolher linguagens com focos de atuação tão diferentes? Sim, eu sei que C é uma linguagem de propósito geral, portanto você pode fazer de *tudo* nela. Todavia, esse não é exatamente o caso de VB (cujo foco é mais a criação de aplicações comerciais e aplicativos utilitários em geral). Talvez uma diferença de performance seja exposta com um programa que realize muitos cálculos (passível de ser feito em ambos). Eu pensei em uma coisa mais simples, como determinar os n-primeiros números primos (vou tentar fazer aqui em ambas as linguagens e ver se realmente existe uma diferença de performance). Depois eu posto os resultados. Abraços, Graymalkin

É assim mesmo. Ele vai estar na pasta: Python24\Lib\site-packages\wxPython\tools\boa Eu também acho isso estranho, e até comentei lá na PythonBrasil: http://www.pythonbrasil.com.br/moin.cgi/BoaConstructor Abraços, Graymalkin

O que é isso? O compilador GNU C++ para *nix, conhecido no mundo Win32 como MinGW32. Abraços, Graymalkin

Bom, já identifiquei os problemas, por isso vão algumas perguntas (as quais se você mesmo responder, encontrará a solução): Por que você coloca um valor em "aux" e não utiliza esse valor depois (não há referência a aux em lugar algum)? Tem certeza que atribuir um char para um inteiro te dará o valor correspondente do mesmo? Faça o teste para imprimir "aux" e você verá. Leia novamente o primeiro post a respeito do "^" (foi só uma notação utilizada no exemplo!). O resultado de "length_bin-i" é mesmo o que você precisa? Note que no cálculo os valores dos expoentes começam a partir de 0. Tente consertar aí. De preferência, escreva cada um dos elementos do cálculo (usando System.out.print) dentro da função e veja se eles estão realmente com os valores esperados. Qualquer coisa, 'stamos aí. Abraços, Graymalkin

Simplesmente mude a propriedade IsMdiContainer do seu form para True. Magicamente, ele se tornará um MDI form. Abraços, Graymalkin

Sim, aliás, você pode utilizar Python com ASP (ou seja, no lugar de VBScript ou JScript você vai utilizar Python!). Todavia, existem soluções pré-prontas, como o Zope (http://www.zope.org/) e o Plone (http://www.plone.org/), que foram criados em Python, nos quais você só configura o que deseja possuir no site (semelhante ao PHPNuke, por exemplo). Gratuito eu não conheço nenhum... Abraços, Graymalkin

Bom, basicamente seria isso aqui: SQL = "select * from tblocacao where DateValue(dtvcto) = DateValue('" & x & "')" set tabela = bdlocacao.OpenRecordset(SQL) Daí, basta você percorrer "tabela" como com qualquer outro recordset. Certo? Abraços, Graymalkin

Dê uma olhada neste post: http://scriptbrasil.com.br/forum/index.php?showtopic=45413 Abraços, Graymalkin

Bom, notei uma pá de coisas no seu código: Por que você declara "x" lá no topo se você vai passá-lo para a função? Por que você não pega o valor da textbox e passa direto para a função ao invés de utilizar uma variável pública para armazená-lo? Por que você utiliza "Set SQL" para definir uma string? E, a mais importante de todas, por que você não abriu uma tabela (assim como fez com tbLoca e tbCliente) com essa SQL? Abraços, Graymalkin

Aqui é o lugar. Sim, o char só armazena *um* caracter. Porém, de *um* em *um* caracter você pode formar uma palavra, não? Então, você tem que utilizar um vetor de chars. A maneira mais simples e prática de se fazer isso é criar um ponteiro e já definir a string. Exemplo: char *s = "teste"; printf("%s\n", s); O código acima seria o mesmo que fazer: char s[6] = {'t', 'e', 's', 't', 'e', '\0'}; Certo? Abraços, Graymalkin