PREGUNTAS CONTESTADAS - Visual Basic

Hay un total de 3030 Preguntas.

<< >>

Pregunta:	10288 - ¿COMO PONER EL TIPO DE LETRA Y EL COLOR EN UN MENU?
Autor:	Alejandro Palacios Pedraza
He estado mirando libros de visual basic, pero no he podido encontrar la solución a este problema,y me gustaría saber si hay alguna solución a esto.

Respuesta:

Esteban Gilberto

Hola:

Mira, lo que quieres tú es casi lo mismo que deseo hacer yo, lo que pasa es que no he tenido tiempo para verlo más detalladamente. Resulta que lo que tu deseas hacer es cambiar la configuración de los menúes de Windows, puesto que el menú de Visual se adapata al menú por defecto que posee Windows. Para cambiar esa configuración debes acceder a la famosa Api de Windows lo que significa cambiar la configuración de una o más Dll's. Si tienes un manual poderoso de Visual encontrarás un apartado sobre este tema. Bueno, espero haberte servido de algo, y si tienes alguna duda enviame un mail y si puedo te lo respondere sin ningún problema.

P.D.: Ojo que cambiar las dll's no es algo fácil.

Contestar

Pregunta:	10291 - RESULTADOS DE UN FIND EN UN DATAGRID CON DATAENVIRONMENT
Autor:	Margaret Thatcher
Necesito saber cómo visualizar los datos encontrados con el método find de un dataenvironment en un DataGrid. Pero sólamente los datos resultantes de la búsqueda. Gracias

Respuesta:	jim Miñano
no puedes mostrarlo, ya que el método find es un desplazamiento, para visualizar debes usar el método Filter. cualquier duda escribe

Contestar

Pregunta:	10302 - GUARDAR DATOS DE UN OBJETO OLE
Autor:	marcelo Zualet
Deseo desde visual crear un objeto ole(con wordpad) y guardarlo dentro de un campo de una tabla. ¿como debo realizar este procedimiento? que controles utilizo en visual y como debo definir el campo en la base de datos? por cierto para la base estoy utilizanzo Access 2000

Respuesta:

Josemari Etxagibel Alberdi

Hola, espero que te sirva de algo lo que yo hice :
En primer lugar creas un campo de tipo OBJETO OLE (ej, "Logotipo")

Código para actualizar el campo de la base de datos

DbRsEmpresa("EMail") = txtCuenta.Text
DbRsEmpresa("LogoPath") = txtLogotipo.Text
'Aquí actualizo el campo "Logotipo"
lng = GuardarImg(txtLogotipo.Text, DbRsEmpresa, "Logotipo")
DbRsEmpresa.Update

La función GuardarImg es como sigue :

'Ruta es el path del archivo a guardar

Public Function GuardarImg(Ruta As String, Tabla As DAO.Recordset, Campo As String) As Long
Dim fileSys, FileName
Dim lngOS As Long
Dim lnglS As Long
Dim ChBuf() As Byte
Const ConChSz = 100

lngOS = 0
Set fileSys = CreateObject("Scripting.FileSystemObject")
Set FileName = fileSys.getfile(Ruta)
lnglS = FileName.Size
Set FileName = Nothing
Set fileSys = Nothing
Open Ruta For Binary Access Read As #1
ReDim ChBuf(ConChSz)
Do While lngOS < lnglS
Get #1, , ChBuf()
Tabla(Campo).AppendChunk ChBuf()
lngOS = lngOS + ConChSz
Loop
Close #1
GuardarImg = lnglS
End Function

Contestar

Pregunta:	10307 - COMO GENERAR UN CONTROL NUEVO EN UN FORMULARIO
Autor:	Xavi
Me gustaria, como puedo agregar en tiempo de ejecucion un control nuevo en un formulario.

Respuesta:	Antonio
he descubierto que se pueden crear controles sin necesidad de tener uno inicial en el formulario con: controls.add("VB.Shape") // para crear un control shape un saludo.

Contestar

Pregunta:	10309 - DIBUJAR CON EL MOUSE EN UNA FORMA O PICTUREBOX
Autor:	Genaro Sanchez
Hola todos, como puedo hacer para dibujar con el mouse en la forma o mejor aun en un picturebox. Lo que necesito hacer es capturar la firma de un cliente, luego grabarla a un BMP, por eso creo que seria mejor en un picture box. Alguien que me pueda ayudar. Gracias

Respuesta:	SuNcO Castañeda
Bueno mi chavo, aki te mando un .OCX ke hace eso ke tu kieres y junto a el un ejemplo preciso El .OCX como ya sabes ponlo en c:\windows\system Descargar

Respuesta:	SuNcO Castañeda
Bueno mi chavo, aki te mando un .OCX ke hace eso ke tu kieres y junto a el un ejemplo preciso El .OCX como ya sabes ponlo en c:\windows\system Descargar

Respuesta:

Santiago Franchi

Esto es fácil. Agrega el siguiente código al formulario:

