Hilfe die 2. ...

Dino · 28-09-2001 19:35:00

Dino
Moderator
Offline

Herkunft: DE-CIX
Registrierungsdatum: 07-12-2000
Beiträge: 491

Thema: Hilfe die 2. ...

Also whiteheard, dann halt hier. Damit ich nicht alles wiederholen muss, hier für die anderern, worum es geht: <A HREF="http://www.devshare.de/cgi-bin/ubb/ultimatebb.cgi?ubb=get_topic&f=24&t=000014" TARGET=_blank>[Post im falschen Forum]</A>Jetzt kannste aber antworten.

Ceterum censeo Ameriginem esse delendam.

braveheart · 30-09-2001 14:47:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

Ja, es geht mit der API. Das ist allerdings nicht einfach! (Ich habs noch nich probiert aber hier der Header)so, nimm das als eignes Modul in dein Projekt (könnte noch was dazu kommen):Public Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long Public Declare Function RegOpenKeyEx Lib "advapi32.dll" Alias "RegOpenKeyExA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal ulOptions As Long, _ ByVal samDesired As Long, phkResult As Long) As Long Public Declare Function RegQueryInfoKey Lib "advapi32.dll" Alias "RegQueryInfoKeyA" _ (ByVal hKey As Long, ByVal lpClass As String, lpcbClass As Long, _ ByVal lpReserved As Long, lpcSubKeys As Long, lpcbMaxSubKeyLen As Long, _ lpcbMaxClassLen As Long, lpcValues As Long, lpcbMaxValueNameLen As Long, _ lpcbMaxValueLen As Long, lpcbSecurityDescriptor As Long, lpftLastWriteTime As FILETIME) As Long Public Declare Function RegQueryValue Lib "advapi32.dll" Alias "RegQueryValueA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal lpValue As String, lpcbValue As Long) As Long Public Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" _ (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, _ lpType As Long, lpData As Any, lpcbData As Long) As Long Public Declare Function RegReplaceKey Lib "advapi32.dll" Alias "RegReplaceKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal lpNewFile As String, _ ByVal lpOldFile As String) As Long Public Declare Function RegRestoreKey Lib "advapi32.dll" Alias "RegRestoreKeyA" _ (ByVal hKey As Long, ByVal lpFile As String, ByVal dwFlags As Long) As Long Public Declare Function RegSaveKey Lib "advapi32.dll" Alias "RegSaveKeyA" _ (ByVal hKey As Long, ByVal lpFile As String, lpSecurityAttributes As SECURITY_ATTRIBUTES) As Long Public Declare Function RegSetKeySecurity Lib "advapi32.dll" _ (ByVal hKey As Long, ByVal SecurityInformation As Long, pSecurityDescriptor As SECURITY_DESCRIPTOR) _ As Long Public Declare Function RegSetValue Lib "advapi32.dll" Alias "RegSetValueA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal dwType As Long, _ ByVal lpData As String, ByVal cbData As Long) As Long Public Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" _ (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, _ lpData As Any, ByVal cbData As Long) As Long Public Declare Function RegUnLoadKey Lib "advapi32.dll" Alias "RegUnLoadKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String) As Long Public Declare Function RegNotifyChangeKeyValue Lib "advapi32.dll" _ (ByVal hKey As Long, ByVal bWatchSubtree As Long, ByVal dwNotifyFilter As Long, _ ByVal hEvent As Long, ByVal fAsynchronus As Long) As Long Public Declare Function RegLoadKey Lib "advapi32.dll" Alias "RegLoadKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal lpFile As String) As LongPublic Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long Public Declare Function RegConnectRegistry Lib "advapi32.dll" Alias "RegConnectRegistryA" _ (ByVal lpMachineName As String, ByVal hKey As Long, phkResult As Long) As Long Public Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long Public Declare Function RegCreateKeyEx Lib "advapi32.dll" Alias "RegCreateKeyExA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal Reserved As Long, _ ByVal lpClass As String, ByVal dwOptions As Long, ByVal samDesired As Long, _ lpSecurityAttributes As SECURITY_ATTRIBUTES, phkResult As Long, lpdwDisposition As Long) As Long Public Declare Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String) As Long Public Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA" _ (ByVal hKey As Long, ByVal lpValueName As String) As Long Public Declare Function RegEnumKey Lib "advapi32.dll" Alias "RegEnumKeyA" _ (ByVal hKey As Long, ByVal dwIndex As Long, ByVal lpName As String, ByVal cbName As Long) As Long Public Declare Function RegEnumKeyEx Lib "advapi32.dll" Alias "RegEnumKeyExA" _ (ByVal hKey As Long, ByVal dwIndex As Long, ByVal lpName As String, _ lpcbName As Long, ByVal lpReserved As Long, ByVal lpClass As String, _ lpcbClass As Long, lpftLastWriteTime As FILETIME) As Long Public Declare Function RegEnumValue Lib "advapi32.dll" Alias "RegEnumValueA" _ (ByVal hKey As Long, ByVal dwIndex As Long, ByVal lpValueName As String, _ lpcbValueName As Long, ByVal lpReserved As Long, lpType As Long, _ lpData As Byte, lpcbData As Long) As Long Public Declare Function RegGetKeySecurity Lib "advapi32.dll" _ (ByVal hKey As Long, ByVal SecurityInformation As Long, _ pSecurityDescriptor As SECURITY_DESCRIPTOR, lpcbSecurityDescriptor As Long) As Long Public Declare Function RegFlushKey Lib "advapi32.dll" (ByVal hKey As Long) As Long Public Const HKEY_CLASSES_ROOT = &H80000000 Public Const HKEY_CURRENT_CONFIG = &H80000005 Public Const HKEY_CURRENT_USER = &H80000001 Public Const HKEY_DYN_DATA = &H80000006 Public Const HKEY_LOCAL_MACHINE = &H80000002 Public Const HKEY_PERFORMANCE_DATA = &H80000004 Public Const HKEY_USERS = &H80000003Public Type ACL AclRevision As Byte Sbz1 As Byte AclSize As Integer AceCount As Integer Sbz2 As Integer End Type Public Type SECURITY_ATTRIBUTES nLength As Long lpSecurityDescriptor As Long bInheritHandle As Long End Type Public Type SECURITY_DESCRIPTOR Revision As Byte Sbz1 As Byte Control As Long Owner As Long Group As Long Sacl As ACL Dacl As ACL End Type Public Type FILETIME dwLowDateTime As Long dwHighDateTime As Long End TypePublic Const SYNCHRONIZE = &H100000 Public Const READ_CONTROL = &H20000 Public Const READ_WRITE = 2 Public Const STANDARD_RIGHTS_ALL = &H1F0000 Public Const STANDARD_RIGHTS_EXECUTE = (READ_CONTROL) Public Const STANDARD_RIGHTS_READ = (READ_CONTROL) Public Const STANDARD_RIGHTS_REQUIRED = &HF0000 Public Const STANDARD_RIGHTS_WRITE = (READ_CONTROL) Public Const KEY_CREATE_LINK = &H20 Public Const KEY_CREATE_SUB_KEY = &H4 Public Const KEY_ENUMERATE_SUB_KEYS = &H8 Public Const KEY_EVENT = &H1 Public Const KEY_SET_VALUE = &H2 Public Const KEY_QUERY_VALUE = &H1 Public Const KEY_NOTIFY = &H10 Public Const KEY_ALL_ACCESS = ((STANDARD_RIGHTS_ALL Or KEY_QUERY_VALUE Or _ KEY_SET_VALUE Or KEY_CREATE_SUB_KEY Or KEY_ENUMERATE_SUB_KEYS Or _ KEY_NOTIFY Or KEY_CREATE_LINK) And (Not SYNCHRONIZE)) Public Const KEY_READ = ((STANDARD_RIGHTS_READ Or KEY_QUERY_VALUE Or _ KEY_ENUMERATE_SUB_KEYS Or KEY_NOTIFY) And (Not SYNCHRONIZE)) Public Const KEY_EXECUTE = ((KEY_READ) And (Not SYNCHRONIZE)) Public Const KEY_WRITE = ((STANDARD_RIGHTS_WRITE Or KEY_SET_VALUE Or _ KEY_CREATE_SUB_KEY) And (Not SYNCHRONIZE)) (Code vergisst beim Copy&Paste den LF)<BLOCKQUOTE>Code:<HR><pre> Public Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long Public Declare Function RegOpenKeyEx Lib "advapi32.dll" Alias "RegOpenKeyExA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal ulOptions As Long, _ ByVal samDesired As Long, phkResult As Long) As Long Public Declare Function RegQueryInfoKey Lib "advapi32.dll" Alias "RegQueryInfoKeyA" _ (ByVal hKey As Long, ByVal lpClass As String, lpcbClass As Long, _ ByVal lpReserved As Long, lpcSubKeys As Long, lpcbMaxSubKeyLen As Long, _ lpcbMaxClassLen As Long, lpcValues As Long, lpcbMaxValueNameLen As Long, _ lpcbMaxValueLen As Long, lpcbSecurityDescriptor As Long, lpftLastWriteTime As FILETIME) As Long Public Declare Function RegQueryValue Lib "advapi32.dll" Alias "RegQueryValueA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal lpValue As String, lpcbValue As Long) As Long Public Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" _ (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, _ lpType As Long, lpData As Any, lpcbData As Long) As Long Public Declare Function RegReplaceKey Lib "advapi32.dll" Alias "RegReplaceKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal lpNewFile As String, _ ByVal lpOldFile As String) As Long Public Declare Function RegRestoreKey Lib "advapi32.dll" Alias "RegRestoreKeyA" _ (ByVal hKey As Long, ByVal lpFile As String, ByVal dwFlags As Long) As Long Public Declare Function RegSaveKey Lib "advapi32.dll" Alias "RegSaveKeyA" _ (ByVal hKey As Long, ByVal lpFile As String, lpSecurityAttributes As SECURITY_ATTRIBUTES) As Long Public Declare Function RegSetKeySecurity Lib "advapi32.dll" _ (ByVal hKey As Long, ByVal SecurityInformation As Long, pSecurityDescriptor As SECURITY_DESCRIPTOR) _ As Long Public Declare Function RegSetValue Lib "advapi32.dll" Alias "RegSetValueA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal dwType As Long, _ ByVal lpData As String, ByVal cbData As Long) As Long Public Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" _ (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, _ lpData As Any, ByVal cbData As Long) As Long Public Declare Function RegUnLoadKey Lib "advapi32.dll" Alias "RegUnLoadKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String) As Long Public Declare Function RegNotifyChangeKeyValue Lib "advapi32.dll" _ (ByVal hKey As Long, ByVal bWatchSubtree As Long, ByVal dwNotifyFilter As Long, _ ByVal hEvent As Long, ByVal fAsynchronus As Long) As Long Public Declare Function RegLoadKey Lib "advapi32.dll" Alias "RegLoadKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal lpFile As String) As LongPublic Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long Public Declare Function RegConnectRegistry Lib "advapi32.dll" Alias "RegConnectRegistryA" _ (ByVal lpMachineName As String, ByVal hKey As Long, phkResult As Long) As Long Public Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long Public Declare Function RegCreateKeyEx Lib "advapi32.dll" Alias "RegCreateKeyExA" _ (ByVal hKey As Long, ByVal lpSubKey As String, ByVal Reserved As Long, _ ByVal lpClass As String, ByVal dwOptions As Long, ByVal samDesired As Long, _ lpSecurityAttributes As SECURITY_ATTRIBUTES, phkResult As Long, lpdwDisposition As Long) As Long Public Declare Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" _ (ByVal hKey As Long, ByVal lpSubKey As String) As Long Public Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA" _ (ByVal hKey As Long, ByVal lpValueName As String) As Long Public Declare Function RegEnumKey Lib "advapi32.dll" Alias "RegEnumKeyA" _ (ByVal hKey As Long, ByVal dwIndex As Long, ByVal lpName As String, ByVal cbName As Long) As Long Public Declare Function RegEnumKeyEx Lib "advapi32.dll" Alias "RegEnumKeyExA" _ (ByVal hKey As Long, ByVal dwIndex As Long, ByVal lpName As String, _ lpcbName As Long, ByVal lpReserved As Long, ByVal lpClass As String, _ lpcbClass As Long, lpftLastWriteTime As FILETIME) As Long Public Declare Function RegEnumValue Lib "advapi32.dll" Alias "RegEnumValueA" _ (ByVal hKey As Long, ByVal dwIndex As Long, ByVal lpValueName As String, _ lpcbValueName As Long, ByVal lpReserved As Long, lpType As Long, _ lpData As Byte, lpcbData As Long) As Long Public Declare Function RegGetKeySecurity Lib "advapi32.dll" _ (ByVal hKey As Long, ByVal SecurityInformation As Long, _ pSecurityDescriptor As SECURITY_DESCRIPTOR, lpcbSecurityDescriptor As Long) As Long Public Declare Function RegFlushKey Lib "advapi32.dll" (ByVal hKey As Long) As Long Public Const HKEY_CLASSES_ROOT = &H80000000 Public Const HKEY_CURRENT_CONFIG = &H80000005 Public Const HKEY_CURRENT_USER = &H80000001 Public Const HKEY_DYN_DATA = &H80000006 Public Const HKEY_LOCAL_MACHINE = &H80000002 Public Const HKEY_PERFORMANCE_DATA = &H80000004 Public Const HKEY_USERS = &H80000003Public Type ACL AclRevision As Byte Sbz1 As Byte AclSize As Integer AceCount As Integer Sbz2 As Integer End Type Public Type SECURITY_ATTRIBUTES nLength As Long lpSecurityDescriptor As Long bInheritHandle As Long End Type Public Type SECURITY_DESCRIPTOR Revision As Byte Sbz1 As Byte Control As Long Owner As Long Group As Long Sacl As ACL Dacl As ACL End Type Public Type FILETIME dwLowDateTime As Long dwHighDateTime As Long End TypePublic Const SYNCHRONIZE = &H100000 Public Const READ_CONTROL = &H20000 Public Const READ_WRITE = 2 Public Const STANDARD_RIGHTS_ALL = &H1F0000 Public Const STANDARD_RIGHTS_EXECUTE = (READ_CONTROL) Public Const STANDARD_RIGHTS_READ = (READ_CONTROL) Public Const STANDARD_RIGHTS_REQUIRED = &HF0000 Public Const STANDARD_RIGHTS_WRITE = (READ_CONTROL) Public Const KEY_CREATE_LINK = &H20 Public Const KEY_CREATE_SUB_KEY = &H4 Public Const KEY_ENUMERATE_SUB_KEYS = &H8 Public Const KEY_EVENT = &H1 Public Const KEY_SET_VALUE = &H2 Public Const KEY_QUERY_VALUE = &H1 Public Const KEY_NOTIFY = &H10 Public Const KEY_ALL_ACCESS = ((STANDARD_RIGHTS_ALL Or KEY_QUERY_VALUE Or _ KEY_SET_VALUE Or KEY_CREATE_SUB_KEY Or KEY_ENUMERATE_SUB_KEYS Or _ KEY_NOTIFY Or KEY_CREATE_LINK) And (Not SYNCHRONIZE)) Public Const KEY_READ = ((STANDARD_RIGHTS_READ Or KEY_QUERY_VALUE Or _ KEY_ENUMERATE_SUB_KEYS Or KEY_NOTIFY) And (Not SYNCHRONIZE)) Public Const KEY_EXECUTE = ((KEY_READ) And (Not SYNCHRONIZE)) Public Const KEY_WRITE = ((STANDARD_RIGHTS_WRITE Or KEY_SET_VALUE Or _ KEY_CREATE_SUB_KEY) And (Not SYNCHRONIZE)) </pre><HR></BLOCKQUOTE>[ 02.10.2001: Beitrag editiert von: whiteheard ]

mfG whitehouse

braveheart · 01-10-2001 21:20:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

So, als Chaot *g* geh ich jetzt zu folgnder Frage: "Wie erkennt man, ob und welche Taste ein Benutzer gedrückt hat?" - mit dem Event KeyPress

mfG whitehouse

braveheart · 02-10-2001 14:37:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

nu, wenn's dich wirklich intressiert, dann poste bitte auchach ja: Bsp. KeyPress-Event (um die Eingaben aller Steuerelemente in des Forms Event abzufangen KeyPreview setzen) <BLOCKQUOTE>Code:<HR><pre> '... Private Sub Form_KeyPress(KeyAscii As Integer) 'KeyAscii ist der Zeichensatzwert, 'mit Chr(KeyAscii) kriegst du die Stringversion, 'mit Asc(Str) den Ansiwert eines 1-Zeichen-Strings '(wird nach 1 Zeich. abgeschnitten) MsgBox "Sie haben die Taste """ & Chr(KeyAscii) & """ (" & KeyAscii & ") gedrückt." End Sub '... </pre><HR></BLOCKQUOTE> Probiers aus![ 02.10.2001: Beitrag editiert von: whiteheard ]

mfG whitehouse

Dino · 04-10-2001 13:18:00

Dino
Moderator
Offline

Herkunft: DE-CIX
Registrierungsdatum: 07-12-2000
Beiträge: 491

Re: Hilfe die 2. ...

Dank, da hast du dir ja echt Mühe gegeben. Werds mir mal angucken. Tut mir leid, dass ich was spät geanwortet habe, aber ich hatte seit Sonntag keine Zeit mehr hier rein zu gucken.

Ceterum censeo Ameriginem esse delendam.

braveheart · 04-10-2001 13:33:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

welche VB-Version hast du?

mfG whitehouse

Dino · 05-10-2001 13:11:00

Dino
Moderator
Offline

Herkunft: DE-CIX
Registrierungsdatum: 07-12-2000
Beiträge: 491

Re: Hilfe die 2. ...

6.0 Standart

Ceterum censeo Ameriginem esse delendam.

braveheart · 05-10-2001 14:19:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

aha, da ist glaub ich kein MSDN-Library bei, auf <A HREF="http://msdn.microsoft.com/library" TARGET=_blank>http://msdn.microsoft.com/library</A> gibts die aber auch *g* ich hab VB6Pro (eigentlich ja VStudio6ProSSL) so, später schau ich viell. noch mal nach (muss erst selbst verstehen, da Doku nur für C/++)

mfG whitehouse

Dino · 27-10-2001 09:49:00

Dino
Moderator
Offline

Herkunft: DE-CIX
Registrierungsdatum: 07-12-2000
Beiträge: 491

Re: Hilfe die 2. ...

So, tut mir leid, das es so lange gedauert hat. Hatte einfach keine zeit für VB und außerdem isses z.Z. eh kaputt. Also, das mit den Tasten hat super funktioniert, danke. Könntest du mir auch sagen, wie man das mit den Pfeiltasten macht? Die MSN könnte ich mirvon jemandem besorgen, dann isse auch in deutsch.Dino

Ceterum censeo Ameriginem esse delendam.

braveheart · 27-10-2001 12:00:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

auf die Pfeiltasten haste im Ereignis KeyDown Zugriff

mfG whitehouse

braveheart · 27-10-2001 12:03:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

das sind die Ganzen Konstanten:<BLOCKQUOTE>Code:<HR><pre> Tasten-Code-Konstanten Die folgendenKonstanten können überall im Code anstelle der tatsächlichen Werte verwendet werden:Konstante Wert Beschreibung vbKeyLButton 0x1 Linke Maustaste vbKeyRButton 0x2 Rechte Maustaste vbKeyCancel 0x3 ABBRECHEN-TASTE vbKeyMButton 0x4 Mittlere Maustaste vbKeyBack 0x8 RÜCKTASTE vbKeyTab 0x9 TAB-TASTE vbKeyClear 0xC ENTF-TASTE vbKeyReturn 0xD EINGABETASTE vbKeyShift 0x10 UMSCHALTTASTE vbKeyControl 0x11 STRG-TASTE vbKeyMenu 0x12 MENÜTASTE vbKeyPause 0x13 PAUSE-TASTE vbKeyCapital 0x14 FESTSTELLTASTE vbKeyEscape 0x1B ESC-TASTE vbKeySpace 0x20 LEERTASTE vbKeyPageUp 0x21 BILD-AUF-TASTE vbKeyPageDown 0x22 BILD-AB-TASTE vbKeyEnd 0x23 ENDE-TASTE vbKeyHome 0x24 POS1-TASTE vbKeyLeft 0x25 NACH-LINKS-TASTE vbKeyUp 0x26 NACH-OBEN-TASTE vbKeyRight 0x27 NACH-RECHTS-TASTE vbKeyDown 0x28 NACH-UNTEN-TASTE vbKeySelect 0x29 AUSWAHLTASTE vbKeyPrint 0x2A DRUCK vbKeyExecute 0x2B AUSFÜHREN-TASTE vbKeySnapshot 0x2C SNAPSHOT-TASTE vbKeyInsert 0x2D EINFG-TASTE vbKeyDelete 0x2E LÖSCHEN-TASTE vbKeyHelp 0x2F HILFETASTE vbKeyNumlock 0x90 NUM-TASTE Die Tasten A bis Z entsprechen den ASCII-Zeichen A - Z:Konstante Wert Beschreibung vbKeyA 65 A-TASTE vbKeyB 66 B-TASTE vbKeyC 67 C-TASTE vbKeyD 68 D-TASTE vbKeyE 69 E-TASTE vbKeyF 70 F-TASTE vbKeyG 71 G-TASTE vbKeyH 72 H-TASTE vbKeyI 73 I-TASTE vbKeyJ 74 J-TASTE vbKeyK 75 K-TASTE vbKeyL 76 L-TASTE vbKeyM 77 M-TASTE vbKeyN 78 N-TASTE vbKeyO 79 O-TASTE vbKeyP 80 P-TASTE vbKeyQ 81 Q-TASTE vbKeyR 82 R-TASTE vbKeyS 83 S-TASTE vbKeyT 84 T-TASTE vbKeyU 85 U-TASTE vbKeyV 86 V-TASTE vbKeyW 87 W-TASTE vbKeyX 88 X-TASTE vbKeyY 89 Y-TASTE vbKeyZ 90 Z-TASTE Die Tasten 0 bis 9 entsprechen den ASCII-Zeichen 0 - 9:Konstante Wert Beschreibung vbKey0 48 0-TASTE vbKey1 49 1-TASTE vbKey2 50 2-TASTE vbKey3 51 3-TASTE vbKey4 52 4-TASTE vbKey5 53 5-TASTE vbKey6 54 6-TASTE vbKey7 55 7-TASTE vbKey8 56 8-TASTE vbKey9 57 9-TASTE Die folgenden Kontanten repräsentieren die Zahlen auf der Zehnertastatur:Konstante Wert Beschreibung vbKeyNumpad0 0x60 0-TASTE vbKeyNumpad1 0x61 1-TASTE vbKeyNumpad2 0x62 2-TASTE vbKeyNumpad3 0x63 3-TASTE vbKeyNumpad4 0x64 4-TASTE vbKeyNumpad5 0x65 5-TASTE vbKeyNumpad6 0x66 6-TASTE vbKeyNumpad7 0x67 7-TASTE vbKeyNumpad8 0x68 8-TASTE vbKeyNumpad9 0x69 9-TASTE vbKeyMultiply 0x6A MULTIPLIKATIONSZEICHEN-TASTE (*) vbKeyAdd 0x6B PLUSZEICHEN-TASTE (+) vbKeySeparator 0x6C EINGABETASTE vbKeySubtract 0x6D MINUSZEICHEN-TASTE (–) vbKeyDecimal 0x6E DEZIMALPUNKT-TASTE (.) vbKeyDivide 0x6F DIVISIONSZEICHEN-TASTE (/) Die folgenden Konstanten repräsentieren die Funktionstasten:Konstante Wert Beschreibung vbKeyF1 0x70 F1-TASTE vbKeyF2 0x71 F2-TASTE vbKeyF3 0x72 F3-TASTE vbKeyF4 0x73 F4-TASTE vbKeyF5 0x74 F5-TASTE vbKeyF6 0x75 F6-TASTE vbKeyF7 0x76 F7-TASTE vbKeyF8 0x77 F8-TASTE vbKeyF9 0x78 F9-TASTE vbKeyF10 0x79 F10-TASTE vbKeyF11 0x7A F11-TASTE vbKeyF12 0x7B F12-TASTE vbKeyF13 0x7C F13-TASTE vbKeyF14 0x7D F14-TASTE vbKeyF15 0x7E F15-TASTE vbKeyF16 0x7F F16-TASTE </pre><HR></BLOCKQUOTE>

mfG whitehouse

braveheart · 27-10-2001 12:04:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

du sagst, dein VB geht nimmer? hol dir SP5!

mfG whitehouse

braveheart · 27-10-2001 12:11:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

Bsp. für Pfeiltasten: 1. füge ein Bild auf das Formular ein (Image) 2. füge den Code ein 3. teste (Pfeiltasten drücken!)<BLOCKQUOTE>Code:<HR><pre> Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeyLeft Image1.Left = Image1.Left - Image1.Width Case vbKeyRight Image1.Left = Image1.Left + Image1.Width Case vbKeyUp Image1.Top = Image1.Top - Image1.Height Case vbKeyDown Image1.Top = Image1.Top + Image1.Height End Select End Sub</pre><HR></BLOCKQUOTE>[ 27.10.2001: Beitrag editiert von: whiteheard ]

mfG whitehouse

Dino · 29-10-2001 00:19:00

Dino
Moderator
Offline

Herkunft: DE-CIX
Registrierungsdatum: 07-12-2000
Beiträge: 491

Re: Hilfe die 2. ...

Danke, werds versuchen. Wo gibts denn das SP5?

Ceterum censeo Ameriginem esse delendam.

braveheart · 30-10-2001 08:56:00

braveheart
Mitglied
Offline

Herkunft: D-BaWü Ulm
Registrierungsdatum: 21-03-2001
Beiträge: 1.727

Re: Hilfe die 2. ...

<A HREF="http://msdn.microsoft.com/vstudio/sp/vs6sp5/default.asp?FinishURL=%2Fdownloads%2Frelease%2Easp%3FReleaseID%3D27967%26redirect%3Dno" TARGET=_blank>Visual Studion 6 SP 5 (auch VB)</A>

mfG whitehouse

Hilfe die 2. ...

Beiträge [ 15 ]

1 Thema von Dino 28-09-2001 19:35:00

Thema: Hilfe die 2. ...

2 Antwort von braveheart 30-09-2001 14:47:00

Re: Hilfe die 2. ...

3 Antwort von braveheart 01-10-2001 21:20:00

Re: Hilfe die 2. ...

4 Antwort von braveheart 02-10-2001 14:37:00

Re: Hilfe die 2. ...

5 Antwort von Dino 04-10-2001 13:18:00

Re: Hilfe die 2. ...

6 Antwort von braveheart 04-10-2001 13:33:00

Re: Hilfe die 2. ...

7 Antwort von Dino 05-10-2001 13:11:00

Re: Hilfe die 2. ...

8 Antwort von braveheart 05-10-2001 14:19:00

Re: Hilfe die 2. ...

9 Antwort von Dino 27-10-2001 09:49:00

Re: Hilfe die 2. ...

10 Antwort von braveheart 27-10-2001 12:00:00

Re: Hilfe die 2. ...

11 Antwort von braveheart 27-10-2001 12:03:00

Re: Hilfe die 2. ...

12 Antwort von braveheart 27-10-2001 12:04:00

Re: Hilfe die 2. ...

13 Antwort von braveheart 27-10-2001 12:11:00

Re: Hilfe die 2. ...

14 Antwort von Dino 29-10-2001 00:19:00

Re: Hilfe die 2. ...

15 Antwort von braveheart 30-10-2001 08:56:00

Re: Hilfe die 2. ...

Beiträge [ 15 ]