Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

sooo.simple

Contar Pset em VB

Mensagens Recomendadas

sooo.simple

Boa noite gostaria de tirar uma duvida de VB6.

Estou a criar um programa para desenhar pontos através do rato na picture1

ja defeni escala e tudo mas não consigo por o programa a contar o numero de pontos acrescentados à picture1

eles estão a ser escrito ja apliquei contadores simples e so me atribui o valor 1 (que e o que eu somo)

em baixo esta o que tenho feito. No fundo quero contar os Pset é possivel? Obrigado

Private Sub Picture1_Click()

'''''AQUI

End Sub

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)

Picture1.DrawWidth = 7

pontos = pontos + 1

Picture1.PSet (x, y), RGB(255, 0, 0)

'Picture2.Print Format(x, "0.000")

'Picture3.Print Format(y, "0.000")

Picture4.Print pontos;

End Sub

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
jpaulino

Desculpem qualquer coisa era só dimensionar a variável agora e que me ocorreu isso

Continuação do bom trabalho

Dimensionar a variável? Não tinhas a variável "pontos" declarada ?

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.