Option Explicit
Dim Apretado As Boolean

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.CurrentX = X
Picture1.CurrentY = Y
Apretado = True
End Sub

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Apretado Then Picture1.Line -(X, Y)
End Sub

Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Apretado = False
End Sub

Respuesta:	Jim Miñano
para dibujar: en el evento mousemove del picture picture1.pset (x,y) si aun estas interezado escribeme bye bye

Contestar

Pregunta:	10325 - SELECCIONAR FILAS EN UN DBGRID
Autor:	Patricio
Hola! me gustaría saber como se puede SELECCIONAR UNA FILA de un DbGRid POR CÓDIGO, porque según la ayuda de Visual Basic 5.0 dice que existen las propiedades SelStartCol, SelEndCol, SelStartRow y SelEndRow para seleccionar. Pero dos de esas propiedades no me aparecen y no se como seleccionar una fila. Espero que me puedan ayudar... desde ya muchas gracias...

Respuesta:

Santiago Fernandez

Declara una variable de tipo variant. Despues el dbgrid tiene la propiedad SelBookmarks que devuelve una
referencia a la fila seleccionada. Supongo que el dbgrid esta asociado a un data pues ya tendrias el contenido
en cada uno de los campos que representa el data.

Dim sbk As Variant

Set sbk = DBGridProvincias.SelBookmarks

If sbk.Count <> 0 Then
'Para cuando se active de nuevo el formulario
Provincia = DataProvincias.Recordset!Cod_Provincia
Else
MsgBox "Seleccione un registro.", vbExclamation, "Atención"
End If

Ahora bien en sbk(0) tendrias toda la fila.

Si haces Set DataProvincias.Recordset.Bookmark = sbk(i) siendo i el numero
de fila seleccionada (0, 1,2...) entonces ahora ya tendias en el Data la referencia de la fila
y ya podrias acceder a cada uno de los campos del data.

Espero que te sirva, cualquier duda ahí tienes mi correo.

Saludos, Santiago

Contestar

Pregunta:	10327 - COMO CONVERTIR UN PROYECTO EN VB 60 A HTML (PáGINA WEB)
Autor:	Werner Rupay Alva
De antemano muchas gracias por la ayuda, Tengo actualmente un proyecto en VB 6.0 que contiene aproximadamente 6 formularios, nesecito llevarlo a un editor puede ser al FrontPage para manejarlo como si fuera una página web, e oido que es posible realizar mi pregunta es COMO...? Gracias

Respuesta:	Juan Palma
Existe un programa llamado frm2html que transforma un archivo de formulario de Visual Basic 6 en un archivo html, pero te advierto que hace cosas extrañas, y casi nunca el html se queda como quieres. Pruébalo, a lo mejor te sirve.

Contestar

Pregunta:	10331 - ERROR AL REGISTRAR CONTROL
Autor:	Juan Fco. T.
Mi problema es el siguiente,yo tengo el visual basic 6.0 CD lo instale en mi PC, todo estaba muy bien realice varios sistemas, y reportes con el diseñador nuevo que trae, resulta que tuve un problema con el access y tuve que volverlo a instalar, y ahora ejecuto el VB para modificar los reportes del sistema que hice, pero me marca el siguiente error: "No SE ENCONTRO LA INFORMACIÓN DE LICENCIA PARA ESTE COMPONENTE. NO TIENE UNA LICENCIA APROPIADA PARA USAR ESTA FUNCIONALIDAD EN EL ENTORNO DE DISEÑO" solamaente con el data report me marca eso,si quiero agregar un data report me marca el mismo problema, por favor necesito ayuda, me urge,gracias.

Respuesta:	Guillermo Molina
En el sitio de microsoft busca un parche para este problema, yo ya pase por esto

Contestar

Pregunta:	10360 - COMO DESACTIVAR EL FLOPPY???
Autor:	Antonio Perez
Como puedo desactivar el floppy para tener una seguridad para que no graben en disco solo atraves de un password o algo similar a este tipo de seguridad esto claro en visual basic......

Respuesta:

Paco .

prueba a utilizar esta funcion

Function HayDisket() As Boolean
On Error GoTo Error

HayDisket = False
ChDrive "A"
HayDisket = False
ChDrive "C" ' para que proximo intento funcione correctamente
Exit Function
Error:
ChDrive "C" ' para que proximo intento funcione correctamente
Exit Function

de esta manera te aseguras que cuando intenten acceder al disquete simpre considere que no esta introducido.

Espero que te sirva

Un saludo

Contestar

Pregunta:	10362 - COMO MOVER UN OBJETO "IMAGE"
Autor:	sergio lillo
Deseo mover un objeto Image1 de un lugar a otro de la pantalla. Como puedo lograr fijar el objeto, en tiempo de ejecuciòn?

Respuesta:	José Ariel Limandri
usa las propiedades left y top o el metodo move

Respuesta:	SuNcO Castañeda
Eso es muy facil mi chavo, ahi te va : Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 1 Then Image1.Left = Image1.Left + X Image1.Top = Image1.Top + Y End If End Sub

Contestar

|< << 111 112 113 114 115 116 117 118 119 120 121 >> >|