aromman

Tienes que agregarle el nombre de la librería (o modulo como lo llamas) y vas a ver que anda bien. Dim coleccion As New Modulo1.Tests 'Tests es una clase en un modulo Dim testeando As New Modulo2.Test 'Test es otra clase de otro modulo Sc.AddObject...

Dim iCx As ADODB.Connection Dim sSQL As String Dim rs As ADODB.Recordset sSQL = "SELECT numero FROM Clientes WHERE numero >" & text1.Text Set rs = New ADODB.Recordset rs.Open sSQL, iCx, adOpenForwardOnly, adLockReadOnly If Not (rs.EOF And rs.BOF)...

Fíjate que tienes que sacarle las comillas al select cuando concatenas el contenido de text4 ya que el campo au_id es numérico. select author from authors where authors.au_id=" & Text4

Trabaje poco con scripControl pero no me pareció muy problemático. Primero que nada si efectuaste un AddObject para agregar un objeto utilizable en tu código y definiste el lenguaje de programación, no deberías tener ningún problema. Quizás lo que te...

Tienes que hacer algo como esto. Picture1.Picture = ImageList1.ListImages.Item(1).Picture Image1.Picture = ImageList1.ListImages.Item(2).Picture Fíjate que en este código el primero asigna el item sub 1 al picture y el item sub 2 al image.

Fíjate dentro del proyecto Visual Basic a que OCX hacen referencia, esto lo podes hacer editando con un editor de texto cualquiera (notepad) el archivo .VBP busca ahí el nombre de tus OCX y chequea a donde los va a buscar, si te das cuenta puede que...

Para el label la propiedad que tienes que setear es la de BackStyle = 0 - Transparent. Para el textbox no encontré la propiedad. En cuanto al color de la progress bar lo podes cambiar fíjate en la propiedad custom, que tiene propiedades más avanzadas...

Proba con la propiedad Windowstate = Maximized del formulario MDI Child

Carlos, mira en principio esto no es una pregunta me estas pidiendo que te desarrolle la solución, por lo que te voy a pedir un poco más de datos, como por ejemplo que me envíes un copia del plano ya que no estoy seguro si lo que veo en pantalla es...

Encontré este código que te ayuda a crear un shortcut. Dim X As Long X = Shell("rundll32.exe AppWiz.Cpl,NewLinkHere " & "c:\MiDirectorio\", 1) Siendo MiDirectorio el directorio donde queremos que quede el acceso directo. Debe acabar en barra (\)....