TODOPIC

Lenguajes de programación para PC => Visual Basic => Mensaje iniciado por: fastyx en 01 de Agosto de 2006, 23:24:53

Título: me falta poco para graficar!
Publicado por: fastyx 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)
Título: Re: me falta poco para graficar!
Publicado por: BrunoF en 02 de Agosto de 2006, 00:35:22
Ya respondido en: http://www.todopic.com.ar/foros/index.php?topic=13177.msg76289#msg76289 (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 :-)