Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Temas - Lepizz

Páginas: [1]
1
Buenas querida gente del foro, estoy aprendiendo a programar en JAVA desde 0, y estoy haciendo unos ejercicios pero este no lo comprendo muy bien, esq no he trabajado con listas y se que debo usar una clase Agenda y otra Contactos sin embargo por mas que lo intento no lo logro hacer bien dejo el ejercicio a continuación:



Usted debe programar una aplicación que sirva para manipular una agenda de contactos. Tome en
cuenta las siguientes consideraciones:
 1. Su programa debe guardar la siguiente información de cada persona: nombre, primer apellido,
segundo apellido, número de teléfono y año de nacimiento. Cada uno de estos datos debe
guardarse en un campo separado.
 2. Su programa debe tener la siguiente funcionalidad: agregar contacto, obtener información de un
contacto, obtener iniciales de un contacto y calcular la edad cumplida que tendría la persona al
finalizar el año 2015.
 3. Para crear un contacto el método correspondiente recibe como parámetros el nombre, el primer
apellido, el segundo apellido y el número de teléfono. Su programa deberá definir aleatoriamente
el año de nacimiento entre 1940 y 2010. Para agregar el contacto creado el método
correspondiente lo guarda en un objeto de tipo ArrayList.
 4. Para obtener la información de un contacto el método correspondiente recibe como parámetro el
número de contacto (desde 1 hasta la cantidad actual de contactos). Su programa debe verificar si
el número de contacto recibido es válido, de lo contrario deberá mostrarle al usuario un mensaje
de error y devolver un null. De ser correcto el número de contacto, el método devuelve una sola
hilera con toda la información.
 5. Para obtener las iniciales de un contacto el método correspondiente recibe como parámetro el
número de contacto (debe verificar también si el número es válido e informar al usuario en caso
de no serlo) y devuelve una hilera formada por la primera letra del nombre, la primera letra del
primer apellido y la primera letra del segundo apellido, todas en mayúscula. Por ejemplo, si la
persona se llama Juan López Morales, se devolverá JLM. En caso de ser incorrecto el número de
contacto el método devuelve un null.
 6. Igualmente para obtener la edad cumplida de un contacto el método correspondiente recibe un
número de contacto (se debe verificar su validez e informar al usuario en caso de no serlo) y
devuelve la edad que esta persona tendrá al finalizar el año 2015. En caso de ser incorrecto el
número de contacto el método devuelve un número negativo.
 7. El diálogo con el usuario debe realizarse utilizando la clase JOptionPane en lugar de la terminal.


No pido que me lo hagan, solo que me lo expliquen es que es trabajando JAVA en el ambiente de programación BLUEJ, por aquello que no lo haya dejado claro, soy muy novato en esto jaja, de antemano gracias

2
Buenas necesito ayuda con un pseudocódigo de un programa que pida palabras o frases palíndromas, con el fin de que el programa imprima si la palabra es palíndroma o no.
Necesito que sea solo un Pseudocódigo más que en un lenguaje especifico. Si me pueden ayudar gracias de antemano.

3
Buenas gente... como el Asunto indica, existe algun código para ordenar en orden alfabetico los registros de un datagridview
=?

saludos!!

4
Estoy trabajando en visual studio 2012 y de un pronto a otro un boton que me funcionaba perfectamente ahora se comporta extraño por decirlo así... El boton es de agregar registros y antes del cambio, agregaba perfectamente al final del datagridview y ahora todos los registros que agrego los envía a las primeras posiciones. Lo que me extraña esq no cambie nada en su configuracion para q hiciera ese cambio.

ES POSIBLE QUE SEA ALGUN ERROR EN VISUAL STUDIO??????
o existe otra explicación, si alguien conoce la solucion o algun dato que pueda ser de ayuda que no dude en decirme, gracias.

5
 EL BOTON ELIMINAR SÍ ELIMINA DE LA BASE DE DATOS Y TAMBIEN DEL DATAGRID,                                               
  PERO SI ELIMINO DOS REGISTROS APARECE EL REGISTRO QUE FUE ELIMINADO LA PRIMERA VEZ,   
  TENGO QUE HACER QUE ELIMINE DE LA BASE DE DATOS(COMO LO HACE)Y DEL DATAGRID, ADEMAS   
  QUE SE PUEDAN ELIMINAR VARIOS REGISTROS SIN QUE REAPAREZCA UN REGISTRO QUE YA FUE     
 ELIMINADO.                                                                           


No se porque ocurre eso, aqui esta el codigo del boton sino me explique bien o deje algo en claro me lo hacen saber por favor y gracias:

Código: [Seleccionar]
  '_______________________________________________________________________________________
    ''BOTON ELIMINAR''----------Todo bien
    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
       Dim consulta_eliminar As String
        Dim respuesta As Byte
        Dim posicion4 As Integer


        respuesta = MsgBox("¿Esta seguro que desea eliminar este registro? ", vbYesNo, "Eliminar")
        If respuesta = vbYes Then
            Try

                conexion.Open()
                consulta_eliminar = ("Delete * FROM Esc_Salarial WHERE Esc_Salarial.cod_puesto = '" + Cod_puestoTextBox.Text + "'")
                comandos2 = New OleDb.OleDbCommand(consulta_eliminar, conexion)
                comandos2.ExecuteNonQuery()
                Me.Esc_SalarialBindingSource.RemoveCurrent()
                MsgBox("Registro eliminado.", vbInformation, "Eliminado.")

                Cod_puestoTextBox.Clear()
                Nom_puestoTextBox.Clear()
                Sal_nivel1TextBox.Clear()
                Sal_nivel2TextBox.Clear()
                Sal_nivel3TextBox.Clear()
                Sal_nivel4TextBox.Clear()
                Sal_nivel5TextBox.Clear()

                posicion4 = Esc_SalarialBindingSource.Position
                Me.Esc_SalarialTableAdapter.Fill(Me.Database1DataSet.Esc_Salarial)
                Me.Validate()
                Me.Esc_SalarialBindingSource.EndEdit()
                Me.Esc_SalarialTableAdapter.Fill(Me.Database1DataSet.Esc_Salarial)
                Esc_SalarialBindingSource.Position = posicion4
            Catch ex As Exception

                MsgBox("Error al eliminar.", vbCritical, "Atención.")

                posicion4 = Esc_SalarialBindingSource.Position
                Me.Esc_SalarialTableAdapter.Fill(Me.Database1DataSet.Esc_Salarial)
                Me.Validate()
                Me.Esc_SalarialBindingSource.EndEdit()
                Me.Esc_SalarialTableAdapter.Fill(Me.Database1DataSet.Esc_Salarial)
                Esc_SalarialBindingSource.Position = posicion4
            End Try

            conexion.Close()
        End If

    End Sub


6
Como dice ahí arriba... ya sabrán que no es una pregunta de vital importancia pero si por curiosidad, como hacen para medir el nivel de experiencia y conocimiento de  forma que se pueda incluir en el nivel que es mas apropiado para cada persona? Por ejemplo yo soy principiante xD jajaja mas acertado no podría ser, pero si un experto llegase y se hiciera una cuenta acá, como haría él para tener el nivel como tal?

7
hola Yo otra vez con mis preguntas de Visual Basic 2012, esta vez tengo un problema con mi botón de agregar, tengo que decir que lo que quiero es hacerlo y como es lógico, que no haya cabida a errores, este es mi código:

