PREGUNTAS CONTESTADAS - visual basic

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  2838 - COMO PUEDO CREAR UN COOLBAR
Autor:  Carlos Muñoz
Les agradeceria que por favor me orienten a realizar un CoolBar.
  Respuesta:  Juan Pablo Drexler
El COOLBAR está compuesto de varias "Bands", que se pueden agregar o remover según la conveniencia del programador.
Pero, ¿qué es un CoolBar?.
Bien, una CoolBar no es más que un contenedor de otros controles.
Por lo tanto, para crear una barra de herramientas "Cool" (que, si no me equivoco, es el motivo de su pregunta), debe crear un control TOOLBAR dentro del CoolBar (de la misma forma en que ubica un control en un FRAME). De esa forma puede crear una barra de herramientas Cool.
El último paso es asociar ese objeto TOOLBAR a una de las "Bands" de la CoolBar. En ese momento, el control TOOLBAR se adaptará al tamaño del "Band" asociado.

    Pregunta:  2842 - GRAFICOS 3D
Autor:  Edwin Pineda C
Quiero aprender a hacer graficos tridimensionales, empezando por construir el plano cartesiano con coordenadas x, y, z, quiero realizar graficas o matrices, tambien quiero rotar el plano con la grafica, es decir quiero aprender a programar en esta parte desde visual, sin necesidad de controles complicados, quiero programarlo

gracias
  Respuesta:  Julio Antonio Farfan Rondón
Mira hacer gráficos en 3d con vb es sencillo, sólo tienes que crear (con un poco de imaginación) a partir del plano x,y tu propio espacio en 3d (x,y,z).
Para eso trabaja con las siguientes ecuaciones:
x=x
y=y
z=f(x,y)
a=i+j
b=(i-j)*m
c=z+b
i=+-sqr(x^2/2)
j=+-sqr(y^2/2)
Ahora abre un picturebox y dos botones (ejecutar y salir)
El código es:

Private Function z(x, y)
z = -0.1 * (x ^ 2 + Sin(y))
End Function

Private Sub Command1_Click()
Picture1.Scale (-10, 10)-(10, -10)
m = 0.25 'pendiente
d = 0.5 'separación de lineas
For t = -6 To 6 Step d
For u = -6 To 6 Step d
x = t
y = u
X1 = t + d
Y1 = u + d
If x >= 0 Then i = -Sqr(x ^ 2 / 2)
If x <= 0 Then i = Sqr(x ^ 2 / 2)
If y >= 0 Then j = Sqr(y ^ 2 / 2)
If y <= 0 Then j = -Sqr(y ^ 2 / 2)
If X1 >= 0 Then i1 = -Sqr(X1 ^ 2 / 2)
If X1 <= 0 Then i1 = Sqr(X1 ^ 2 / 2)
If Y1 >= 0 Then j1 = Sqr(Y1 ^ 2 / 2)
If Y1 <= 0 Then j1 = -Sqr(Y1 ^ 2 / 2)
a = i + j
a1 = i1 + j
a2 = i + j1
b = (i - j) * m
b1 = (i1 - j) * m
b2 = (i - j1) * m
c = z(x, y) + b
c1 = z(X1, y) + b1
c2 = z(x, Y1) + b2
If t <= 6 - d Then Picture1.Line (a, c)-(a1, c1)
If u <= 6 - d Then Picture1.Line (a, c)-(a2, c2)
Next u
Next t
End Sub

P.D. si te ha servido, responde, también puedes hacer que la figura rote, gire, etc, y hacer cualquier tipo de gráfico (coordenadas cilindricas, esféricas, etc). Yo soy un autodidacta, si sabes como puedo reducir el código (utilizando arrays) avisame.
  Respuesta:  Roberto Morales
Para este tipo de graficos 3d te puedo recomendar que aprendas a utilizar DirectX dentro de visual basic, pero programar en DirectX no es tan facil ya que se trata de un lenguaje de bajo nivel que se comunica directamente con la tarjeta gráfica para hacer de manera rápida todos los procesos 3d inclusive te permite hacer Render(o representaciones),programando en direct X puedes llegar inclusive a hacer juegos en 3d.O bien puedes hacerlo desde Pascal o lenguaje ensamblador, ya que el codigo es mucho mas rapido.

Puedes utilizar esta formula para representar puntos en la pantalla
A(x,y)-Suponiendo que a es un punto en la pantalla, el secreto esta en la distancia,
es decir dar la apariencia de que un punto esta lejos o bien un punto esta cerca, para esto vamos a suponer el ojo a una distancia a(a minúscula), la formula para la ordenada y abcisa seria:
x=(a.y)/z
y=(a.x)/z

a- es la distacia de el ojo hasta la pantalla o monitor
z- es la distancia a la que esta el punto de la pantalla hasta el fondo de la pantalla en el plano virtual z.

Para la rotacion del eje x utiliza esta fórmula:
x´=x
y´=y*cos(a)-z*sin(a)
z´=y*sin(a)+z*cos(a)
Matriz
1 0 0
0 cos(a) -sin(a)
0 sin(a) cos(a)


