elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Recuerda que debes registrarte en el foro para poder participar (preguntar y responder)


  Mostrar Mensajes
Páginas: 1 2 [3] 4 5 6 7 8 9 10 11 12 13 14 15 16 17
21  Foros Generales / Dudas Generales / Re: No os parece difícil programar? en: 28 Febrero 2012, 18:50 pm
No, pero en cambio me parece difícil y frustrante diseñar (todo lo relacionado con diseño gráfico) por mas que me esfuerzo. Hay gente que no tiene vocación para ciertas cosas pero para otras sí. Aunque también puede ser que no tengas buenos maestros, intenta investigar por tu cuenta o probar otros métodos de estudio, si aun así se te dificulta pues ya tu dirás.

Saludos
22  Programación / Programación C/C++ / Re: Ayuda para un programillo en: 12 Diciembre 2011, 19:15 pm
Hola, a simple vista ve lo siguiente
1.- Te falta incluir los archivos de cabecera iostreamcstdlib, que es donde vienen las funciones cout cin y system() que utlizas en tu programa
2.- Falta ; en la penúltima linea
3.- Falta ; en la última linea
4.- Te falta el ; en todos los break

Saludos
23  Programación / Programación Visual Basic / Re: "El misterio de la variable indx" jaja en: 26 Octubre 2011, 22:42 pm
Ya entendí el problema, la verdad si es algo raro que visual basic no destruya la variable al descargar el form =S

Compruebenlo de esta forma:

  • En un proyecto agregar dos form (form1 y form2)
  • Agregar un command a cada uno

Usar el sig. codigo en form1
Código
  1. Option Explicit
  2.  
  3. Private Sub Command1_Click()
  4.    Form2.Show
  5. End Sub

Y el sig codigo en form2
Código
  1. Option Explicit
  2. Dim i As Integer
  3.  
  4. Private Sub Command1_Click()
  5.    Unload Me
  6. End Sub
  7.  
  8. Private Sub Form_Load()
  9.    MsgBox i
  10.    i = i + 1
  11.    MsgBox i
  12. End Sub
  13.  

Al cerrar el form2 aun con el unload me la variable i conserva su valor. Obviamente esto se puede solucionar de muchas formas, y $Edu$ el método que utilizas de inicializar la variable 0 es muy valido, de hecho se recomienda siempre inicializar la variables para evitar este tipo de cosas. Otro detalle curioso es qui si la variable es declarada dentro de form_load() si se destruye su valor. En fin, visual basic y sus misterios :P


24  Foros Generales / Foro Libre / Re: Quién lo sabe ?? en: 4 Agosto 2011, 22:04 pm
A ver ya que estamos, yo me se varias:

¿Que es lo primero que le mete el hombre a la mujer cuando se casan?

 ;D
25  Foros Generales / Foro Libre / Re: Para qué sirve la tira de luces LED de la batería en: 4 Agosto 2011, 14:28 pm
Para medir su carga, debe tener un botón, entre mas leds enciendan mas carga tiene.

Saludos
26  Foros Generales / Foro Libre / Re: Programacion en argentina... alguna salida? en: 24 Julio 2011, 05:50 am
Citar
y lo que me dijo un analista en otro colegio es que todo lo que se podia hacer en software ya estaba hecho, asi que el se dedica a hora al derecho
Pues que mediocre analista, la verdad que bueno que se dedica a derecho. Esa manera de pensar no cabe en un ingeniero de software.

En mi pais, Mexico, no hay mucho campo, pero el poco que hay es muy bien pagado, sobre todo con software a medida para pymes o grandes empresas. Ahi es donde está el dinero y lo digo por experiencia propia como jefe de sistemas en una empresa grande.

Saludos
27  Programación / Programación Visual Basic / Re: Texto a arrays en: 6 Abril 2011, 17:28 pm
Muchas gracias a todos.

Logré solucionarlo gracias a la idea de seba123neo.

Al final el codigo quedó asi:
       
