Colocar Resposta 
 
Avaliação do Tópico:
  • 0 votos - 0 Média
  • 1
  • 2
  • 3
  • 4
  • 5
Dúvida sobre "Visual basic control timer"
07-05-2012, 22:20
Mensagem: #11
RE: Dúvida sobre "Visual basic control timer"
Olá Karkov.
Estou a escrever pois não percebi bem a seguinte instrução:
imagens.GetLength(valorAleatorio.Next(2)).ToString().

Estou também um pouco perdido depois das instruções que me deste não sei que é que é suposto fazer a seguir.

Bem por agora é tudo espero ter-me feito compreender 1 abc fica bem.Cool
Procurar todas as mensagens deste utilizador
Citar esta mensagem numa resposta
08-05-2012, 11:08
Mensagem: #12
RE: Dúvida sobre "Visual basic control timer"
(07-05-2012 22:20)Tony_Soprano Escreveu:  Olá Karkov.
Estou a escrever pois não percebi bem a seguinte instrução:
imagens.GetLength(valorAleatorio.Next(2)).ToString().

Estou também um pouco perdido depois das instruções que me deste não sei que é que é suposto fazer a seguir.

Bem por agora é tudo espero ter-me feito compreender 1 abc fica bem.Cool

Olá,
O que é que não percebeste naquela instrução?

abc.
Procurar todas as mensagens deste utilizador
Citar esta mensagem numa resposta
09-05-2012, 00:41
Mensagem: #13
RE: Dúvida sobre "Visual basic control timer"
Ola Karkov.
Quanto ao post anterior onde disse que não compreendia a instrução imagens.GetLength(valorAleatorio.Next(2)).ToString().
Não comprendo a instrução completa ou seja qual a sua função no programa.
Espero desta vez ter sido mais claro, e que me possas ajudar.Cool
Procurar todas as mensagens deste utilizador
Citar esta mensagem numa resposta
09-05-2012, 09:37 (Esta mensagem foi modificada pela última vez a: 09-05-2012 10:04 por karkov.)
Mensagem: #14
RE: Dúvida sobre "Visual basic control timer"
ah... a instrução fica assim
Código:
PictureBox1.ImageLocation = imagens.GetLength(valorAleatorio.Next(2)).ToString

ou seja:
Tens uma PictureBox que vai receber a string do caminho (imagens.GetLength().ToString) de uma imagem aleatória (valorAleatorio.Next(2))

melhor explicado só enviando o código.... lol
CORREÇÃO:

Só depois de ver o código reparei num erro my bad... sorry...

o código é:
Código:
PictureBox1.ImageLocation = imagens(valorAleatorio.Next(0, 3)).ToString

em vez de:
Código:
PictureBox1.ImageLocation = imagens.GetLength(valorAleatorio.Next(2)).ToString
Procurar todas as mensagens deste utilizador
Citar esta mensagem numa resposta
10-05-2012, 00:01
Mensagem: #15
RE: Dúvida sobre "Visual basic control timer"
Olá Karkov.
Bem o meu programa tem o seguinte código e mesmo assim não funciona:

Public Class Form1
Dim i As Integer
Dim imagens() As String = {"C:\Vb10sbs\chap07\face01", "C:\Vb10sbs\chap07\face02", "C:\Vb10sbs\chap07\face03"}
Dim valorAleatorio As New Random()
Private Sub Label1_Click(sender As System.Object, e As System.EventArgs) Handles lblrelogio.Click

End Sub
Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
i = i - 1
lblrelogio.Text = TimeString
PictureBox1.ImageLocation = imagens(valorAleatorio.Next(0, 3)).ToString
End Sub
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
i = 30
End Sub
End Class


Agradecia que desses uma vista de olhos e me ajudasses a descobrir o erro.
Além disso continuo mesmo com a instrução nova sem perceber o que faz.
Não consegues mesmo trocar esta instrução por miudos.. PictureBox1.ImageLocation = imagens(valorAleatorio.Next(0, 3)).ToString ou seja esmiusala de forma a isolares as propriedades e identificar o que cada instrução separada faz. Gostava mesmo de perceber se não for pedir de mais.

