Pesquisar na Comunidade
Mostrando resultados para as tags ''execução''.
Encontrado 4 registros
-
Boa Tarde/Boa Noite, Gostaria de perguntar a quem pudesse me explicar sobre o erro, e me dar uma dica sobre esse bloco de código. Na Plan3: A caixa de texto (txtfimprazo) recebe o foco; A caixa de texto fica na cor vermelha; Uma variável (resultado) recebe dois valores diferentes, do tipo boolean. Se o resultado for sim (true - digitando sim na caixa) então deveria somar a data atual (dependendo do dia que usar o formulário) + o valor de 20 dias (conteudo de Plan1.txtvlai.Value) Se o resultado for não (false - digitando não na caixa) então deveria somar a data atual (dependendo do dia que usar o formulário) + o valor de 15 dias (conteudo de Plan1.txtvreq.Value) Se o resultado for nada (vazio - nothing) então não deveria fazer nada. Então simplesmente levaria o foco para a próxima caixa. Então o que acontece: dá o erro tipos imcompatíveis, marcando abaixo onde está em negrito: a palavra "positivo". obrigado. Private Sub txtfimprazo_GotFocus() Plan3.Unprotect "sic" txtfimprazo.BackColor = &HFF& Dim positivo As Boolean Dim negativo As Boolean 'Dim resultado(2) As Boolean Dim resultado(2) As ReturnBoolean positivo = True negativo = False If txtlai.Text = "SIM" Then Set resultado(0) = positivo GoTo verdadeiro ElseIf txtlai.Text = "NÃO" Or txtlai.Text = "não" Then Set resultado(1) = negativo GoTo falso ElseIf txtlai.Text = "" Then Set resultado(2) = Nothing GoTo nada End If GoTo fim verdadeiro: txtfimprazo.Value = Date + Plan1.txtvlai.Value GoTo fim falso: txtfimprazo.Value = Date + Plan1.txtvreq.Value GoTo fim nada: txtfimprazo.Value = txtfimprazo.Value GoTo fim fim: Plan3.Protect "sic" End Sub
-
- boolean
- imcompatíveis
- (e %d mais)
-
Bom dia a todos, Estou começando o curso de programação em python mas não estou conseguindo fazer com que a linguagem rode no meu computador. Instalei o programa mas na hora de abri-lo, tentar executar algum arquivo, ou tentar iniciar a interface no cmd aparece a mensagem de falta de um arquivo.dll. Já tentei instalar esse arquivo mas não deu certo também. Gostaria de saber se existe algum site, programa ou modo alternativo de rodar meus programas em python. Desde já agradeço.
-
Olá. Fiz um joguinho no android do tipo flappy bird. O problema é que no meu smartphone (samsung s4) ele roda com uma velocidade e em outro dispositivo mais antigo (tablet samsung note 10) ele roda com o dobro da velocidade. Como posso igualar essa velocidade de execução diferente entre dispositivos diversos? Desde já, obrigado pela ajuda.
-
(Resolvido)Dar resize em um control em um intervalo de 30 pixels
uma questão postou soulaff Visual Basic
Ola amigos! Estou com muita dificuldade em meu projeto. Estou fazendo uma agenda de agendamento clinico, e nela eu crio buttons para representarem os horários! cada button tem 30 pixels de altura , o que representa 30 minutos de consulta! já consegui criar toda as estrutura para o agendamento dos horários porem gostaria de poder alterar o tamanho do button afim de representar um horário maior. Quero poder segurar na borda e arrastar para cima ou para baixo e alterar o tamanho do mesmo, porem de 30 em 30 pixels! já encontrei outros métodos de realizar esse resize em tempo de execução, mas não consigo ajustar para alterar de 30 em 30.... alguém por acaso conseguiria me ajudar? muito obrigado! Ps: o melhor metodo de recize que encontrei foi desse site: http://www.codeproject.com/Articles/20716/Allow-the-User-to-Resize-Controls-at-Runtime