Código
  1. Dim linea As String, archivo As String, division(6) As String, aux As String
  2.        Dim i As Integer
  3.        Dim subE As ListItem
  4.        archivo = Trim(OFName.lpstrFile)
  5.        Open archivo For Input As #1
  6.        While Not EOF(1)
  7.            Line Input #1, linea
  8.            aux = Mid(linea, 1, 1)
  9.            division(0) = Trim(Mid(linea, 1, 13)) 'Caja
  10.            division(1) = Trim(Mid(linea, 14, 31)) 'Descripcion
  11.            division(2) = Trim(Mid(linea, 45, 13)) 'Caja/Cliente
  12.            division(3) = Trim(Mid(linea, 59, 13)) 'Producto
  13.            division(4) = Trim(Mid(linea, 72, 13)) 'Exi. Actual
  14.            division(5) = Trim(Mid(linea, 85, 20)) 'Peso
  15.            division(6) = Trim(Mid(linea, 106, 20)) 'Precio
  16.  
  17.            If aux = "0" Then
  18.                Set subE = lv.ListItems.Add(, , division(0))
  19.                For i = 1 To UBound(division)
  20.                    subE.SubItems(i) = division(i)
  21.                Next
  22.            End If
  23.        Wend
  24.        Close #1

Saludos
28  Programación / Programación Visual Basic / Re: Texto a arrays en: 5 Abril 2011, 19:28 pm
Gracias por responder, intentaré lo de las Exp Reg que no se me habia ocurrido.

Lo del split(), lo use de diferentes formas, pero al ultimo lo deje asi al copiar el codigo. Pero de la forma que lo tenia era:
division = Split(linea,vbTab)

Bueno, probaré y les cuento. Gracias
29  Programación / Programación Visual Basic / Texto a arrays [SOLUCIONADO] en: 5 Abril 2011, 18:20 pm
Hola a todos, necesito un poco de orientación en un proceso que no puedo solucionar.

Resulta que tengo un archivo de texto con miles de lineas con el siguiente formato (este lo genera un sistema que no puedo cambiar):
Citar
00304-001    1042X250X131MM(150)51B/CK *750 84-0070      00304-001            1,440   1           600   2           300         1,740
00304-002    507X257X131(150)51 B/C K *450  84-0061      00304-002                0   4         1,050   1           150           900
00304-003    507X252X258MM (150)51BCK *450  84-0020      00304-003            1,200   0             0   2           300           900
00304-006    1042X507X256(75)51 B/C K *225  84-0058      00304-006              402   0             0   0             0           402
00304-012    1500X793 (200) 32 C K  *400    84-0146      00304-012              730   0             0   1           200           530

La idea es pasarlos a un listview para luego trabajar con los datos. El detalle es que no logro separar cada linea en las 9 columnas, ya que la separación no es un tab, si no que son espacios variables, por lo tanto split() no me sirvió.

Este es el codigo que tengo, pero me lo carga todo en una sola columna, ya que no me respeta el split:
Código
  1. Dim linea As String
  2.    Dim division() As String
  3.    Dim i As Integer
  4.    Dim r As String
  5.    Dim subE As ListItem
  6.    Open "C:\INV320.TXT" For Input As #1
  7.    While Not EOF(1)
  8.        Line Input #1, linea
  9.        division = Split(linea)
  10.        r = Mid(division(0), 1, 1)
  11.        If r = "0" Then
  12.            Set subE = ListView1.ListItems.Add(, , division(0))
  13.            For i = 1 To UBound(division)
  14.                subE.SubItems(i) = division(i)
  15.            Next
  16.        End If
  17.    Wend
  18.    Close #1

Y esta es la salida:
 

Saludos
30  Programación / Bases de Datos / Re: mysql> y esto? en: 28 Marzo 2011, 12:07 pm
Si no vas a utilizar ninguna de las funciones del combo, dejalo en blanco, no pasa nada.

No veo nada que tengas que solucionar  :-\

Saludos
Páginas: 1 2 [3] 4 5 6 7 8 9 10 11 12 13 14 15 16 17
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines