Iniciar sesión
Crear cuenta
Crear cuentaCrear cuenta| Hay un total de 3030 Preguntas. | << >> |
| Pregunta: | 44378 - PREGUNTA |
| Autor: | Fco. Javier Olvera |
| ¿Cómo utilizar el PictureClip? | |
| Respuesta: | SuNcO |
| Si revisaras la Ayuda facilmente podrias saber para que es ese Control
Basicamente es para poner una imagen con varias imagenes dentro para posteriormente utilizarlas en diferentes PictureBox en tu Proyecto El ejemplo que trae lo pego integramente aqui.. Practicamente el ejemplo dice que se toman las coordenadas de donde esta la imagen, se toma su medida y se pasan al PictureBox Private Sub Form_Click () Dim SaveMode As Integer ' Guarda el ScaleMode activo para el cuadro de ' imagen. SaveMode = Picture1.ScaleMode ' Obtiene las coordenadas X e Y de la región de ' recorte (en píxeles). PicClip1.ClipX = Val(Text1.Text) PicClip1.ClipY = Val(Text2.Text) ' Establece el área de la región de recorte ' (en píxeles). PicClip1.ClipHeight = 100 PicClip1.ClipWidth = 100 ' Asigna el valor ScaleMode del cuadro de imagen ' a píxeles. Picture1.ScaleMode = 3 ' Establece el área de destino para llenar el ' cuadro de imagen. PicClip1.StretchX = Picture1.ScaleWidth PicClip1.StretchY = Picture1.ScaleHeight ' Asigna el mapa de bits recortado al cuadro ' de imagen. Picture1.Picture = PicClip1.Clip ' Restablece el valor ScaleMode del cuadro de imagen. Picture1.ScaleMode = SaveMode End Sub | |
| Pregunta: | 44382 - VISUAL BASIC |
| Autor: | AWINDA VELAZCO |
| buenos dias
no soy experta en programacion pero me gustria serlo quisiera saber como puedo agregar un control en tiempo de diseño en un formulario ejemplo en un lazo, por cada elemento que consiga en una base de dato me agregue un checkbox en un formulario y la lado el elemento en un textbox agradezco su ayuda | |
| Respuesta: | Agustín Dávila |
| Es muy facil.Primero tienes que crear un objeto (probaremos con un Textbox) en el formulario y ponerle la propiedad de Visible=False e Index=0.
Después para crear un nuevo Textbox sólo debes utilizar la sentencia Load, de esta manera: i=i+1 Load Text1(i) ' Donde i es el número de textbox que deseas generar. Text1(i).visible=true ' Después le pones que sea visible porque por defecto cuando creas un nuevo control está invisible. | |
| Pregunta: | 44383 - COMO EJECUTO UN PROGRAMA (*.EXE) |
| Autor: | miguel arigon |
| Hola amigos : me estoy iniciando en el mundo vb y quiero abrir un programa (*.exe) desde un boton en mi aplicacion y no se como
porfa alguien ke me ayude. saludos | |
| Respuesta: | sergio DC |
| con la funcion shell.
Solo le tienes que pasar por parametros la ruta completa. Me parece que la ruta relativa no valia, pero pruebalo de todas formas | |
| Pregunta: | 44385 - CONECTAR UN ARCHIVO DE AYUDA CON UN PROYECTO DE VISUAL BASIC |
| Autor: | Roberto Fernández |
|
Como puedo conectar un archivo de ayuda con un proyecto de Visual Basic de modo interactivo | |
| Respuesta: | SuNcO |
| Bueno eso depende, si el Archivo de ayuda lo hisiste tu o no
En cualquier de los 2 casos ve al menu Proyecto y Propiedades de Proyecto y hay un apartado llamado Nombre del Archivo de Ayuda Si el Archivo lo hisiste tu entonces utilizaste unos numeros que son clave para cada tema del Archivo de Ayuda. Esos numeros se ponen en la Propiedad HelpContextID que lo tienen los TextBox, Commandbutton y varios mas.. esto quiere decir que al ese objeto tener el Foco y presionar F1 se va a ir a ese tema en el Archivo de Ayuda | |
| Pregunta: | 44392 - NÚMERO DE LÍNEAS DE CAJAS DE TEXTO |
| Autor: | Carlos Piña |
| Quiero saber si en Visual Basic se puede contar el número de líneas de una caja de texto y si al buscar un caracter se puede obtener el número de la línea donde se encuentra. | |
| Respuesta: | SuNcO |
| Si, se puede con Api's
Este codigo requiere 2 Labels (Label1,Label2), un Timer con Interval de 100 y por supuesto un TextBox (Text1) En el Label 1 se va a poner cuantas lineas tiene el TextBox y en el Label2 se pone en cual linea estas actualmente Private Declare Function SendMessage Lib "user32" _ Alias "SendMessageA" _ (ByVal hwnd As Long, _ ByVal wMsg As Long, _ ByVal wParam As Long, _ lParam As Any) As Long Private Const EM_LINEFROMCHAR = &HC9 Private Const EM_GETLINECOUNT = &HBA Sub Text1_Change() Dim lineCount As Long On Local Error Resume Next 'get/show the number of lines in the edit control lineCount = SendMessage(Text1.hwnd, EM_GETLINECOUNT, 0&, ByVal 0&) Label1.Caption = Format$(lineCount, "##,###") Dim currLine As Long On Local Error Resume Next currLine = SendMessage(Text1.hwnd, EM_LINEFROMCHAR, -1&, ByVal 0&) + 1 Label2.Caption = Format$(currLine, "##,###") End Sub Private Sub Timer1_Timer() Dim lineCount As Long On Local Error Resume Next 'get/show the number of lines in the edit control lineCount = SendMessage(Text1.hwnd, EM_GETLINECOUNT, 0&, ByVal 0&) Label1.Caption = Format$(lineCount, "##,###") Dim currLine As Long On Local Error Resume Next currLine = SendMessage(Text1.hwnd, EM_LINEFROMCHAR, -1&, ByVal 0&) + 1 Label2.Caption = Format$(currLine, "##,###") End Sub Por supuesto, fuera mas sencillo si el Foro permitiera subir Archivos (creo que ya se esta trabajando en ello) | |
| Pregunta: | 44412 - DAR PRIORIDAD A UN PROCESO EN LA CPU |
| Autor: | Ismael |
| Tengo un programa que me transmite tramas por el puerto serie y necesito que sea cada 20 milisegundos al tener que ejecutar varios programas simultaneamente como el mio necesita atender a los sockets el tiempo se alarga de 20 a 100 milisegundos, ¿Hay alguna forma de aumentar la prioridad de mi proceso? ¿Se puede poner mas prioridad en la CPU de este proceso sobre los demás? Se acepta cualquier idea | |
| Respuesta: | Boluart Bedoya |
| MIra aqui te paso parte del código que yo uso para darle prioridades a mi programa en este caso uso GetCurrentProcess para obtener el proceso actual (el de mi programa) si quieres puedes darle cualquier otro proceso que se este ejecutando en ese momento y darle la prioridad que deseas
Const THREAD_BASE_PRIORITY_IDLE = -15 Const THREAD_BASE_PRIORITY_LOWRT = 15 Const THREAD_BASE_PRIORITY_MIN = -2 Const THREAD_BASE_PRIORITY_MAX = 2 Const THREAD_PRIORITY_LOWEST = THREAD_BASE_PRIORITY_MIN Const THREAD_PRIORITY_HIGHEST = THREAD_BASE_PRIORITY_MAX Const THREAD_PRIORITY_BELOW_NORMAL = (THREAD_PRIORITY_LOWEST + 1) Const THREAD_PRIORITY_ABOVE_NORMAL = (THREAD_PRIORITY_HIGHEST - 1) Const THREAD_PRIORITY_IDLE = THREAD_BASE_PRIORITY_IDLE Const THREAD_PRIORITY_NORMAL = 0 Const THREAD_PRIORITY_TIME_CRITICAL = THREAD_BASE_PRIORITY_LOWRT Const HIGH_PRIORITY_CLASS = &H80 Const IDLE_PRIORITY_CLASS = &H40 Const NORMAL_PRIORITY_CLASS = &H20 Const REALTIME_PRIORITY_CLASS = &H100 Private Declare Function SetThreadPriority Lib "kernel32" (ByVal hThread As Long, ByVal nPriority As Long) As Long Private Declare Function SetPriorityClass Lib "kernel32" (ByVal hProcess As Long, ByVal dwPriorityClass As Long) As Long Private Declare Function GetThreadPriority Lib "kernel32" (ByVal hThread As Long) As Long Private Declare Function GetPriorityClass Lib "kernel32" (ByVal hProcess As Long) As Long Private Declare Function GetCurrentThread Lib "kernel32" () As Long Private Declare Function GetCurrentProcess Lib "kernel32" () As Long Private Sub Form_Load() Dim hThread As Long, hProcess As Long hThread = GetCurrentThread hProcess = GetCurrentProcess SetThreadPriority hThread, THREAD_PRIORITY_LOWEST SetPriorityClass hProcess, IDLE_PRIORITY_CLASS Me.AutoRedraw = True Me.Print "Current Thread Priority:" + Str$(GetThreadPriority(hThread)) Me.Print "Current Priority Class:" + Str$(GetPriorityClass(hProcess)) End Sub | |
| Pregunta: | 44430 - ERROR ADODC AL INSTALAR MI PROGRAMA EN OTRO ORDENADOR |
| Autor: | DIEGO |
| Cuando instalo mi programa (en visual 6) en algunos ordenadores, me aparece un error en mi objeto adodc:("No es un archivo compuesto valido").
Todos los equipos en los que lo he probado tienen windows xp actualizado, tanto en los que funciona como en los que no. La instalacion la realizo con visual studio installer. Alguien me puede ayudar?? GRACIAS. | |
| Respuesta: | SuNcO |
| Jamas habia visto ese mensaje de error. Hace poco tuve un error con el Adodc; lo que pasaba es que el Visual Studio Installer no me detectaba la Referencia del Adodc.. de hecho si la detectaba pero el problema era que no la registraba en el Registro de Windows
Intenta registrandola manualmente con "regsvr32 dao350.dll" | |
| Pregunta: | 44437 - RESOLVER HOSTNAME CON WINSOCK |
| Autor: | Michael Grey |
| Buenos dias;
Estoy creando un Explorador con Visual Basic. Utilizo el Winsock para hacer las transacciones TCP/IP. Quiciera saber como resolver un Hostname a IP. Ejemplo: RemoteHostName="www.paparapa.com.ar" Deseo obtener la IP (con un DNS?). Remoteip="xxx.xxx.xxx.xxx" Para luego conectarme a esa pagina. Desde ya muchas gracias, | |
| Respuesta: | SuNcO |
| Si utilizas el control WinSock no veo la necesidad de convertir el Host a Ip ya que segun los muchos programas donde utilizo Host o Ip me funciona bien
WinSock1.RemoteHost = "www.hotmail.com WinSock1.RemoteHost = "207.46.107.35" Las 2 maneras me funcionan bien en distintos programas Si no, intenta con la Propiedad RemoteHostIp | |
| Pregunta: | 44458 - CORTE DE PAPEL PARA IMPRESORAS DE TICKETS |
| Autor: | MIGUEL ANGEL PRECIADO MOSQUERA |
| HOLA HE DESARROLLADO UN PROGRAMA APLICATIVO PERO CUANDO FUI A INSTALARLO ME COLOCARON PARA INSTALARLE UNA IMPRESORA DE TICKETS PERO ESTA TIENE UNA CUCHILLA DE CORTE DE PAPEL Y EL PROGRAMA IMPRIME NORMALMENTE EL RECIBO PERO NO HE PODIDO CONFIGURARLA PARA QUE CORTE EL PAPEL NO SE QUE HACER POR EL MOMENTO , ES UNA EPSON EPSON TM-U210 /ECP QUIEN ME PUEDA COLABORAR CON EL CODIGO QUE HASTA AHORA NO HE PODIDO HACERLA QUE HAGA EL CORTE DE PAPEL DESPUES DE LA IMPRESION .
GRACIAS..... | |
| Respuesta: | Maximiliano Colace |
| El corte de papel en las Epson es Chr(27)+"i"
Yo lo uso con el mscomm. mscomm1.Output = Chr(27) + "i" Saludos. | |
| Respuesta: | Luis Bueno |
| Hola :
Mira una vez Yo hice una aplicacion con una impresora termina OLIVETTI con la opcion para cortar. Tienes 2 Opciones usandola instalando por Driver o Utilizando los comandos atraves del puerto serial de la impresora... Yo use la 2a opcion porq es mas rapido.......a los drivers instalados usando el mscomm caracter + chr(10) + chr(13) La verdad ahoritra no lo tengo el codigo a la mano..Lo hice el 2000.. | |
| Respuesta: | guafrido |
| Yo tengo una impresora de etiquetas, aunque no es de esa marca. Normalmente esa opción que dices puede estar en el propio driver de la impresora. En la mía por ejemplo basta con meterle el modificador /C en la caja de texto de opciones del propio driver. Probablemente encuentres la respuesta en el manual del fabricante.
Un saludo. | |
| Pregunta: | 44466 - PERMISOS PARA COPIAR Y BORRAR BASE DE DATOS EN W. 2000 SERVE |
| Autor: | Agustín Dávila Martín |
| Hola buenas, mi problema es que tengo una aplicación en visual basic que está conectada a una base de datos access que está en un servidor. La carpeta donde se halla la base de datos tiene todos los permisos porque sino no me deja conectarme a la base de datos desde la aplicación; y claro,a esa base de datos puede acceder cualquiera y se la puede copiar o la puede borrar. Ya he intentado restringir permisos para esa carpeta, pero si lo hago después no me deja conectarme con la aplicación, la conectividad está en DAO 3.6, ¿ hay alguna manera de restringir permisos a la carpeta o a la base de datos pero que me deje trabajar con la aplicación ? | |
| Respuesta: | Tomas Fermin |
| Hola Soy tomas fermin, mira creo que la mejor manera de hacer eso es creando un campo en la todas la tablas de la base de datos, digo esto por que creo que si un una aplicación trabaja en red debe tener diversos accesos con los diferentes usuarios y con permisos explicitos, en fin lo que quiero decir es que con el campo que te dije que hicieras en todas las tablas podras manejar lo diferentes permisos de los usuarios que ingresen al sistema o aplicación, en estos campos podras poner una determinante de permisos, que dependiendo del ususrio que inicie tendra acceso o no a la información en la base de datos...
Creo que es la manerta mas logica de hacer eso... | |
| |< << 251 252 253 254 255 256 257 258 259 260 261 >> >| |
