Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
AND c.idchofer IN (SELECT DISTINCT id_chofer FROM asignaciones_choferes)Cita de: andaluz en 24 Febrero 2012, 18:09 PMCódigo (vbnet,9) [Seleccionar]Private Sub btn_Buscar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Buscar.Click
Dim nombre, dni As String
Dim edad As Integer
For i = 0 To UsuTableAdapter.GetData.Rows.Count - 1
nombre = UsuTableAdapter.GetData.Rows(i).Item(0)
dni = UsuTableAdapter.GetData.Rows(i).Item(1)
edad = UsuTableAdapter.GetData.Rows(i).Item(2)
If dni <> txt_DNI_Buscar.Text Then
fila = i
MessageBox.Show("DNI encontrado: " & UsuTableAdapter.GetData.Rows(i).Item(1), "Informacion", MessageBoxButtons.OK, MessageBoxIcon.Information)
lbl_DNI_Encontrado.ForeColor = Color.Green
lbl_Nombre.Text = nombre
lbl_DNI.Text = dni
lbl_Nombre.Text = edad
Exit Sub
Else
fila = i
MessageBox.Show("ERROR")
'Exit Sub
End If
Next
End Sub
def hasSameContent(t1, t2):
return all([(x in t2) for x in t1]) if len(t1)==len(t2) else Falsedef hasSameContent(t1, t2):
if len(t1)!=len(t2):
return False
return all([(x in t2) for x in t1])
def countA(word):
return len([x for x in p if x=='a'])def countA(word):
return sum([x=='a' for x in p])def countA(word):
return word.count('a')![:-\](https://forum.elhacker.net/Smileys/navidad/undecided.gif ":-\")