Para rotación del eje y:
x´=x*cos(a)+z*sin(a)
y´=y
z´=-x*sin(z)+z*cos(a)

Matriz
cos(a) 0 sin(a)
0 1 0
-sin(a) 0 cos(a)


Para rotación del eje z:

x´=x*cos(z)-y*sin(a)
y´=x*sin(a)+y*cos(a)
z´=z

Matriz
cos(a) -sin(a) 0
sin(a) cos(a) 0
0 0 1

    Pregunta:  2848 - ERROR CON CRYSTAL REPORT. LIBRERIA PDIRDAO.DLL
Autor:  Juan Antonio Gomez Felipe
En una aplicación de VB5 llamo a un informe de Crystal Report 7. El informe coge los datos de una B.D Access y tiene 3 subinformes.
Al ejecutarlo se produce el error File Could not be opened because the library "PDIRDAO.DLL" not found. En otra ventana aparece "Error opening file File Could not be opened "listado" at file localiton "C:\ ... .mdb" Sin embargo al aceptar estos errores consigue sacar el listado. ¿Tengo que incluir esta libreria en el SETUP de la aplicación? ¿A que se debe este error?. Gracias.
  Respuesta:  Luis Rodrigo Solorzano Monroy
hola te saludo desde guatemala,

esa dll. ubica el path de tu informe, es muy probable que lo soluciones asignando en el set location del de la Database

ok asi :
en el menu vas a dababase\set location
luego en el boton de (set location) y listo..
en la version 8 te aparecen un listado de dns no recuerdo si en el 7 tambien, pero buscas las tablas a tu izquierda y le asignas el set..
espero te sirva..

puedes enviarme un email si gustas..

    Pregunta:  2863 - ALINEACIÓN EN GRID
Autor:  Christian Valeria Celedón
¿Cómo puedo centrar el título de una columna de un control DBGrid sin que también se centren los datos?
  Respuesta:  Sergio Raimundo
Para alinear las cabeceras de un DBGRID conozco dos formas, la primera mas rápida fácil y obviamente casera es hacer click derecho en el dbgrid y entrar en las propiedades del control, en la solapa “Columnas” y en la propiedad “Caption” pondremos tantos espacios como sea necesarios para centrar el título de cada columna del grid. La otra mas larga y con mucho mas código lo encontraras en www.eidos.es/VeXPERT/Articles/vb_dbgrid1.html, de todas formas vale la pena ingresar en la página tiene un par de cosas interesantes

    Pregunta:  2866 - COMO MANIPULAR EL SPEAKER DE LA COMPUTADORA?
Autor:  Marco Antonio Navarro Félix
El problema que tengo es que necesito manipular el sonido del Speaker de la Computadora porque hay computadoras que NO tienen Multimedia y en esos casos no me sirve de nada Tocar un Wav o un Midi. En QBasic existe un comando que se llama SOUND pero al parecer Visual Basic no lo tiene.

Si alguien sabe como hacerlo le agradecere que me ayude.
  Respuesta:  Xavi
la instruccion para hacer sonar el speaker es Beep, pero no puedes cambiar la duración ni la frecuencia.
Parece que solo se puede hacer en NT con esta API
Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
En W95 no da error pero no hace caso de los parametros.

    Pregunta:  2874 - COMO ESCUCHAR PISTAS DEL CD EN VB5.0
Autor:  Ignacio Javier Forciniti
Mi pregunta es como puedo hacer para leer los tracks de un CD. Intenté con el control MCI pero no pude hacer que lea por traks, solo lee por pistas del CD. Preferiría que fuera mediante APIs. Gracias por tu respuesta. Ignacio Forciniti.
  Respuesta:  Pablo Fahnle
Hola!, yo hice en un curso de VB5, un prograpa para escuchar sonidos mediante API, con opciones de loop y todo eso, si querés te mando el archivo comprimido con zip, mandame un mail si lo querés.
saludos, pablo.

    Pregunta:  2885 - ERROR CON LA FUNCION FILESYSTEMOBJECT
Autor:  MIKEL POZA SANZ
Tengo una aplicación en VB6.0 que utiliza el objeto FileSystemObject y me va perfectamente en el PC en donde tengo instalado VB. He utilizado el asistente de empaquetado y distribución para generar un instalable y lo he ejecutado en otro PC.
Cuando voy a ejecutar el programa me suelta el error
"Error 429 en tiempo de ejecución"
"El componente Active X no puede crear el objeto"
y se sale del programa
¿Que dll me falta para que me este dando este error?
Gracias
  Respuesta:  Mikel Poza
La dll que no encuentra corresponde a "Windows Scripting Components". Que yo sepa, no se instala con Visual Basic, por lo que necesitas instalarla por separado. En http://msdn.microsoft.com/scripting/ puedes encontrar todo lo que necesitas acerca de estos componentes.
  Respuesta:  Oswaldo Monagas
