menosmola10

menosmola10

 10,8K puntos  Cataluña, España @menosmola10 desde - visto

Respuestas

Respuesta en a

Visual Basic, problemas al cerrar form

Cuando se cierra el formulario se lanza el evento Query_Unload en el cual podemos hacer lo que queramos antes de que se descargue. Yo de ti pondría unas variables que tuvieran toda la información en todo momento de los textboxs y que cambien cada vez...
Respuesta en a

Crear un archivo con una extensión cualquiera

Primero tienes que añadir la referencia a la librería Microsoft Scripting Runtime. Para crear un archivo de texto: Dim fs As FileSystemObject Fs.CreateTextFile ("C:\archivo.txt") Luego puedes copiar este archivo a otro con la extensión que quieras y...
Respuesta en a

Ejecutables Hijos

He encontrado este código en un foro de programación que seguramente te podrá ayudar: Private Const GW_HWNDNEXT = 2 Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long 'el codigo para llamar...
Respuesta en a

Lectura Inversa de Ficheros

Supongo que metes cada línea en un array de texto, pues después de leer tienes que invertir cada posición del array, es decir: Dim cad1(100),cad2(100),cad As String Dim conta1,conta2,conta3 As Byte conta1=0 Open App.Path & "\fichero.txt" For Input As...
Respuesta en a

Acceder a caracteres de una cadena de texto:

Pues podrías hacer un bucle para recorrer toda la cadena si lo que quieres es comprobar cada carácter uno a uno: For cont:=1 to len(cadena) cadena2 = Mid(cadena,cont,1) 'Coge sólo un carácter Next cont Si lo que quieres es coger directamente un...
Respuesta en a

Ventana informativa

No sé si lo he entendido bien... Si lo que quieres hacer es que mientras se están filtrando las apuestas salga un texto con un mensaje y cuando se acaben de filtrar desaparezca lo que puedes hacer es un formulario en el que sólo muestres un mensaje....
Respuesta en a

Ayuda VB

No veo por qué tiene que darte ningún error, prueba este código tal cual a ver si te funciona: Dim variable(100) As String Dim num_linea As Byte num_linea = 0 Open "c:\Archivo.txt" For Input As #1 Do While Not EOF(1) Line Input #1,...
Respuesta en a

SSTab

Para posicionarte en una de las fichas del SSTab tienes que indicárselo así: SSTab1.Tab = num_ficha Si te soy sincero no sabía lo que era el SSTab, pero me ha picado la curiosidad y he aprendido a utilizarlo un poco (sólo lo básico) Gracias por la...
Respuesta en a

Palindrome visual basic script

En Visual Basic Script no sé cómo sería, deberías haber preguntado en ese tablón, pero en Visual Basic se hace así: Nota(tienes que tener 2 textboxs y un botón) Private Sub Command1_Click() Dim igual As Boolean Dim c1, c2, mitad As Byte Dim a1(100),...
Respuesta en a

Aplicaciones multiusuario

¿Puedes ejecutar la aplicación de la máquina B sin que esté ejecutándose la de la máquina A? Si no se puede seguramente es porque falten las librerías ADO en la máquina B, para eso tendrías que instalar el archivo mdac_typ.exe en la máquina B, ahora...