Respuesta
en
Visual Basic
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
Visual Basic
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
Visual Basic
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
Visual Basic
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
Visual Basic
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
Visual Basic
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
Visual Basic
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
Visual Basic
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
Visual Basic
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
Visual Basic
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...