Amigo. Revisa cuidadosamente los componentes en tu proyecto, esto lo haces por Proyecto\Componentes y en esta carpeta seleccionas Solo Seleccionados y veras los componentes con el cual tu programa esta trabajando, tal vez agregaste algun componente ActiveX en tu proyecto y necesitas ese componente incluirlo en los instaladores para que tu programa funcione correctamente en otra computadora. Una vez que generes el kit de instalacion fijate que componentes deverias incluir utilizando como base los que tu proyecto requiere.
Espero que te sirva
Oswaldo

    Pregunta:  2887 - PROGRAMADOR DE TAREAS DE WINDOWS.
Autor:  Jaime Sancez
Me gustaria sabe si se puede agregar una tarea en el Programador de Tareas de Windows por medio de codigo o modificando el registro, es decir, sin necesidad de utilizar el asistente. Gracias.
  Respuesta:  Francisco J. Alanis
Bueno, algo que puedes hacer es: construye en tu propia maquina la tarea que quieres que tu programa agregue al programador de tareas. Ya que la hayas hecho, ve a la carpeta windows\tasks y el archivo que tenga el nombre que le diste a la tarea y que termine en .job es tu archivo. Lo agarras y lo distribuyes con tu programa. Pero si lo que quieres es hacer que tu programa genere la tarea entonces dime para pasarte la estructura del formato de los archivos *.job

Seth

    Pregunta:  2889 - IMPORTAR TABLAS DE EXCEL A ACCES
Autor:  Lupita Alvarez
Estoy programando en Visual Basic 6 y a mi me entregan un reporte mensual en Acces que genera un tarificador, por lo que yo necesito importar ese archivo a acces y de esta forma poder manipular los datos de manera mas eficiente, si alguien sabe de este procediemiento le agradeceria enormemente Gracias
  Respuesta:  Oswaldo Monagas
Amigo. Segun el titulo necesitas leer tablas de Exel en un programa VB que trabaja con Access. Si eso es correcto ahi te envio dos codigos tomados de internet donde se plantean el mismo problema.
Hoja de Excel como Recordset (repregunta)
Mensaje enviado por José Rubí de la Vega <[email protected]>
Se me olvidó comentar que puedes acceder a rangos con nombre o, lo que es más cómodo, a las hojas del libro, sólo que los nombres de éstas como "tablas" son el nombre de la homa más el signo dólar ($). Es decir, Hoja1$, Hoja2$ etc.

Dim db As Database, rs As Recordset

Set db = OpenDatabase("d:\docs\excel\libro1.xls", False, False, "excel 5.0;")
Set rs = db.OpenRecordset("Hoja1$")
While Not rs.EOF
List1.AddItem "" & rs(0)
rs.MoveNext
Wend
rs.Close
db.Close


Para acceder a rangos con nombre simplemente pones como "tabla" el nombre del rango.

At 09:17 14/02/2000 -0500, you wrote:
>la apertura del LIBRO de Excel como base de datos. El problema es que he
>tratado de utilizar el método OpenRecordset para abrir una HOJA o un rango
>de celdas con nombre y no he podido. ¿Podrías decirme cómo hacerlo, por favor?
Un saludo.
Mensaje enviado por Grenville Tryon <[email protected]>
Ojala ayude.
Conectarse a Excel como fuente de datos
Septiembre 11 de 1998
Tiene un cuaderno de Excel con tablas sencillas (encabezados y datos por columnas). Puede accesar estos datos con Visual Basic, usando un DBGrid y su Data de enlace, p.e:
Private Sub Form_Load()
With dat
.Caption = "Excel..."
.Connect = "Excel 8.0;"
.DatabaseName = "C:\miPath\miHoja.xls"
.RecordSource

    Pregunta:  2891 - COMPONENTE PARA PASAR LAS FRASES COMO UNA MARQUESINA
Autor:  José Juan González González
Qusiera saber si existe algún componente como una caja de texto o etiqueta en la cual pudiera pasar un mensaje como si fuera una marquesina
  Respuesta:  Mariano Laguzzi
´Marquecina que muestra información de apoyo.
Dim Mensaje As String * 65

Static hecho_antes As Boolean
Static msg_width As Single
Static X As Single
Mensaje = "Bienvenido/a a Distribuidora Santa Ana S.A."
If Not hecho_antes Then
msg_width = F.Picture1.TextWidth(Mensaje)
hecho_antes = True
X = F.Picture1.ScaleWidth
End If
With F.Picture1
.Cls
.CurrentX = X
.CurrentY = 0
.FontSize = 9
.FontName = "Courier New"
.FontBold = True
.FontItalic = True
F.Picture1.Print Mensaje
X = X - 30
If X < -msg_width Then
X = .ScaleWidth
End If
End With
End Sub

Donde F es nombre del un formulario, necesitas un picture, y un coltrol timer1.
Espero que te sirva.......
  Respuesta:  Luis Miguel Caballero
Existe el Marquee.OCX que me parece es de Sheridan. Sugiero que visites www.winfiles.com y busques bajo la sección programación/visual basic components
  Respuesta:  Antonio Loyola
Otra alternativa es que uses un control text o label común y uses el evento timer para ir simulando la marquesina.

|<  <<  45 46 47 48 49 50 51 52 53 54 55  >>  >|