PREGUNTAS CONTESTADAS - Visual Basic

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  42244 - COMO IMPRIMIR LA INFORMACION DE UNA FACTURA EN VB
Autor:  Luis Miguel Fontalvo Reyes
como imprimir la informacion solo de la factura sin los botones me refiero a la informacion que esta en las cajas de texto gracias por su atencion...
  Respuesta:  CESAR NAVA SOTO
Puedes utilizar el objeto Printer, ejemplo:

Printer txtTotal.Text

Utiliza las propiedades CurrentX y CurrentY para ubicar la posicion del texto.

    Pregunta:  42249 - COMO ELIMINAR ARCHIVOS .TMP EN VB
Autor:  Claudia Camacho C.
Hola a todos, espero que puedan ayudarme, tengo un proyecto en VB con reportes creados con Crystal Reports 7.0 y 8.5, al principio los reportes los creaba externos a mi proyecto (.rpt), pero noté que los equipos que tienen Win 95 y 98 cada vez que se ejecuta el mismo, se crean archivos .TMP en la raíz del disco donde se encuentra instalado mi programa, que no se eliminan al momento de salir del .exe.
Ahora que incluí reportes con CRViewer (archivos .dsr) éstos archivos .TMP se generan ni bien abro el proyecto, por lo tanto ya es un problema, toda vez que veo el explorador tengo ¡millones de éstos molestos archivos!
Revisé los ejemplos que vienen con código del Crystal Reports (y reportes .dsr) y noté que igual se crean éstos temporales, ¿saben de algún truco para eliminar éstos archivos toda vez que se cierre el reporte?
De antemano muchas gracias.
  Respuesta:  Marito
Mira Claudia, lo que podes hacer, sobre todo si conoces la ruta de los archivos, es eliminarlos con el metodo kill del objeto filesystem

filesystem.kill archivos

Contame si te anduvo.

Salu2. Mario

    Pregunta:  42250 - CODIGO PARA CONECTAR TABLAS DE ACCESS EN VISUAL BASIC
Autor:  Nestor velasco
por favor necesito saber el codigo con su respectiva explicacion de como conectar tablas de access base de datos a visual basic gracias
  Respuesta:  Milton Hans Galarce
'Desde el menu projecto agregar la referencia DAO 3.6

'Declarar variables de tipo:

Public Base As Database '----> Base de Datos
Public Tabla As Recordset '-----> Tabla de la Base

'Finalmente la coneccion sería de la siguiente manera:

Funcion()
Set Base = OpenDatabase("Ruta de la base *.mdb")

Set Tabla = Base.OpenRecordset("Tabla 1")
Fin

    Pregunta:  42253 - ELIMINAR ARCHIVOS .TMP
Autor:  Claudia Camacho
Mucho le agradeceré si me contestan a ésto : ¿el VB no debería eliminar automáticamente los archivos .TMP que se crean cuando abro un proyecto ó ejecuto su .exe, considerando que tengo VB 6.0 SP 5, utilizo ICRDesigner del Crystal 8.5?. Resulta que una vez que creo reportes con el Crystal Viewer (.dsr), siempre crea éstos archivos ya sea en la raíz del disco ó en la carpeta del ejecutable, ¿es un bug?.
Muchas gracias.
  Respuesta:  Marito
Para poder borrar archivos temporales o cualquier otro tipo de archivos utiliza el metodo Kill del objeto filesystem

filesystem.kill *.tmp

    Pregunta:  42258 - OCULTAR APLICACION DEL ADMINISTRADOR DE TAREAS
Autor:  ALEX VALENCIA AYOLA
COMO PUEDO OCULTAR UNA APLICACION DEL ADMINISTRADOR DE TAREAS PARA QUE NO SE PUEDA CERRAR AL UTILIZAR LA COMBINACION DE TECLAS CTRL + ALT +SUPR
  Respuesta:  Cecilia Colalongo
Fijate con esto:

Public Const RSP_SIMPLE_SERVICE = 1
Public Const RSP_UNREGISTER_SERVICE = 0

Public Declare Function GetCurrentProcessId Lib \"kernel32\" () As Long

Public Declare Function RegisterServiceProcess Lib \"kernel32\" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long

RegisterServiceProcess GetCurrentProcessID(), RSP_SIMPLE_SERVICE

    Pregunta:  42263 - COMO AGREGAR COMBOBOX DENTRO DEL TOOLBAR
Autor:  luis andres benites loo
como puedo ingresar un combobox dentro de un toolbar
  Respuesta:  Milton Hans Galarce
