Ir para conteúdo
Fórum Script Brasil

Diegostf

Membros
  • Total de itens

    25
  • Registro em

  • Última visita

Sobre Diegostf

Diegostf's Achievements

0

Reputação

  1. Diegostf

    Timer Regressivo

    Entendi kuroi! obrigado pela explicação! so mais uma duvida! como faço para Label mostrar na tela o timer se regredindo!? eu deveria colocar no FORM_LOAD por exemplo? label.text = timer1 ou algo do tipo? Obrigado!
  2. Diegostf

    Timer Regressivo

    então rafael desculpe pela demora de postar, tive um problema na net! então voltando ao assunto! na base da logica eu faço o seguinte! supondo que um timer vai se regredindo de 2 Horas 59 Minutos, 59 segundos ATE 0:00 var Hora,minuto,segundo:inteiro inicio hora <- 2 minuto <- 59 segundo <- 59 ENQUANTO (hora <> -1) FACA timer 1000 timer 0 segundo <- segundo - 1 SE segundo = 0 então minuto <- minuto -1 segundo <- 59 FIMSE SE minuto = 0 então hora <- hora - 1 minuto <- 59 FIMSE limpatela escreva (hora,":",minuto,":",segundo) FIMENQUANTO certo que tem algums erros ai porque fiz correndo! mais a questao e como eu passo isso no VB? eu teria que colocar esse codigo na ABA da ferramenta "TIMER" por exemplo? ou algum botao? ai esta a duvida! e como eu faria pra ele ir regredindo e ir mostrando na FORM por uma LABEL! Abraços :wub:
  3. Diegostf

    Timer Regressivo

    então pessoal é que eu to começando estudar VB agora e to meio confuso! não to conseguindo montar uma logica.... e nem mexer com TIMER direito! tentei pegar algums exemplos na net mesmo assim ainda estou confuso! voces poderia me ajudar a montar-lo! abrigado!
  4. Diegostf

    Timer Regressivo

    Galera alguém poderia me ajudar a criar um timer so que ao invez de contar ele diminuir 2 minutos por exemplo, ate chegar ao 0! Abraços!
  5. Galera tenho uma duvida me ajudem! bom estou começando no VB agora então não sei a ultilidade de todas ferramentas e nem como usam direito! fiz um programinha para abrir Imagens JPG,BMP Openfiledialog. dlgabrir.ShowDialog() If dlgabrir.FileName <> " " Then picimagen.Load(dlgabrir.FileName) arquivo.text = dlgabrir.FileName End If Aqui ele abre a Imagen e Mostra o nome do arquivo e a pasta que se encontra! gostaria de saber como uso a ferramenta Savefiledialog para salvar o arquivo que esta aberto na Picturebox Abraços!
  6. Diegostf

    Duvida Cursos!

    Boa noite galera, Bom não sei se aqui seria a área certa para postar essa duvida mais vamos la! estou no segundo ano do colegial, tenho 18 anos, e tenho algumas duvidas! gosto muito desta area de programação, e mais para frente vou fazer uma faculdade na área! mais por enquanto gostaria da opinição de voces para saber se vale a pena me aprofundar em cursos Livres! exemplo: fiz um curso de Logica de programação no Senac a pouco tempo, agora estou fazendo Visual Basic 2005 na Impacta e logo mais pretendo fazer outros C# ou C , SQL etc e por ai vai.... mais sei la, alguns amigo dizem que estou jogando dinheiro fora fazendo esses cursos ai fico na duvida de parar ou continuar! se realmente esses cursos por fora, não sendo nada técnico, ajudaria a arruma um Emprego ate eu conseguir entrar em uma Faculdade mais para frente, bom por isso venho aqui pedir a opinião do pessoal que já e mais experiente! bom espero que o pessoal deem suas Opiniões! abraço a todos!
  7. Iae pessoall ngm sabe uma coisa Simples dessa? ou não querem ajudar ou tal preguiça de escrever kkkk ngm??!?
  8. Boa noite pessoal! terminei meu Curso de logica a pouco tempo, e pretendo começar o curso de VB mais antes estou estudando para já ir me acostumando! e tenho a seguinte duvida! Com vetores e o Comando de repetição FOR quero fazer o Seguinte.... Colocar em uma Form um Button e um TextBox Mudar o nome do Button para Adicionar! e cada vez que e Digitado um Numero no TextBox e clicar no Botao "Adicionar" ele guarda no Vetor o numero! eu queria repetir isto 10 vezes! e depois que adicionar 10 Numeros ele mostrar os 10 numeros guardados no vetor! Bom na logica mesmo montando isso no programinha que tenho e super Simples já no VB como estou começando agora me atrapalhei todo! Bom para dizer que não tentei fazer ta ai oque saiu Dim vet(10) As Integer Dim contador As Integer For contador = 0 To 10 vet(contador) = txtbox.Text Next For contador = 0 To 10 MsgBox(vet(contador)) Next End Sub alguém me ajuda Obrigado!
  9. então eu baixei o manual e nele não explica quase nada, so como montar o vetor mais isto eu já sabia!! olha outro Exemplo que sempre da erro!! Exercicio: Criar um vetor para Armazenar o nome de 15 pessoas!! var pessoas:vetor[1..15]de caractere pessoa:caractere n_pessoas:numerico i:numerico inicio i <- 0 n_pessoas <- 0 ENQUANTO n_pessoas < 15 FACA leia (pessoa) i <- i + 1 pessoas[i] <- (pessoa) n_pessoas <- n_pessoas +1 FIMENQUANTO Ai mando executa da o erro aqui: pessoas <- (pessoa) ERRO: O indice de um vetor deve ser uma Expressao do tipo INTEIRO ai eu mudo para expressao INTEIRO o erro continua mesma coisa!!
  10. Galera alguém poderia me ajudar, é o Seguinte eu uso o VISUALG para fazer meus exercicios e geralmente oque aprendo no CURSO tento montar no VISUALG e treino ate conseguir ficar bom e intender tudo,e logo quando comecei a aprender VETOR ate agora não consegui montar 1 Exercicio no visualg porque sempre da erro de Sintaxe, tento montar como aprendi e não da de geito nenhum e fico perdido, no curso já estamos avançando para Matriz e não consigui pegar a manha do vetor ainda por causa do Visualg que não colabora, porque o Unico geito de treinar para mim e no VISUALG porque no lapiz e papel não consigo!! por favor quem puder me ajudar!! Vou postar um Simples Exercicio que não consegui montar no Visualg por causa de Erro de Sintaxe Exercicio: Ler o nome de 5 pessoas, e imprimir os nome na ordem inversa!! algoritmo "semnome" // Função : // Autor : // Data : 29/9/2008 // Seção de Declarações var pessoa:vetor[1..5] de caractere p:inteiro inicio PARA p DE 1 ATE 5 FACA leia (pessoa[p]) FIMPARA Para (p) DE 5 ATE 1 FACA escreva (pessoa[p]) FIMPARA fimalgoritmo Deste jeito que o professor montou o Exercicio e mesmo com a resposta não consigo monta-lo no Visual-G alguém me de uma luz =)
  11. Bom comecei a aprender [Vetor] Agora e estou Muito perdido!! gostaria da ajuda de Vocês para resolver o Seguinte exercicio!! 1) Um armazém contem 400 Produtos e para cada tipo de produto Existe um Código. Faça um algoritmo para ler o Código do produto e a quantidade em estoque. Depois,Monte dois Vetores para armazenar respectivamente os Códigos das Mercadorias e a quantidade dos produtos --------------------------------------------------- Tentei fazer!! codigo_produto:numerico quantidade_estoque:numerico codigo:vetor[1..400]numerico quantidade:vetor[1..400]numerico cont:inteiro tentei fazer mais estou muito confuso e não estou conseguindo nem sair do Começo!! se alguém puder me ajudar a fazer eu agradeço!! OBS: este exercicio e apenas para treino!!
  12. Galera è o seguinte exercicio e gostaria de uma ajudinha!! 1) Na declaração de imposto de renda devem constar os dados: Nome do contribuinte,Renda Anual,Numero dependentes. Os calculos são feitos da forma a seguir a) Desconto de R$ 110,00 Por dependente b ) Com base na renda liquida (Renda anual Menos desconto) é calculada a liquota de contrubuição de acordo com a tabela: __________________________________________________ |RENDA LIQUIDA________________| ALIQUOTA (%) | |________________________________________________| |ATE R$ 900--------------------------------( INSENTO ) |DE R$ 901,00 ATE 5,000,00--------------( 5 ) |DE R$ 5,001,00 ATE 10,000,00----------( 10 ) |ACIMA DE R$10,001,00-------------------( 15 ) __________________________________________________ Faça um algoritmo para Calcular os valores dos Impostos a serem pagos por um numero indeterminado de contribuentes, Não se esqueã que, para facilitar seu trabalho, voce deve adotar um FLAG. ________________________________________________ tentei fazer assim , Deem uma olhada!! nome_contri:literal renda_anual,n_dependente,desconto,aliquota,rendaliq:numerico inicio Escreva ("Digite o nome do Contribuinte, ou FIM para terminar: ") leia (nome_contri) ENQUANTO (nome_contri <> "FIM") FACA Escreva ("Digite a Renda Anual :") leia (renda_anual) escreva ("Digite o Numero de Dependentes :") leia (n_dependente) desconto <- (n_dependente * 110) rendaliq <- (renda_anual - desconto) SE rendaliq <= 900 então aliquota <- 0 SE rendaliq <= 5000 então aliquota <- (rendaliq * 5%) SE rendaliq <= 10000 então aliquota <- (rendaliq * 10%) SENAO rendaliq > 10001 então aliquota <- (rendaliq * 15%) FIMSE FIMSE FIMSE escreva (aliquota) FIMENQUANTO _____________________________________________________________ Fiz assim mais acho que não esta correto, deve estar faltando algo!! no VISUALG no final ele da o resultado sempre como 0. se alguém poder me ajudar, me dizer onde esta errado, onde devo arrumar, Obrigado!!
  13. Obrigado por responder "Monica" então como voce disse faltou as Variaveis num1,num2 tinha me esquecido! tentei fazer assim de uma Olhada!! Inicio | |num1,num2,tentativas:numerico | |tentativas <- 0 | |Leia (num1) |Leia (num2) | |ENQUANTO (num1) <> (num2) FAÇA |tentativas <- tentativas +1 |escreva ("tente novamente,voce errou") |Leia (num2) | |FIMENQUANTO | |escreva ("voce acertou o numero",num1,"em",tentativas,"tentativas" FIM
  14. Obrigado por responder "db00m" então como você disse Aqui! le o numero 1 le num 2 enquanto for diferente.... Eu fiz o Seguinte!! Inicio | |num1,num2,tentativas:numerico | |tentativas <-0 | |ENQUANTO (num1) <> (num2) FAÇA | tentativas <- tentativas +1 |.... |FIMENQUANTO FIM Dentro dessa estrutuda de "ENQUANTO/FAÇA/FIMENQUANTO" pode ter comparação de 2 variaveiz? que no caso ali é num1 comparando com num2? tenho essa duvida poderia me responder?? Obrigado!!
×
×
  • Criar Novo...