Iniciar sesión
Crear cuenta
Crear cuentaCrear cuenta| Hay un total de 3030 Preguntas. | << >> |
| Pregunta: | 58733 - BAJAR "UNA LINEA" EN LOS TEXTOS DE MSGBOX |
| Autor: | Alex Pizarro |
| tengo una duda, como puedo hacer para poder bajar una linea hacia abajo en el texto de una caja de mensaje, este es un ejemplo del código:
MsgBox "caja de mensaje, justo donde esta la coma desearia que baje" seria algo asi normalmente MENSAJE Caja de mensaje, justo donde esta la coma desearia que baje MENSAJE ARREGLADO Caja de mensaje justo donde esta la coma desearia que baje gracias desde ya | |
| Respuesta: | xve |
| Hola Alex, tiene que insertar un salto de linea...
MsgBox "caja de mensaje" & chr(13) & "justo donde esta la coma desearia que baje" Saludos | |
| Pregunta: | 58770 - SE BORRAN REGISTROS EN MYSQL AL REINICIAR |
| Autor: | carlos alberto garcia |
| Buenas, estoy programando en mysql y vb6, y me sucede un problema algo extraño, cargo registros, en la base de datos pero cuando apago y vuelvo a encender el equipo se me borran todos, en ocaciones algunos y a veces casi todos los registros que cargue anteriormente, cabe señalar que la aplicacion se ejecuta sin el explorer.exe, utilizo el adodb.recordset, o el adodb.command, por favor me urge | |
| Respuesta: | LUIS ALEJANDRO FRANCO RODRIGUEZ |
| Buenos dias Amigo
Es algo estraño tu caso, pero lo que se me psa por la mente es que puedas tener conectado la bd directamente al programa y no se esteen guardando. Intenta grabando tres registros directamente desde mysql a ver que tal.... y me dices... | |
| Pregunta: | 58921 - RENOMBRAR OBJETOS DE EXCEL CON VBA |
| Autor: | Donald Payno |
| Hola a todos, tengo una duda, trabajo mucho con objetos, y no he encontrado la manera de manipular sus nombres para ahorrar codigo y simplificar las cosas, de hecho no se si sea posible lo que quiero hacer, pero ya que he visto que ustedes son muy buenos en esto solicito su consejo, de ante mano gracias...
este es el codigo que intento correr trae unos comentarios para ayudar a mi explicacion, Sub a() W = 1 For W = 1 To 5 'ESTE ES EL INDICE DE LA HOJA _ EL CUAL ES EL QUE QUIERO QUE CAMBIE CON EL BUCLE _ CAMBIAR DE OBJETO, ESTE EJEMPLO ES SUPONIENDO QUE EL _ LIBRO DE EXCEL TUVIERA 5 HOJAS i = "hoja" & W i.Cells(1, 1).Value = "Hola" 'AL LLEGAR AQUI, DICE QUE SE _ REQUIERE _ UN OBJETO Y MANDA ERROR Next W End Sub | |
| Respuesta: | ruben |
| la instruccion seria
Sub nombre() mihoja = "Pepe" Sheets.Add.Name = mihoja 'Creo la hoja por si no existe Sheets(mihoja).Cells(1, 1).Value = "Hola" End Sub | |
| Pregunta: | 58983 - COMO BUSCAR REGISTRO PARA ELIMINAR O MODIFICAR SIN CICLO |
| Autor: | Hector Cortez |
| Saludos mis amigos programadores.
no soy muy bueno pero me mandaron a buscar un registro para eliminar o modificar sin utilizar ciclos la verdad estaba utilizando lo siguientes: mis registros estan en un DBGrid enlazado con DATA2.recordsoucer= "con SQL" DBGrid .Columns(2)= Cedula XXX =>(ci) While Data1.Recordset.EOF = False if Data1.Recordset!ci = DBGrid.Columns(2) then Data1.Recordset.Edit Exit Sub End If Wend alli lo hace bien pero me exigieron que sin ciclos creo pero no seguro con Data1.Recordset.FindFirst (criteria as string) le he metido las mil y una pero no logro resolver este problemita Amigos programadores se lo agredesco de antemano si tiene la solucion muchas gracias... | |
| Respuesta: | HECTOR CORTEZ |
| BUENOS GRACIAS A UN PANA YA ENCONTRE LA RESPUESTA Y QUERIA COMPARTIRLA CON USTEDES....
EL CAMPO (ci) EN LA BASE DE DATOS TIENE QUE SER NUMERICA EL CONTROL DATA1 TIENE QUE ESTA ENLAZADA SOLO CON UNA TABLA NO COMO UNA CONSULTA (VARIAS) CRITERIO=("ci=" & int(DBGrid.Columns(2)) & "") Data1.Recordset.FindFirst (CRITERIO) ESTA LINEA MOVERA HASTA EL REGISTRO HASTA EL PRIMERO QUE CUMPLA ESTE CRITERIO SALUDOS... | |
| Pregunta: | 58992 - EL ELEMENTO DE LA MATRIZ DE CONTROLES DE MENU DEBE TENER UN |
| Autor: | Vanessa Varela |
| Hola
resulta que estoy creando un menu en visual basic 6.0 y se este generando el mensaje "El elemento de la Matriz de controles de menu debe tener un indice", ya intente de diferentes maneras cambiando el ondex y continua generandose el mismo error o se genera otro que solicita que el indice de los menus y submenus sean consecutivos, sin embargo a pesar de que se realiza el cambio, el menu no de ejecuta. ¿que debo modificar o como debo organizare el index para que el menu se ejecute? Gracias | |
| Respuesta: | Carolina Soto |
| Hola, debes revisar los nombres de cada menú y submenú, estos no pueden repetirse con otros, yo creo que ahí está tu falla..... | |
| Pregunta: | 59082 - ODENAR COLUMNAS DENTRO DE UN DBGRID AL HACER CLICK EN LA CAR |
| Autor: | Jose Rios |
| Hola, como puedo odenar columnas dentro de un dbgrid al hacer click en la cabecera de las columnas en vb6. Gracias por vuestras repuestas | |
| Respuesta: | jc zr |
| Hola,
Tal vez sea una respuesta demasiado simple, tal vez hay otra manera mas sencilla de hacerlo, pero se me ocurre que podrias usar el evento "click" de tu dbgrid, detectar si el click fue en la fila 0 (fila de encabezados) y si fue asi, detectar entonces en que columna se dio el click. Con esto, tendrias que hacer un procedimiento que te ordene tu dgrid en base al dato obtenido Espero te ayude la idea. Saludos | |
| Pregunta: | 59122 - FORMULARIOS MDI E HIJOS |
| Autor: | membrillo mem |
| hola quisiera saber si hay alguna manera de que al maximizar los formularios hijos, éstos tenga una medida máxima, de tal manera que no tapen al formulario mdi
Gracias | |
| Respuesta: | membrillo mem |
| Me sale el error 384 en tiempo de ejecucion.
No se piede mover o ajustar el tamaño de un formulario minetras este maximizado o minimizado. Puede que me explicase mal. Lo volveré hacer: Tengo un formulario MDI abierto, abro un hijo, si le doy al boton maximizar, quiero que éste como maximo quede por debajo de los iconos del formulario MDI Gracias | |
| Respuesta: | Baltasar |
| Con el evento Resize.
Pongamos por ejemplo que el ancho máximo queremos que sea de 6000 y el alto máximo de 4000: Private Sub Form_Resize() If width>6000 then width=6000 if height>4000 then height=4000 End Sub La solución es sencilla y fácil de entender. También puedes controlar el tamaño mínimo, pero has de controlar que no esté minimizado (windowstate) Saludos y suerte. | |
| Pregunta: | 59141 - DETECTAR UNA UNIDAD USB CUANDO SE INSERTE |
| Autor: | JJ M |
| me gustaria saber que tengo q hacer para detectar en vb6 una unidad usb cuando se inserte en el pc, (para q mi programa elimine el archivo autorun.inf) | |
| Respuesta: | jc zr |
| Hola,
Una forma (rudimentaria) de hacerlo seria que al momento de ejecutar tu programa este detecte las unidades presentes en ese momento, luego en un timer estar leyendo las unidades presentes y comparar contra lo que tenias al iniciar el programa, esto te llevara a encontrar cualquier unidad nueva que aparezca y entonces hacer lo que necesites con la unidad encontrada. Es solo una idea general, espero te sirva Saludos | |
| Pregunta: | 59156 - RFC |
| Autor: | Ariana Solis Sarabia |
| Como realizar un programa en donde el usuario introduzca su Registro Federal de Contribuyentes y le digamos si es correcto o no, tomando en cuenta que los cuatro primeros digitos deben ser letras, los siguientes seis son numeros y los tres ultimos son mixtos(letras y numeros) ya que el numero de digitos del RFC son 13. | |
| Respuesta: | Fernando Fumero |
| '**********************************************************************************************
'* atte: Fernando Fumero | [email protected] | http://www.luzyfer666.es.tl/ '********************************************************************************************** Private Sub Command1_Click() MsgBox IsRFC(Text1) End Sub Friend Function IsRFC(X_RFC As String) As String 'ABCD123456ABC Dim I As Integer IsRFC = "Correcto" ' Revisamos el largo, solo de 13 caracteres será admitido If Len(X_RFC) <> 13 Then IsRFC = "Largo incorrecto, solo pueden ser 13 caracteres.": Exit Function ' Revisamos que no existan números en los 4 primeros caracteres For I = 1 To 4 If IsNumeric(Mid(X_RFC, I, 1)) Then IsRFC = "Los 4 primeros caracteres tienen que ser letras, no números.": Exit Function Next I ' Revisamos que solo sean números en los 6 caracteres siguientes For I = 5 To 10 If Not IsNumeric(Mid(X_RFC, I, 1)) Then IsRFC = "Los caracteres del 5 al 10 tienen que ser números, no letras.": Exit Function Next I End Function '********************************************************************************************** '* atte: Fernando Fumero | [email protected] | http://www.luzyfer666.es.tl/ '********************************************************************************************** | |
| Pregunta: | 59242 - MANEJO DE DATA CONTROL ADODC |
| Autor: | CARLOS CAMACHO |
| Saludos
Si tengo un Data Control Adodc (VB6, Windows xp profesional), cada que cambie mi contraseña en Oracle 8i (via ODBC) tambien la debo cambiar en las propiedades de este y volver a compilar? Hay alguna forma de navegar por una tabla de Oracle con un Form sin el Adodc y hacerlo con codigo? De ser asi, puedo pasar usuario y contraseña a la conexion. Si se puede, por favor digame como. Muchas gracias por su ayuda. | |
| Respuesta: | LUIS ALEJANDRO FRANCO RODRIGUEZ |
| Buenos dias
Con esta pregunta me mataste de verdad, pero si tienes una respuesta me la puedes decir por favor, por que la unica forma que veo es la cambies en el componente adodc y compilar nuevamente... Por lo que tengo entendido oracle no ha dado su codigo de seguridad al publico y para poder conectar la bd debes tener la clave.... Si la quieres tumbar ya eso es hackear y este foro no se presta para ese tipo de programas... Saludos... | |
| |< << 289 290 291 292 293 294 295 296 297 298 299 >> >| |