Lo que tendrías que hacer es agregar un PictureBox dentro de la ToolBar y dentro del PictureBox agregar el ComboBox..

    Pregunta:  42328 - COMO REPRODUCIR UNA ANIMACIÓN FLASH EN VISUAL BASIC...
Autor:  David Bos
Hola amigos estoy haciendo un formulario y necesito reproducir una animación que hice en Macromedia Flash, y me gustaria saber como reproducirla cuando se carge este formulario.
  Respuesta:  marco pajuelo paredes
Es sencillo.

Simplemente tienes que tener tu archivo con extension *.swf y en visual basic llamas al componente Shockwave Flash.

Lo arrastras al formulario como cualquier otra herramienta.
Y al cargar tu formulario (form_load) o al activarse (form_activate) escribes lo siguiente:

ShockwaveFlash1.Movie = "ruta"

En "ruta" escribes la direccion en donde se encuentra tu archivo con extensión SWF.

Al final sólo presionas F5 y mira tu formulario.
  Respuesta:  Marito
Hola:
Usa el control ocx ShockwaveFlash que se encuentra en la opcion componentes del menu proyecto.

Espero te sirva. Salu2. Mario.

    Pregunta:  42340 - ¿QUE CODIGO REALIZO PARA IMPRIMIR UN FORMULARIO EN BASIC 6.0
Autor:  Andres FELIPE aRBOLEDA
necesito saber el codigo para imprimir un formulario que se llama solicitud de credito
  Respuesta:  GABRIEL ZUÑIGA
PARA IMPRIMIR EL FORMULARIO TAL CUAL SOLO TIENES QUE PONER UN BOTON Y DENTRO DE ESTE BOTON EL SIGUIENTE CODIGO

PrintForm

ESO ES TODO, Y LISTO TU FORMULARIO SALE IMPRESO CON LUJO DE DETALLES.

p.d. espero que sea lo que estas buscando

    Pregunta:  42353 - IDENTIFICAR UNIDAD DE CD-ROM Y LEER DATOS AUTOMATICAMENTE
Autor:  juan carlos sanchez
tengo un programa de fotos en el cual quiero que carge la imagen desde la unidad de cd rom, con la funcion load picture logicamente tengo que especificar la ruta ya sea d: e: como le puedo hacer para que automaticamnete reconozca la unidad y carge todo desde ahi, posiblemente pueda ser a traves de una libreria pero como soy novato no le he podido entender si me pudieran ayudar se los agradeceria
  Respuesta:  Mario Campos
Aqui te adjunto un proyecto de VB: descargar.
  Respuesta:  Heroe Exceso
Esta es la funcion que utilizo para saber que tipo de unidades tengo, tal vez te sirva....

Public Function Buscar_Unidad(Unidad_a_Obtener As Drives, Unidad_Obtenida As String) As Boolean
Dim Fs As Object
Dim Col_Unidades As Object
Dim Unidad As Object

Set Fs = CreateObject("Scripting.FileSystemObject")

Set Col_Unidades = Fs.Drives

For Each Unidad In Col_Unidades
If Unidad.drivetype = Unidad_a_Obtener Then
Select Case Unidad.drivetype
Case 0:
'"Unknown"
Unidad_Obtenida = Unidad.DriveLetter
Case 1:
'"Removable"
Unidad_Obtenida = Unidad.DriveLetter
Case 2:
'"Fixed"
Unidad_Obtenida = Unidad.DriveLetter
Case 3:
'"Network"
Unidad_Obtenida = Unidad.DriveLetter
Case 4:
'"CD-ROM"
Unidad_Obtenida = Unidad.DriveLetter
Case 5:
'"RAM Disk"
Unidad_Obtenida = Unidad.DriveLetter
End Select
Exit For
End If
Next

Buscar_Unidad = Len(Unidad_Obtenida) > 0

Set Fs = Nothing
Set Col_Unidades = Nothing
Set Unidad = Nothing
End Function

    Pregunta:  42388 - DIVIDIR UNA CADENA LETRA POR LETRA
Autor:  Carlos Esteban
Quiero dividir una cadena letra por letra de modo que cada vez que la primera letra sea una A el programa ejecute un evento.
  Respuesta:  MArito
Dim f As Integer
For f = 1 To Len(Text1.Text)
If UCase(Mid(Text1.Text, f, 1)) = "A" Then
MsgBox "hola"
End If
Next f

el msgbox "hola" lo cambias por la llamada al evento ej:

Command1_Click()

Salu2.
Cualquier cosa avisame.
Mario.

|<  <<  242 243 244 245 246 247 248 249 250 251 252  >>  >|