Autor Tema: me falta poco para graficar!  (Leído 2274 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado fastyx

  • Colaborador
  • PIC18
  • *****
  • Mensajes: 353
me falta poco para graficar!
« en: 01 de Agosto de 2006, 23:24:53 »
me falta solamente esta duda a ver si me echan una mano : Gracias!!!!
les paso el codigo a ver si me dan una mano ya que yo pretendo graficar con circle para verlo mejor
esta es la parte modificada de brunof
Private Sub MSComm1_OnComm()
Dim Y As Variant
Dim X As Integer


Select Case MSComm1.CommEvent
    Case comEvReceive
        TxtRecibir.Text = TxtRecibir.Text & StrConv(MSComm1.Input, vbUnicode) & vbCrLf
        TxtRecibir.SelStart = Len(TxtRecibir)
        Y = TxtRecibir.Text
        X = 100
        grafica.Circle (Y * 0.2, X), 0.5
    End Select
End Sub
 el y*0.2 es para la escala ,el radio de circle es 0.5
si pongo Y = txtrecibir.txt me da error de compilacion porque las variables no se pueden colocar en circle( con pset me pasa lo mismo).
si pongo Y =  Len(TxtRecibir) lo grafica , pero no es lo que necesito porque no grafica los valores,pero lo use para ver si entraba (debug)

no le puedo encontrar la vuelta... Confused
otra cosa que deseo saber es si  los puntos pueden ir transitando en foco por el picturebox aunque haya llegado al final (como en los programas de edicion de audio)

Desconectado BrunoF

  • Administrador
  • DsPIC30
  • *******
  • Mensajes: 3865
Re: me falta poco para graficar!
« Respuesta #1 en: 02 de Agosto de 2006, 00:35:22 »
Ya respondido en: http://www.todopic.com.ar/foros/index.php?topic=13177.msg76289#msg76289
Por favor, ¡postea una sola vez la misma duda! ¡Que no somos ciegos! :D :-)
"All of the books in the world contain no more information than is broadcast as video in a single large American city in a single year. Not all bits have equal value."  -- Carl Sagan

Sólo responderé a mensajes personales, por asuntos personales. El resto de las consultas DEBEN ser escritas en el foro público. Gracias.


 

anything