Como hacer que no se salga la linea en visual basic

Iniciado por oJosLoCos, 11 Diciembre 2009, 23:35 PM

0 Miembros y 2 Visitantes están viendo este tema.

oJosLoCos

Veran he creado una grafica , donde represento lineas mediante valores que da una equacion.

Pero se me salen de la grafica y siguen hacia abajo por la parte gris. Como puedo hacer que en caso de que los valores den por fuera , no se representen?.

Saludos
>>Visita Nuestra Informacion De GTA IV En * www.cdm.foros.ws *

cobein

En este caso un screenshot seria fantastico pero bueno, si no queres que se representen valores que exceden el limite que tengas simplemente usas uno o dos if para ver si la coordenada esta dentro o no de el area del grafico. Por otra parte podrias usa un picturebox para graficar ahi dentro y no tendrias ninguno de esos problemas.
http://www.advancevb.com.ar
Más Argentino que el morcipan
Aguante el Uvita tinto, Tigre, Ford y seba123neo
Karcrack es un capo.

oJosLoCos

Veras esque el codigo es el siguiente.

Private Sub Command2_Click()
        If Xlist.ListCount > 1 Then
            Form1.Refresh
           
            Dim Xbefore, Ybefore
                Xlist.ListIndex = 1
           
            Do Until Xlist.ListIndex = Xlist.ListCount - 1
                Xbefore = Xlist.Text
                Ybefore = Ylist.Text
                Xlist.ListIndex = Xlist.ListIndex + 1
               
           
                Form1.Line (Xbefore * 50 + (Line1.X1 + Line1.X2) / 2, -Ybefore * 50 + (Line2.Y1 + Line2.Y2) / 2)-(Xlist.Text * 50 + (Line1.X1 + Line1.X2) / 2, -Ylist.Text * 50 + (Line2.Y1 + Line2.Y2) / 2)

           
           
           
           
            Loop
       
        Else
            Call MsgBox("Primero representar tabla")
           
        End If
End Sub

Pero yo no se cual es el limite de la grafica que tengo.. asique no se como puedo limitar el tamaño.

Saludos
>>Visita Nuestra Informacion De GTA IV En * www.cdm.foros.ws *

seba123neo

y como te dijo cobein , si pones ese codigo que lo haga en un picturebox en vez de un formulario, va a llegar al limite del picturebox y no va a seguir la linea, proba eso...porque yo no puedo ahora.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

oJosLoCos

Bien gracias utilice como dijeron un picturebox y todo de perlas , no se sale :)

Otra cosita , ya que estoy para no crear otro tema. Tengo unos textbox que te dan el resultado de una serie de operaciones planteadas previamente.

Me dan muchos decimales y quiero reducirlo a 2 o 3 decimales.

Como lo ago?

Porque aveces me dan valores taaan grandes , los decimales que me sale una cifra incorrecta con una letra E. :S

saludos
>>Visita Nuestra Informacion De GTA IV En * www.cdm.foros.ws *

MCKSys Argentina

Cita de la MSDN:

Round (Función)

Descripción

Devuelve un número redondeado en el número especificado de lugares decimales.

Sintaxis

Round(expresión [, númLugaresDecimales])

La sintaxis de la función Round consta de las siguientes partes:

Parte Descripción
expresión Requerido. La expresión numérica que se redondea.
númLugaresDecimales Opcional. Un número que indica cuántos lugares a la derecha del decimal se incluyen en el redondeo. Si se omite, la función Round devuelve enteros.


Saludos!

MCKSys Argentina

"Si piensas que algo está bien sólo porque todo el mundo lo cree, no estás pensando."


oJosLoCos

Soy un tanto lerdo. xD

Como puedo aplicar esa funcion a unos textbox? Independientemente.
tengo esto

Private Sub LlistaX_Click()
LlistaY.ListIndex = LlistaX.ListIndex 'Relacionar la posició entre Llista X i Y
Label1(1).Caption = LlistaX.Text
Label1(0).Caption = LlistaX.Text
Text1.Text = LlistaY.Text
End Sub

Hay una lista que va dando valores , como limitar los valores decimales de la lista , y de los texbox?

Gracias.
>>Visita Nuestra Informacion De GTA IV En * www.cdm.foros.ws *