Lo asombroso del asunto es que es solo una vez, independientemente de si ha sido o no, si es un eructo a lo bajo a boca cerrada.  

Hay dos clases de eructos los voluntarios, esos que te bebes una cerveza o una bebida carbonatada notas la presión del gas y VOLUNTARIAMENTE aireas los gases a boca abierta a diestro y siniestro. Luego está el eructo contraído, que se produce debido a un espasmo involuntario de los músculos de estómago que expulsan los gases al exterior y que por educación cierras la boca y se escucha algo similar como un carraspeo.

Me parece ridículo que se pueda echar a alguien por el segundo eructo, repito, involuntario e IMPOSIBLE de demostrar el origen voluntario o involuntario tengas papeles o no, que no se si un médico pueda expedir un documento tal.

---

RECALCO  sólo una vez

voy a por ellos, por que lo tengo.

Pero igualmente, somo seres humanos y a cualquiera se le puede escapar uno  con ruido. Y ¿qué pasa si carraspeo? ¿también se necesita papeles para ello? Me parece una locura. Estoy hablando de algo puntual no algo que vayas hacer cada cinco minutos, ni si quiera cada día. Tengo un cabreo que se van a enterar, me da mucha rabia estas pijadas y este abuso de poder .

¿Pero como puede ser legal echar a alguien por tirarse un pedo o eructo (y/o aunque no lo sea pero que se piense? ¿Tan gratuito y fácil es echar  a alguien?

¿Es que estamos locos o qué? ¿Y como diantres voy a demostrar que es voluntario o involuntario?

estoy estupefacto.  

---

¿En qué artículo, decreto o lo que sea aparece eso?


Estoy hablando que, según las amanazas del coordinador, simplemente con carraspear y aunque no sea eructo se reservan el derecho a expulsarme. Es más, si la empresa, por la razón que sea me quiere quitar de en medio tan solo tienen que decir que hice un "ruidito" (sea cual fuera).

Se que la pregunta perece broma, pero es absolutamente sincera.

Estoy  realizando un curso del SOC, y el coordinador me ha notificado que si durante las prácticas en empresa hago algún "ruidito" (aunque sea involuntariamente) seré inmediatamente expulsado.

NOTA: el "ruidito" todo y aunque no fuera tal si se pensara que lo es, igualmente sería expulsado.

¿Es esto legal? ¿Se puede echar a alguien por tirarse un pedo o eructar?

En el caso que ocurriera me gustaría denunciarlo legalmente ¿tendría las de ganar o las de perder?

gracias

@Elektro sois un genio muchas gracias.

Funciona perfecto.

Ahora tengo que usar SelectedItem debido a que el DataGridView no recoge el elemento seleccionado hasta haber abandonado la celda o haber pulsado Enter. Ese era el problema. Ahora va perfecto.

...
    Private Sub ComboBox_SelectedIndexChanged(sender As Object, e As EventArgs)
 
        Dim cb As ComboBox = DirectCast(sender, ComboBox)
 
        If (cb.SelectedIndex <> -1) Then
            Dim dgv As DataGridView = DirectCast(cb.Parent.Parent, DataGridView)
            Dim cell As DataGridViewCell = dgv.CurrentCell
            Dim colIndex As Integer = cell.ColumnIndex
            Dim rowIndex As Integer = cell.RowIndex
 
            'Dim sb As New System.Text.StringBuilder()
            'sb.AppendLine(String.Format("Selected index changed: {0}", cb.SelectedIndex))
            'sb.AppendLine(String.Format("Column Index: {0}, Row Index: {1}", colIndex, rowIndex))
            'MessageBox.Show(sb.ToString())
 
            MessageBox.Show(CStr(DataGridView1.Item(colIndex, rowIndex).Value))
            MessageBox.Show(CStr(cb.SelectedItem))
        End If
 
    End Sub

El primer mensaje  aparece vacío, mientras que el segundo devuelve valor.

Saludos

hola

He creado un DataGridView dentro da algunas celdas he añadido combox (DataGridViewComboBoxCell). El caso es que necesito que al seleccionar un elemento del combo, automáticamente reciba el evento y usar el valor seleccionado para buscarlo en una tabla DataTable para luego obtener un valor:

    Public Sub GetValue(ByVal numCol As Integer, ByVal numRow As Integer)
        If numCol = 0 Then
            For Each N As DataRow In dt.Rows
                Dim Item As String = CStr(N.Item(1).ToString.Replace("*", ""))
                Try
                    If DataGridView1.Item(numCol, numRow).Value.ToString.Contains(Item) Then
                        DataGridView1.Item(5, 0).Value = N.Item(10)
                    End If
                Catch ex As Exception
 
                End Try
 
            Next
        End If
    End Sub

Tengo una tabla DataTable llamada dt y con el este código la idea es añadirla en un evento el cual me devuelve la columna y la fila donde  he seleccionado el elemento del combo y llamo al procedimiento getValue:

GetValue(e.ColumnIndex, e.RowIndex )

Pero no consigo encontrar ningún evento que ejecute el procedimiento instantáneamente nada más hacer clic en un elemento del combo.

Solo consigo que devuelva el valor cuando hago clic en otra ceda del DataGridView y abandono el combo.

espero me puedan ayudar 


Gracias

a ver si te sirve esto, está en VB6

With List1
.AddItem (25)
.AddItem (36)
.AddItem (18)
.AddItem (13)
End With
With List2
.AddItem (16)
.AddItem (36)
.AddItem (11)
End With
 
 
 
Dim Diferencia() As Boolean 'Array para guardar el resultado de la comparación
 
 
For Item = 0 To List1.ListCount - 1
         ReDim Preserve Diferencia(Item + 1)
     Diferencia(Item) = CBool(List1.List(Item) = List2.List(Item))
      If List2.List(Item) = "" Then
        Diferencia(Item) = False
      End If
 
Next Item
MsgBox ("¿Son iguales " & List1.List(0) & " y " & List2.List(0) & "? " & Diferencia(0))
 
 
Dim str As String
For Index = 0 To UBound(Diferencia) - 1
 str = str + _
     List1.List(Index) & "=" & _
     List2.List(Index) & " --> " & _
     Diferencia(Index) & vbCrLf
 
Next Index
MsgBox (str)
 
 

meto las diferencias en un array booleano para poder acceder a él siempre que se quiera como se muestra en el primer mensaje.

como ejemplo he hecho una lista más larga que otra, pero lo suyo es que ambas sean de igual longitud.

espero que te sirva

saludos

Seguramente sea eso, ellos que tengo entendido no han tocado VB, o VS en general, confunden VB6 con VB.NET. 

He estado mirando tu respuestas, en NET y te tengo por un gurú de NET. Te imagino sentado en mi clase y que se te pongan a explicarte directamente a ti como a un niño pequeño lo que es un array , de risa . Como si no existieran en VB o VB.NET.

que tal.

Actualmente estoy en una escuela de informática en la cual estoy aprendiendo javascript , que no necesito ir a una escuela para aprender, pero claro, siendo autodidacta no hay título.

El caso es que yo comenté  que sabía programar con VB, VB.NET y C# pero el profesor me trata como si fuera un mamarracho que no ha programado en su vida, ni tuviera ni idea de programación, algo que me irrita bastante. Muy al contrario que con otro estudiante que ya de entrada decía que sabía javascript (sin título), que lo tiene como si fuera el mismísimo Albert Einstein de la programación. Dicho estudiante dijo que VB es una porquería, al tiempo que ASP.NET

Tengo la sensación que VB.NET y VS en general se INFRAVALORA bastante, y es considerado una programación menor.

Personalmente creo que VB,  C# y C++  tiene mucha más funcionalidad y complejidad que javascript. Éste último destaca porque es muy usado teniendo en cuenta que es el lenguaje por excelencia para aplicaciones WEB, y teniendo en cuenta el tiempo que vivimos y su uso en Internet, no es de extrañar que se le de más importancia, mientras que  VB por ejemplo queda relegado sistemas de desarrollo de Windows.

La verdad es que es irritante haberme tirado años programando con VB (el viejo y el de ahora) y últimamente en C# para llegar a un sitio y me traten como un recién salido de la guardería en el ámbito de la programación.

También veo en Internet muchos comentarios negativos hacia VB.NET y no entiendo muy bien el porqué, En algunos aspectos lo entiendo pero en términos de funcionalidad y complejidad no creo que sea como hablar de él como si fuera de preescolar.

Saludos

que tal, tengo Windows 7 64 bits y no tengo disponible en el menú Nuevo del menú contextual del Escritorio el "Documento de texto enriquecido"

Buscando en Google, he encontrado que modificando el registro en HKEY_CLASSES_ROOT, elijo cualquier extensión de archivo. Si no tiene la clave [ShellNew] la creo,  y en esta clave añado un valor de cadena con nombre "NullFile", el tipo de archivo elegido aparecerá en el menú Nuevo.

Sin embargo, y atención a esto, desde otro ordenador también con Windows 7 que SI dispone del Documento de texto enriquecido (RTF) en el menú nuevo, no aparece tal valor "NullFile". Así que no creo que el que no tenga dicho valor sea la razón de que no me aparezca en el menú del otro ordenador.

¿Alguien sabe porqué y como puedo añadirlo?

---

El "NullFile" está en la extensión .bmp y sin embargo no aparece en el menú.

Creo recordar que había un cuadro en no se donde donde se podía elegir los elementos de este menú, pero quizás me equivoque.


Gracias