Muito obrigado por tudo.
Tony_Soprano.
Procurar todas as mensagens deste utilizador
Citar esta mensagem numa resposta
10-05-2012, 01:02
Mensagem: #16
RE: Dúvida sobre "Visual basic control timer"
(10-05-2012 00:01)Tony_Soprano Escreveu:  Olá Karkov.
Bem o meu programa tem o seguinte código e mesmo assim não funciona:

Public Class Form1
Dim i As Integer
Dim imagens() As String = {"C:\Vb10sbs\chap07\face01", "C:\Vb10sbs\chap07\face02", "C:\Vb10sbs\chap07\face03"}
Dim valorAleatorio As New Random()
Private Sub Label1_Click(sender As System.Object, e As System.EventArgs) Handles lblrelogio.Click

End Sub
Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
i = i - 1
lblrelogio.Text = TimeString
PictureBox1.ImageLocation = imagens(valorAleatorio.Next(0, 3)).ToString
End Sub
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
i = 30
End Sub
End Class


Agradecia que desses uma vista de olhos e me ajudasses a descobrir o erro.
Além disso continuo mesmo com a instrução nova sem perceber o que faz.
Não consegues mesmo trocar esta instrução por miudos.. PictureBox1.ImageLocation = imagens(valorAleatorio.Next(0, 3)).ToString ou seja esmiusala de forma a isolares as propriedades e identificar o que cada instrução separada faz. Gostava mesmo de perceber se não for pedir de mais.

Muito obrigado por tudo.
Tony_Soprano.

muito bem....
só te falta 2 coisas para funcionar:
  1. onde tens ( C:\Vb10sbs\chap07\face01 ... ) tens que ter paths para imagens (.jpg ou .gif ...)
  2. onde tens ( PictureBox1.ImageLocation = imagens(valorAleatorio.Next(0, 3)).ToString ) tens que substituir por:
    Código:
    If (i = 0) Then
       PictureBox1.ImageLocation = imagens(valorAleatorio.Next(0, 3)).ToString
       i = 30
    End If
    ou seja: se o teu contador for igual a 0 então mostra uma imagem e volta a reiniciar o contador.


ainda não te vou trocar aquilo por miudos... vou antes dizer-te para fazeres o seguinte:
  1. comenta a seguinte linha de codigo lblrelogio.Text = TimeString
  2. cria esta linha de código lblrelogio.Text = imagens(valorAleatorio.Next(0, 3)).ToString e vê o que retorna, pode ser que compreendas


cumps.
Procurar todas as mensagens deste utilizador
Citar esta mensagem numa resposta
10-05-2012, 22:51
Mensagem: #17
RE: Dúvida sobre "Visual basic control timer"
Ola Karkov.
Finalmente ficou o programa a funcionar.
Quanto a linha que me pediste para fazer o coment ca vai.
lblrelogio.Text = TimeString 'Esta linha de código permite mostrar o relogio com recurso ao relogio de sistema'.

Depois de ter visto a instrução: lblrelogio.Text = imagens(valorAleatorio.Next(0, 3)).ToString
Quanto ao que faz a esta linha de código, gera aleatoriamente uma string com o caminho de uma das imagens e imprime-o no ecra.
A diferença desta para a outra instrução que tenho a correr no programa é que esta mostra o resultado (ou seja o caminho) do que gerou e a que esta a correr mostra a imagem.

Bem espero ter acertado..

Agora corrige-me se eu estiver errado..

Obrigado por tudo cumprimentos Tony_Soprano.
Procurar todas as mensagens deste utilizador
Citar esta mensagem numa resposta
11-05-2012, 09:50 (Esta mensagem foi modificada pela última vez a: 11-05-2012 22:57 por karkov.)
Mensagem: #18
RE: Dúvida sobre "Visual basic control timer"
quando te disse para comentares a linha de código lblrelogio.Text = TimeString não era para me dizeres o que ela faz... o que ela faz sei eu... eu tinha dito para comentares a linha no teu programa e colocares a outra instrução que te tinha dado para ver se percebias o que é que o imagens(valorAleatorio.Next(0, 3)).ToString fazia ...

mas pronto tudo ok. Então a aplicação está a correr certo? se precisares de mais alguma coisa apita.
Procurar todas as mensagens deste utilizador
Citar esta mensagem numa resposta
Colocar Resposta 


Saltar Fórum:


Utilizadores a ver este tópico: 2 Visitante(s)