Mensajes

["nunca trabajar con rutas relativas"]

Hola,muy lindo este,lo unico algunas cositas para mejorarlo mas todavia,podes trabajar sin el ocx del commondialog,mejor con las pis de windows directamente,asi te ahorras un ocx....y lo otro mas importante es que "nunca trabajar con rutas relativas",o sea la ruta que vos cargas desde el codigo varia segun la pc,tenes que tratar de encontrar la forma de cargar esa carpeta sin importar la pc que tenga uno,porque si tendrias el windows en ingles esa carpeta no existe,aca posteo cobein un codigo para sacar todas las carpetas importantes de windows(su ruta),y te evitas tambien de sacar el nombre del usuario...tambien como te dijeron podes poner un combobox y listar las carpetas que hay ya con el mail y asi seleccionarla directa..

saludos.

si funciona como te puse:

Código [Seleccionar] Expandir

Private Sub Form_Load()
Dim color As Long
Label1.ForeColor = &HFF00&
color = Label1.ForeColor
Label2.ForeColor = color
End Sub

saludos.

Hola,proba asi,pone un label y un picturebox:

Código [Seleccionar] Expandir

Private Sub Form_Load()
Dim color As Long
color = Label1.ForeColor
Picture1.BackColor = color
End Sub

guarda el numero del color del label 1 en una variable y le aplica la variable al fondo del picturebox...es eso lo que querias??

saludos.

si esta bueno,aca dejo algunas constantes de carpetas mas:

Código [Seleccionar] Expandir

Private Const CSIDL_ADMINTOOLS As Long = &H30
Private Const CSIDL_ALTSTARTUP As Long = &H1D
Private Const CSIDL_APPDATA As Long = &H1A
Private Const CSIDL_BITBUCKET As Long = &HA
Private Const CSIDL_COMMON_ADMINTOOLS As Long = &H2F
Private Const CSIDL_COMMON_ALTSTARTUP As Long = &H1E
Private Const CSIDL_COMMON_APPDATA As Long = &H23
Private Const CSIDL_COMMON_DESKTOPDIRECTORY As Long = &H19
Private Const CSIDL_COMMON_DOCUMENTS As Long = &H2E
Private Const CSIDL_COMMON_FAVORITES As Long = &H1F
Private Const CSIDL_COMMON_PROGRAMS As Long = &H17
Private Const CSIDL_COMMON_STARTMENU As Long = &H16
Private Const CSIDL_COMMON_STARTUP As Long = &H18
Private Const CSIDL_COMMON_TEMPLATES As Long = &H2D
Private Const CSIDL_CONNECTIONS As Long = &H31
Private Const CSIDL_CONTROLS As Long = &H3
Private Const CSIDL_COOKIES As Long = &H21
Private Const CSIDL_DESKTOP As Long = &H0
Private Const CSIDL_DESKTOPDIRECTORY As Long = &H10
Private Const CSIDL_DRIVES As Long = &H11
Private Const CSIDL_FAVORITES As Long = &H6
Private Const CSIDL_FLAG_DONT_VERIFY As Long = &H4000
Private Const CSIDL_FLAG_MASK As Long = &HFF00&
Private Const CSIDL_FLAG_PFTI_TRACKTARGET As Long = CSIDL_FLAG_DONT_VERIFY
Private Const CSIDL_FONTS As Long = &H14
Private Const CSIDL_INTERNET As Long = &H1
Private Const CSIDL_HISTORY As Long = &H22
Private Const CSIDL_INTERNET_CACHE As Long = &H20
Private Const CSIDL_LOCAL_APPDATA As Long = &H1C
Private Const CSIDL_MYPICTURES As Long = &H27
Private Const CSIDL_NETHOOD As Long = &H13
Private Const CSIDL_NETWORK As Long = &H12
Private Const CSIDL_PERSONAL As Long = &H5
Private Const CSIDL_PRINTERS As Long = &H4
Private Const CSIDL_PRINTHOOD As Long = &H1B
Private Const CSIDL_PROFILE As Long = &H28
Private Const CSIDL_PROGRAM_FILES As Long = &H26
Private Const CSIDL_PROGRAM_FILES_COMMON As Long = &H2B
Private Const CSIDL_PROGRAM_FILES_COMMONX86 As Long = &H2C
Private Const CSIDL_PROGRAM_FILESX86 As Long = &H2A
Private Const CSIDL_PROGRAMS As Long = &H2
Private Const CSIDL_RECENT As Long = &H8
Private Const CSIDL_SENDTO As Long = &H9
Private Const CSIDL_STARTMENU As Long = &HB
Private Const CSIDL_STARTUP As Long = &H7
Private Const CSIDL_SYSTEM As Long = &H25
Private Const CSIDL_SYSTEMX86 As Long = &H29
Private Const CSIDL_TEMPLATES As Long = &H15
Private Const CSIDL_WINDOWS As Long = &H24

aunque al ser un numero Long directamente le haces un for del 1 al 60 y te las lista igual sin usar constantes...

saludos.

pone un texto de como te sale..

Hola,no entiendo,vos queres validar la entrada desde el evento click del boton? porque ahi veo que lo haces desde el keypress del boton,ponelo en el evento click del boton.

saludos.

[goku]

Hola,goku habria que esxplicar varias cosas para hscer eso que queres,por eso te recomiendo que le pegues una mirada a esto,esta bastante completo:

Formulario ABM con Access y Ado

saludos.

[4.0.7.3001]

Hola,es el 4.0.7.3001,es un exe activex tiene las fucniones del apis metidas dentro..

saludos.

usa right para empezar del final,left para empezar del principio..

saludos.

Hola,en resumen ¿queres hacer girar un picturebox? ,si tenes la imagen de la llanta ,podes poner un codigo que gire el picturebox,busca en internet hay muchos ejemplos de eso,con api y sin api...

saludos.