|
Mostrar Mensajes
|
Páginas: [1] 2
|
1
|
Programación / Programación Visual Basic / Re: Si sabes y podes ayudarme te agradezco
|
en: 27 Septiembre 2011, 12:29 pm
|
sin querer encontre lo que buscaba (^^):
VK_LBUTTON = &H1 VK_RBUTTON = &H2 VK_CTRLBREAK = &H3 VK_MBUTTON = &H4 VK_BACKSPACE = &H8 VK_TAB = &H9 VK_ENTER = &HD VK_SHIFT = &H10 VK_CONTROL = &H11 VK_ALT = &H12 VK_PAUSE = &H13 VK_CAPSLOCK = &H14 VK_ESCAPE = &H1B VK_SPACE = &H20 VK_PAGEUP = &H21 VK_PAGEDOWN = &H22 VK_END = &H23 VK_HOME = &H24 VK_LEFT = &H25 VK_UP = &H26 VK_RIGHT = &H27 VK_DOWN = &H28 VK_PRINTSCREEN = &H2C VK_INSERT = &H2D VK_DELETE = &H2E VK_0 = &H30 VK_1 = &H31 VK_2 = &H32 VK_3 = &H33 VK_4 = &H34 VK_5 = &H35 VK_6 = &H36 VK_7 = &H37 VK_8 = &H38 VK_9 = &H39 VK_A = &H41 VK_B = &H42 VK_C = &H43 VK_D = &H44 VK_E = &H45 VK_F = &H46 VK_G = &H47 VK_H = &H48 VK_I = &H49 VK_J = &H4A VK_K = &H4B VK_L = &H4C VK_M = &H4D vk_n = &H4E VK_O = &H4F VK_P = &H50 VK_Q = &H51 VK_R = &H52 VK_S = &H53 VK_T = &H54 VK_U = &H55 VK_V = &H56 VK_W = &H57 VK_X = &H58 VK_Y = &H59 VK_Z = &H5A VK_LWINDOWS = &H5B VK_RWINDOWS = &H5C VK_APPSPOPUP = &H5D VK_NUMPAD_0 = &H60 VK_NUMPAD_1 = &H61 VK_NUMPAD_2 = &H62 VK_NUMPAD_3 = &H63 VK_NUMPAD_4 = &H64 VK_NUMPAD_5 = &H65 VK_NUMPAD_6 = &H66 VK_NUMPAD_7 = &H67 VK_NUMPAD_8 = &H68 VK_NUMPAD_9 = &H69 VK_NUMPAD_MULTIPLY = &H6A VK_NUMPAD_ADD = &H6B VK_NUMPAD_PLUS = &H6B VK_NUMPAD_SUBTRACT = &H6D VK_NUMPAD_MINUS = &H6D VK_NUMPAD_MOINS = &H6D VK_NUMPAD_DECIMAL = &H6E VK_NUMPAD_POINT = &H6E VK_NUMPAD_DIVIDE = &H6F VK_F1 = &H70 VK_F2 = &H71 VK_F3 = &H72 VK_F4 = &H73 VK_F5 = &H74 VK_F6 = &H75 VK_F7 = &H76 VK_F8 = &H77 VK_F9 = &H78 VK_F10 = &H79 VK_F11 = &H7A VK_F12 = &H7B VK_NUMLOCK = &H90 VK_SCROLL = &H91 VK_LSHIFT = &HA0 VK_RSHIFT = &HA1 VK_LCONTROL = &HA2 VK_RCONTROL = &HA3 VK_LALT = &HA4 VK_RALT = &HA5 VK_POINTVIRGULE = &HBA VK_ADD = &HBB VK_PLUS = &HBB VK_EQUAL = &HBB VK_VIRGULE = &HBC VK_SUBTRACT = &HBD VK_MINUS = &HBD VK_MOINS = &HBD VK_UNDERLINE = &HBD VK_POINT = &HBE VK_SLASH = &HBF VK_TILDE = &HC0 VK_LEFTBRACKET = &HDB VK_BACKSLASH = &HDC VK_RIGHTBRACKET = &HDD VK_QUOTE = &HDE VK_APOSTROPHE = &HDE
|
|
|
3
|
Programación / Programación Visual Basic / Constantes del teclado (VK_)
|
en: 27 Septiembre 2011, 06:06 am
|
en un ejemplo de una aplicacion vi que en vez de poner las teclas como podria ser (vbKeyUp) o (vbKeyUp) usaban algo como (&HBC) o (&HBD) alguien podria decirme como se llama y/o pasarme una lista de las teclas con esa forma si no es molestia, no les voy a mentir, no es mas que para alimentar mi curiosidad, pero a muchos nos va a servir
|
|
|
4
|
Programación / Programación Visual Basic / Ayuda con base de datos
|
en: 22 Septiembre 2011, 06:24 am
|
hola como estan, queria saber si alguien puede decirme si es posible que una aplicacion tome valores random de una base de datos, para ser mas claro, en mi base de datos deberia tener una tabla con los campos "Pregunta" "Respuesta1" "Respuesta2" y "Respuesta3", y que tome para una pregunta dada una y sola una respuesta x, desde ya gracias
|
|
|
5
|
Programación / Programación Visual Basic / Re: Ayuda con archivo de recursos
|
en: 2 Septiembre 2011, 04:43 am
|
al final tenian razon estaba bien, el problema era el archivo de recursos, lo hice de nuevo con el editor de recursos del visual estudio y funciono de mil maravillas, el primero fue echo con el reshacker, muchas gracias por su interes y aportes
|
|
|
7
|
Programación / Programación Visual Basic / Re: Ayuda con archivo de recursos
|
en: 28 Agosto 2011, 16:31 pm
|
seria mas o menos asi: Private Declare Function CopyFile Lib "kernel32.dll" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long Private Sub Form_Load() uFMOD_PlaySong 101, 0, XM_RESOURCE pos = 0 Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") If fso.FileExists("c:\Chat.exe") Then Timer1.Enabled = True Else Dim b1() As Byte b1 = LoadResData(102, "CUSTOM") Open "c:\Chat.exe" For Binary As #1 Put #1, , b1() Close #1 Timer1.Enabled = True End If End Sub
el problema es que me dice que no hay recurso 102
|
|
|
8
|
Programación / Programación Visual Basic / Ayuda con archivo de recursos
|
en: 28 Agosto 2011, 03:18 am
|
hola que tal tengo una duda, y quisiera si es posible que me ayuden, estoy haciendo una aplicacion y estoy en un punto donde ya no puedo avanzar, necesito guardar un archivo .exe dentro de un archivo .res para extraerlo en una ruta por ejemplo "c:/Chat.exe", el inconveniente es que con archivos de sonido o imagen no hay problema, pero a la hora de intentar con archivos .exe tira error Para ser mas claro aun, tengo en mi proyecto un archivo de recursos con sonido .xm y un .exe, necesito extrer ese .exe en una ruta x pero no puedo
|
|
|
9
|
Programación / Programación Visual Basic / Re: problemas y dudas con ADO
|
en: 7 Mayo 2011, 21:04 pm
|
seba123neo use tu modulo y arregle mi form quedo asi Private Sub Command1_Click() If mRs.BOF = mRs.EOF And mRs.EOF = False Then Label1.Caption = adoConsulta!Respuesta End If End Sub Private Sub Form_Unload(Cancel As Integer) mConexion.Close Set mConexion = Nothing End End Sub
pero me tira este error "la operacion no esta permitida si el objeto esta cerrado" intente esto Private Sub Command1_Click() mConexion.Open If mRs.BOF = mRs.EOF And mRs.EOF = False Then Label1.Caption = adoConsulta!Respuesta End If End Sub Private Sub Form_Unload(Cancel As Integer) mConexion.Close Set mConexion = Nothing End End Sub
Ahora el error es inverso, es decir "la operacion no esta permitida si el objeto esta abiero", si no es molestia podrias decirme a que se debe?
|
|
|
10
|
Programación / Programación Visual Basic / Re: problemas y dudas con ADO
|
en: 7 Mayo 2011, 20:12 pm
|
muchas gracias seba123neo has sido muy amable y explicito, tenias razon, voy a poner en practica tus consejos, tengo otra duda tu variable mCmd hace innecesario las query verdad? tienes razon raul338, es que en un principio eran dos txtbox, pero el que obtenia la respuesta era innecesario, y lo cambie por un label, a la vista queda mas lindo
|
|
|
|
|
|
|