Código: [Seleccionar]
''BOTON NUEVO REGISTRO''-----------------Error, solo envia el ultimo try
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        If Cod_puestoTextBox.Text = Text And Nom_puestoTextBox.Text = Text And Sal_nivel1TextBox.Text = Text And Sal_nivel2TextBox.Text = Text And Sal_nivel3TextBox.Text = Text And Sal_nivel4TextBox.Text = Text And Sal_nivel5TextBox.Text = Text Then
            Me.Esc_SalarialTableAdapter.Insertar(Cod_puestoTextBox.Text, Nom_puestoTextBox.Text, Sal_nivel1TextBox.Text, Sal_nivel2TextBox.Text, Sal_nivel3TextBox.Text, Sal_nivel4TextBox.Text, Sal_nivel5TextBox.Text)
   

        ElseIf Cod_puestoTextBox.Text = "" And Nom_puestoTextBox.Text = "" And Sal_nivel1TextBox.Text = "" And Sal_nivel2TextBox.Text = "" And Sal_nivel3TextBox.Text = "" And Sal_nivel4TextBox.Text = "" And Sal_nivel5TextBox.Text = "" Then
            Try
                Esc_SalarialDataGridView.Update()
                MsgBox("Debe insertar los datos requeridos.")
                Esc_SalarialTableAdapter.Dispose()
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try
        Else
            Try
                Esc_SalarialDataGridView.Update()
                MsgBox("Inserte todos los datos.")
                Esc_SalarialTableAdapter.Dispose()
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try

        End If
        Me.Esc_SalarialTableAdapter.Fill(Me.Database1DataSet.Esc_Salarial)

        Me.BindingContext(Esc_SalarialBindingSource).Position =
        Me.BindingContext(Esc_SalarialBindingSource).Count - 1
        Esc_SalarialDataGridView.Text = Me.BindingContext(Esc_SalarialBindingSource).Position

    End Sub

y lo que me acongoja esque a mi parecer esta bien pero obviamente no lo esta porque el programa no agrega, bueno, voy a explicar de forma simple cada parte del código para q me entiendan.
  Este es el primer IF que según yo, dice q si en todos los textbox hay textos(valga la redundancia) pues que los agregue a las columnas respectivas:

Código: [Seleccionar]
If Cod_puestoTextBox.Text = Text And Nom_puestoTextBox.Text = Text And Sal_nivel1TextBox.Text = Text And Sal_nivel2TextBox.Text = Text And Sal_nivel3TextBox.Text = Text And Sal_nivel4TextBox.Text = Text And Sal_nivel5TextBox.Text = Text Then
            Me.Esc_SalarialTableAdapter.Insertar(Cod_puestoTextBox.Text, Nom_puestoTextBox.Text, Sal_nivel1TextBox.Text, Sal_nivel2TextBox.Text, Sal_nivel3TextBox.Text, Sal_nivel4TextBox.Text, Sal_nivel5TextBox.Text)

  El siguiente es el primer Elseif, lo hize asi para solucionar el error que daba si usaba el botón sin agregar datos, lo que hace esque si no hay datos en ningún textbox envía un msj:

Código: [Seleccionar]
ElseIf Cod_puestoTextBox.Text = "" And Nom_puestoTextBox.Text = "" And Sal_nivel1TextBox.Text = "" And Sal_nivel2TextBox.Text = "" And Sal_nivel3TextBox.Text = "" And Sal_nivel4TextBox.Text = "" And Sal_nivel5TextBox.Text = "" Then
            Try
                Esc_SalarialDataGridView.Update()
                MsgBox("Debe insertar los datos requeridos.")
                Esc_SalarialTableAdapter.Dispose()
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try

  Este es el Else (por cierto acá cierra el ciclo If), ya con los anteriores le e dicho al programa que debe hacer en caso de que tenga toda la información en los txtbox, y que hacer en caso que no le escriban nada; sin embargo da un error si se inserta texto en algún txtbox y nada en otros, evitar ese error es mi objetivo con este Else:

Código: [Seleccionar]
Else
            Try
                Esc_SalarialDataGridView.Update()
                MsgBox("Inserte todos los datos.")
                Esc_SalarialTableAdapter.Dispose()
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try

        End If

  A mi parecer el programa debería interpretar esto de esta manera" si tengo todos los datos, los agrego al datagridview; si no tengo nada, entonces envío un msj, y si no se da el primer caso ni el segundo, pues hago el tercero q es enviar otro msj, porque si no es gallo es gallina"

