Visual Basic - Ejercicio matemático visual basic 6.0

Life is soft - evento anual de software empresarial
   
Vista:

Ejercicio matemático visual basic 6.0

Publicado por JUAN m-a-t-e-o-12@hotmail.com (32 intervenciones) el 20/01/2015 17:33:50
Hola amigos mi consulta quizás sea algo fácil pero no me da la mente

tengo una aplicación en funcionamiento
la cual consta de una base de datos acces .mdb
el problema es que debo ordenar los registros, esto lo hago por el método que casi todos conocemos
asignando un campo a dicha tabla para ordenar por hay. Hasta hay todo bien

El problema resulta cuando no se que ejercicio matemático debo hacer para que no se me repitan los números
ejemplo: ordeno los siguientes datos

Nombres / campo_ordenar

Maria / 1
jose / 2
<esta fila la usare para meter en ella un registro que dicho numero para ordenar sea mayor que 2 pero menor que 3>
pedro / 3
mateo / 4

lo que se me ocurrió fue esto
text1.text= val(text2.text)+1
el text1 lo uso para guardar en el campo ordenar
el text2 lo uso para que me capture la posición en el registro actual antes de guardar el nuevo
en este caso tendría en text2.text = 2 que seria la orden de jose
pero con mi ejercicio el nuevo dato me quedaría en 3 porque le sumo 1 y 3 es el de pedro

es hay donde necesito la ayuda alguien sabe que ejercicio matemático debo aplicar hay

ayuda porfavor :(

saludos desde Colombia Muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Wilfredo Patricio Castillo

Ejercicio matemático visual basic 6.0

No se entiende bien tu pregunta, pero si no quieres que se repitan los números en el campo ordenar, defínelo como Primary Key, y con eso solucionas 98% de tu problema, ahora, cuando generes un nuevo número, verificas si ya existe en la tabla y lanzas la alerta que ya existe, caso contrario grabas.

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Ejercicio matemático visual basic 6.0

Publicado por JUAN (32 intervenciones) el 20/01/2015 20:10:52
Gracias por tu intervención patricio mira lo que intento es esto
el ejercicio que hago para que me de el numero entre los dos es el siguiente

Text1.Text = (Val(Text2.Text) + Val(Text3.Text)) / 2

con ese ejercicio saco la mitad que para el ejemplo que puse antes seria el numero mayor de 3 pero menor de 4 = 3,5 eso seria perfecto,

este es el problema !

Text1.Text = (Val(3,5) + Val(Text3.Text)) / 2

el resultado aqui es el mismo 3,5 donde deberia ser mayor de 3,5 pero menor que 4
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Andres Leonardo

Ejercicio matemático visual basic 6.0

Publicado por Andres Leonardo (702 intervenciones) el 21/01/2015 00:22:18
Juan

Como vas... te cuento ... primero el campo que deseas deberia ser decimal (no se hasta cuantas posiciones) ... lo que estas haciendo... es una solucion que en algun momento te dara problemas... en todo caso ....


Mira esto:
yo lo que haria .. es crear un campo orden sin importar el codigo o Migrar el campo y a ese multiplicarlo por 100 (x 10 x 1000 x 1000000 o lo que necesites) asi maria seria 100 jose 200 pedro 300 ahi vendria .. a ese orden donde quieres meter pondrias por a ANDRES que sera orden +1 (200 + 1 ) = 201 y asi jose 200 Andres 201 y Pedro 300 ... en ese caso tendrias hasta 10a la N nuevos registro entre tus rangos segun el numero por el cual hagas el orden.... lo unico que no me queda claro es como sabes entre que rango ponerlo... pero eso parece que no es problema para ti... en todo caso.... ahi esta... espero te ayude...

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Ejercicio matemático visual basic 6.0

Publicado por JUAN (32 intervenciones) el 22/01/2015 16:57:44
Registros%20sin%20enrutar

Hola Andres muchas gracias por tu interés en ayudarme

dejare esta ilustración para ver si me explico mejor

https://onedrive.live.com/?cid=C94B1C2D1072C50F&id=C94B1C2D1072C50F%21260&v=3

Otra vez muchas gracias

saludos desde Colombia
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Ejercicio matemático visual basic 6.0

Publicado por JUAN (32 intervenciones) el 23/01/2015 02:30:12
Buscando y Buscando me encontré con lo que realmente quería

para las 341 visitas hasta el momento acá les dejo mi solución por si alguien la necesita

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Command1_Click()
If Despues.Value = True Then 'si es antes del registro actual en el Recordset
Valor1 = CDbl(Text1.Text) 'aqui almaceno el registro actual del Recordset
Valor2 = CDbl("0,1") ' aquí le sumo una fracción
Resultado = Valor1 + Valor2
Text3.Text = Resultado 'uso el text3 para guardar el nuevo registro con el resultado
End If
If Antes.Value = True Then 'si es despues del registro actual del Recordset
Valor1 = CDbl(Text1.Text)
Valor2 = CDbl("0,1")
Resultado = Valor1 - Valor2
Text3.Text = Resultado
End If
 
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
Imágen de perfil de Antonio

Ejercicio matemático visual basic 6.0

Publicado por Antonio (1 intervención) el 23/01/2015 03:06:55
Visual Basic 6.0
está orientado a la realización de programas para
Windows
, pudiendo incorporar
todos los elementos de este entorno informático: ventanas, botones, cajas de diálogo y de texto,
botones de opción y de selección, barras de desplazamiento, gráficos, menús, etc.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar