SoloCodigo

Haber he seguido debugeando y el problema esta en que el thread se va a otra clase y de esta vuelve a la clase Form1 para editar el Cuadro de Texto y es en ese momento en el cual se vuelve visible = false, y otra cosa que me ha mosqueado es que la propiedad InvokeRequired del CUADRO DE TEXTO esta a false, y supuestamente deberia de ser true ya que es del thread desde donde lo quiero modificar, no????
creo que me estoy volviendo loko!!!!!!!

Gracias a todos por vuestra ayuda. Las ire probando para ver como funcionan y cual me viene mejor para mi caso.
Un saludo.

ok. muchisimas gracias cuando solucione el problema subire el trozo o trozos de codigo que haya usado.

un saludo!!!

Hola a todos,

estoy creando una aplicacion windows con vb.net y estoy incorporando flash a mi aplicacion. Mi problema es que necesito cambiar mi pelicula flash dinamicamente (cambiar una linea de color por ejemplo) , segun lo q vaya leyendo de una bd access en vb.net.
Asi que necesito pasar una variable desde vb.net. a flash y en flash realizar las acciones q necesite.

Muchas gracias de antemano. Espero que alguien pueda ayudarme.

Un saludo

Hola a todos, me pregunto si alguien conoce alguna libreria gratuita para mejorar la interfaz grafica de usuario. He estado buscando y e encontrado una q se llama appface pero esta enfocada a vb. yo estoy utilizando vb.net con el visual studio 2008.
si alguien pudiese ayudarme.
Gracias de antemano y un saludo a todos.

Muchas gracias por tu aportacion. me a servido de gran ayuda lo q pasa es q aora me e encontrado conn un nuevo problema. yo me creo por cada item de la lista varios subitems y me creo columnas para mostrarlos. Pues al crear estos subitems siempre me aparece el una columna extra q es el numero de item empezando a numerar desde 1. este es mi trozo de codigo y me gustaria poder kitarlo o bien poder acceder al texto de los subitems del item seleccionado.

Al hacer esto:

       Dim i As Integer
            Dim s As String
            For i = 0 To ListView1.SelectedIndices.Count - 1

                s = ListView1.SelectedItems.Item(i).SubItems(1).ToString

            Next

me devuelve a s ="ListViewSubItem: {linea2}"
cuando deberia darme solo linea2.
como puedo hacerlo?

Gracias y un saludo

Saludos a todos,
estoy realizando un dibujo en vb.net 2008. Me acabo de encontrar con un problema q no me abia pasado nunca. adjunto el resultado del grafico q intento mostrar, en la imagen. Como podeis observar se corta el dibujo. Sin haber tocado nada ni haber cambiado nada en el codigo, el dibujo a dejado de salirme completo y a pasado a salirme asi. se supone q tendria q salirme igual por la derecha q por la izkierda. os paso el trozo de codigo donde dibujo la imagen. si alguien pudiese decirme porq puede ocurrir esto seria de gran ayuda.
Me funcionaba y me salia el dibujo y de repente ha dejado de hacerlo.

    Dim g As Graphics = Me.CreateGraphics  ' declaro q la zona del grafico es el form
    Dim g2 As Graphics = Me.CreateGraphics

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        g2.Clear(Me.BackColor)      'voy a acer mover la flecha sobre el dibujo cada vez q toke el boton segun lo q ponga en el combobox
        g.Clear(Me.BackColor)       'asi q limpio el grafico
        Dim myPen As New Pen(Color.Black, 1)        'declaro mi pen con forma de flecha
        myPen.StartCap = LineCap.SquareAnchor
        myPen.EndCap = LineCap.ArrowAnchor

        Dim trayecto As New GraphicsPath            'declaro los distintos trayectos
        Dim trayecto2 As New GraphicsPath
        Dim trayecto3 As New GraphicsPath
        Dim trayecto4 As New GraphicsPath
        Dim trama As LinearGradientBrush = New LinearGradientBrush(New Rectangle(100, 10, 200, 95), Color.Green, Color.Red, LinearGradientMode.Vertical)

        ' es la brocha con la que voy a pintar la region que keda entre los dos semielipses


        trayecto.AddArc(New Rectangle(100, 10, 200, 170), 180, 180)
        trayecto2.AddArc(New Rectangle(125, 30, 150, 130), 180, 180)
        trayecto3.AddLine(100, 95, 125, 95)
        trayecto4.AddLine(275, 95, 300, 95)

        Dim RG As New Region(trayecto)
        RG.Exclude(trayecto2)
        g.FillRegion(trama, RG)


        If ComboBox1.Text = "900" Then

            g2.DrawLine(myPen, 200, 95, 134, 64)

        ElseIf ComboBox1.Text = "1000" Then
     
            g2.DrawLine(myPen, 200, 95, 200, 30)

        ElseIf ComboBox1.Text = "1100" Then

            g2.DrawLine(myPen, 200, 95, 266, 64)

        End If

    End Sub

Gracias de antemano.

Un saludo!!!

Buenas, mi problema consiste en que estoy trabajando con una bd de access y con el vb.net 2008. Quiero visualizar un grafico con el nuevo control de vb.net y para ello ago una sentencia select en la que busco por fecha y por el tipo de dato. Para ello tengo un combobox q me carga directamente de la bd los tipos de datos del cual selecciono uno y para buscar por fechas tengo dos maskedbox (igual q un textbox pero pongo la mascara de fecha) en los que meto la fecha inicial y la fecha final. las fechas de las q kiero mostrar datos en mi grafico.
El problema reside en que al hacer la sentencia select, no me reconoce la fecha y me da error. os pongo el trozo de codigo y os digo el error exacto:

        Dim operarDb As Clasebd               'para abrir la conexion a mi bd
        operarDb = New Clasebd
        operarDb.conexion_abrir()
        Dim seleccion As String
        Dim dat As String                          'dato
        Dim fe As DateTime                      'fecha inicio
        Dim fef As DateTime                     'fecha fin
        dat = Me.ComboBox1.Text
        fe = CDate(MaskedTextBox1.Text)
        fef = CDate(MaskedTextBox2.Text)
        seleccion = "Select * from Historicos where Sensor ='" & dat & "' and Fecha between ' " & fe & " ' and ' " & fef & " ' "
        Dim lector As System.Data.OleDb.OleDbDataReader
        lector = operarDb.comando_leer(seleccion)

el error es el siguiente:
No coinciden los tipos de datos en la expresión de criterios.

Si quito la comilla simple de los tipos fecha no me da fallo pero no me muestra nada y deberia mostrar por lo menos 15 datos. Para insertar en la bd la fecha con sentencia sql necesito la comilla simple. No es el primer problema q tengo al buscar por fechas en la bd. En otras ocasiones e metido mas campos en mi bd y e dao vueltas para no buscar por fechas pero en este caso no tengo mas remedio que hacerlo por este campo.

Gracias de antemano y espero vuestra ayuda.