No le e indicado al programa específicamente que haga el Else en caso que hayan algunos datos en txtsbox y en otros no, pero debería funcionar bien creo yo, pero no es asi, si yo pruebo el programa, y no agrego nada a los texbox al tocar el botn hace lo q deberia hacer, si lo pruebo de nuevo y agrego informacion en algun texbox y en otro(s) no; también hace lo q debe hacer...osea que el segundo y tercer caso funcionan bien, pero si agrego información a todos los textbox y toco el botón me tira el msj como si no estuviese agregando a todos, osea se da el tercer caso y eso no tiene sentido  :(

El resto de código que no explique es para actualizar y mantener la ultima posición, pero si funciona bien esa parte :)

Gracias por tomarse el tiempo de leer este tema y si me pueden ayudar lo agradecería mucho, espero haberme explicado bien

Saludos !!

8
Hola tengo un botón que actualiza bien con este código:

Código: [Seleccionar]
Me.Esc_SalarialTableAdapter.Fill(Me.Database1DataSet.Esc_Salarial)
pero ocupo que actualice y conserve la posición en la que me encuentro en el datagrid para que si hago cambios o cosas de ese tipo, cada vez que actualice no pierda la posición en que estoy y me envíe haastaaa el principio de la bd???

Creo que este código me sirve para eso( si conocen uno díganmelo por favor!(porque no estoy seguro)):
Código: [Seleccionar]
 
        If Me.BindingContext(Esc_SalarialBindingSource).Position = 0 Then
        End If

        Me.BindingContext(Esc_SalarialBindingSource).Position -= 1 And
        Me.BindingContext(Esc_SalarialBindingSource).Position = 1

        Esc_SalarialDataGridView.Text = Me.BindingContext(Esc_SalarialBindingSource).Position
    End Sub


Pero no sé cómo mezclarlos de forma que funcionen correctamente lo tengo asi:

Código: [Seleccionar]
    Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
        '   EN LA LINEA SIGUIENTE ME DA ERROR
        If Button5_Click(AcceptButton) Then

            Me.Esc_SalarialTableAdapter.Fill(Me.Database1DataSet.Esc_Salarial)

            If Me.Esc_SalarialTableAdapter.Fill(Me.Database1DataSet.Esc_Salarial) Then
                Me.BindingContext(Esc_SalarialBindingSource).Position = 0
                Me.BindingContext(Esc_SalarialBindingSource).Position -= 1 And
                Me.BindingContext(Esc_SalarialBindingSource).Position = 1
                Esc_SalarialDataGridView.Text = Me.BindingContext(Esc_SalarialBindingSource).Position
            End If
        End If


    End Sub


Pero no me sirve la primer linea del IF, COMO LA HAGO DE FORMA QUE FUNCIONE ESE CÓDIGO o tal vez alguien me pueda dar UN CÓDIGO QUE FUNCIONE EN CASO QUE EL MIO NO SEA EL CORRECTO?

muchas gracias amigos Saludos!

9
Hola, soy nuevo en lo respecta a programación y estoy haciendo lo que podría considerar yo como mi primer proyecto mas importante..
.
COMO HABRÁN LEÍDO NECESITO AYUDA y el problema con mi programa es que no logro configurar el botón de Guardar de manera que si corro el programa y hago cambios en mi DataGridView, se guarden para la próxima vez que lo corra y a la vez se guarden a la base de datos de access a la que estoy conectado con el programa... y francamente e buscado vídeos de youtube, foros y otros medios de investigación para aprender a hacerlo ya que nadie me esta enseñando y e visto ya tantas formas diferentes que no me han funcionado que no se ni como empezar.. alguien me puede dar ideas, de antemano se lo agradeceré.

Gracias

Páginas: [1]

Sobre la educación, sólo puedo decir que es el tema más importante en el que nosotros, como pueblo, debemos involucrarnos.

Abraham Lincoln (1808-1865) Presidente estadounidense.

aprenderaprogramar.com: Desde 2006 comprometidos con la didáctica y divulgación de la programación

Preguntas y respuestas

¿Cómo establecer o cambiar la imagen asociada (avatar) de usuario?
  1. Inicia sesión con tu nombre de usuario y contraseña.
  2. Pulsa en perfil --> perfil del foro
  3. Elige la imagen personalizada que quieras usar. Puedes escogerla de una galería de imágenes o subirla desde tu ordenador.
  4. En la parte final de la página pulsa el botón "cambiar perfil".