Ir para conteúdo
Fórum Script Brasil

raphael_suporte

Moderadores
  • Total de itens

    1.378
  • Registro em

  • Última visita

Tudo que raphael_suporte postou

  1. Quando você tenta compilar o javac exibe as linhas que estão com erros, com isso você pode ir acertando seu código. segue seu código corrigido: import java.io.*; public class fazedorDEfrases { public static void main (String[] args) { String [] wordListOne = { "Sua vida" , " varias camadas " ," O verdadeiro Valor ", " Se importe com"," Esses Valores, ", " O verdadeiro sentimento ", " O destino ", " Seu", " Melhore, ", "Tanto faz se voce" ,"Voce deve ", " Seu destino "}; String [] wordListTwo = { " Em minhas maos", " Aprofundando em seu coracao! ", " não esta", " Quem se importa"," não irao resolver", " Que voce deveria sentir", " Escolhera" ," Poder", " Sua perspectiva não poderia ser "," Morrer ou Viver"," Interpretar" , " Acabara te levando "}; String [] wordListThree = { " não vale nada ", " Nunca tera fim", "Em voce!", "Com voce ", " Sua vida se encontra ", "Vai te destruir!"," A resposta ", "não existe"," Pior","não faz diferenca!","Seu fim!" ,"Para sua destruicao!"}; int oneLenght = wordListOne.length; int twoLenght = wordListTwo.length; int threeLenght = wordListThree.length; int rand1 = (int)(Math.random () * oneLenght); int rand2 = (int)(Math.random () * twoLenght); int rand3 = (int)(Math.random () * threeLenght); String phrase = wordListOne[rand1] + " " + wordListTwo[rand2] + " " + wordListThree[rand3]; System.out.println (phrase); } } exemplo de uma das mensagens de erro exibidas ao tentar compilar: fazedorDEfrases.java:9: cannot resolve symbol symbol : variable lenght location: class java.lang.String[] int oneLenght = wordListOne.lenght; no caso, o erro era com a palavra lenght que o certo é length
  2. ainda não consegui ter o resultado esperado, mas talvez você consiga usando o union ou um loop. to tentando, qualquer novidade posto aqui
  3. foi mais fácil do que eu pensei.. basta remover a linha que seleciona o Range ActiveCell.Offset(0, ActiveCell).Range("a1").Select deixando o código assim: Sub Colorir() ' ' Colorir Macro ' Macro gravada em 19/12/2010 por Henrique ' ' Atalho do teclado: Ctrl+d ' With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid End With End Sub
  4. Pelo que eu entendi, o valor do "Range" não pode ser full, porem sua Macro terá que pintar esse valor selecionado. Vou tentar executar um teste aqui e coloco se eu conseguir
  5. para facilitar, você poderia quebrar suas rotinas... 1 loop para pegar os numero, depois um loop que irá ler esses números comparando os valores e adicionando à um vetor especifico ( um vetor para pares e outros para ímpar) depois preenchera o vetor padrão com os 2 vetores na ordem que quiser. Assim você ainda pode organizar de forma crescente...
  6. você só está selecionando uma célula... tente usar "Range(A1:B15).select" por exemplo
  7. Danleon, você adicionou as referencias ou componentes necessários? pode ter apenas se perdido, e qual o SO você está usando, parece ser o Vista ou 7, nunca coloquei o VB nesses sistemas, pode haver um conflito de bibliotecas.
  8. qual erro você está encontrando? o que era para o programa fazer que não esteja fazendo?
  9. da onde vem essas informações se vier de uma tabela, no evento onClick do primeiro combo(ESTADO) ele executa uma query e preenche o combo 2 (Cidade)
  10. Estava me referindo ao campo "data" da tabela, você informou que sua tabela tem os campos "Codigo" "login" "nome" "entrada" e "saida", na minha lógica se cada pessoa tem um login( único e exclusivo) não existe a possibilidade de ele ter duas entradas no mesmo dia, a não ser que, conte as saídas de almoço, por exemplo, mas não teria como ter "dia e Hora" com o mesmo valor, por isso não deveria duplicar, se está duplicando é porque não está sendo feito o filtro pelo login. reparando melhor seu código vi um erro. Do While rsdados.EOF = False If rsdados("Login") = cmbLogin.Text Then cmbData.AddItem rsdados("Data") rsdados.MoveNext Loop ' você está fechando o Loop sem fechar o if End If ele pode (e deve) esta se perdendo ai. 'Tente o código desta maneira Do While rsdados.EOF = False If rsdados("Login") = cmbLogin.Text Then cmbData.AddItem rsdados("Data") End If rsdados.MoveNext Loop
  11. o que você tem em mente para o seu futuro... área comercial, venda correr atrás de parcerias. ou uma área mais gerencial, planejamento etc. esse deve ser o seu pensamento, onde você vai querer atuar por um tempo. Não adianta está em uma empresa mais conceituada se você não está produzindo o que pode e o que gosta. Pense na tarefa que irá ser feito e não na empresa. Minha opinião! :P
  12. entendi, não deveria ter campos iguais, ou existe um login com mais de uma pessoa usando? rsdados("Data") esse campo você não declarou
  13. mas essas datas são do mesmo login?? você pode diferenciar pelo login, porem se não é o caso queira apenas as datas mesmo, você pode controlar isso pelo banco, não deixando inserir valores repetidos. Pode também na sua consulta utilizar o Group By, com isso não teria o valor repetido. última alternativa seria que a cada valor antes de inserir ele percorresse todo o listBox e verificaria o valor que está inserindo, porem essa eu acho que seria última alternativa mesmo.
  14. a resposta está ai...se está tudo configurado na tabela e só precisa que exiba uma mensagem na tela usa um loop <?php $sql=mysql_query("SELECT campo from tabela"); $result = "" while($linha=mysql_fetch_array($sql)) { $result = $result . $linha . "\n"; } ?> echo $result agora se está com alguma dúvida pontual, ou em determinada parte do código. poste aqui essa parte
  15. teria como postar seu código aqui... pois o erro deve ser na hora de concatenar as mensagens
  16. como você está fazendo? coloque aqui seu código.. qual banco está usando... já colocou a condição "WHERE" na tabela para filtar?
  17. só que dependendo da sua tabela isso seria um pouco complicado, imagine quando o próximo numero vago for o 2.321, imagine quanto tempo seu laço vai demorar. isso se sua tabela for desse tamanho. se for um numero fixo... tipo não passará de 20 vagas. isso ajuda, caso não exista um numero fixo para o fim de suas vagas, acho mais produtivo para o sistema deixar o próximo numero da tabela.
  18. agora é só ir declarando as variáveis que você deseja alterar. ps: posso fechar o tópico?
  19. pois bem... se você quer que uma função altere o valor de uma variável fora do seu escopo, essa variável tem que ser passada como referencia( o sistema irá passar o endereço de memória onde a variável está alocada) "byRef" no VB. Com isso toda alteração feita na variável dentro da function alterará o valor dela fora também. usarei um exemplo bem simples abaixo. dim nome nome = "Raphael" AlteraNome nome msgbox(nome) function AlteraNome (byRef nome) nome = "Alterei meu nome" end function o nome que será exibido é o que está na função, neste caso "Alterei meu nome"
  20. o mais aconselhável seria colocar essa função em uma classe separada de forma global assim todos os forms teriam acesso...
  21. Você pode criar uma variável para ir controlando, porem essa variável sempre será zerada quando você sair do programa. ou, você também pode criar um laço e verificar o último registro que tenha algo escrito nessa coluna e adicionar 1
  22. você declarou a variável de conexão?
  23. a estrutura está errada... não existe uma condição para saída do loop. a estrutura do loop seria assim for ( condição inicial; condição de saída; incremento/decremento) { código enquanto o loop for veradeiro } se não consegui responder sua dúvida, fale mais sobre o que está tentando fazer e tento detalhar mais
×
×
  • Criar Novo...