Visual Basic Forum

Verfasst am: 21.09.2009, 17:42 Aufrufe: 499

Verfasst am: 29.06.2009, 15:26 Aufrufe: 1459

Beschreibung:Mit der Funktion kann damit einige Fenstereffekte erzeugen. U.a. Einfaden, Ausfaden, Schieben, Rollen... Falls der Effekt nicht mit der Windows-Version kompatibel ist, oder ein anderer Fehler auftritt, wird die Form trotzdem ein-/ausgeblendet. Genauere Beschreibung zur Handhabung im Quellcode.Funktion:Visual Basic: Beschreibung der Parameter:Fenster: die Form die animiert werden sollArt:EINBLENDEN: Fenst ...

Verfasst am: 29.06.2009, 15:06 Aufrufe: 1749

Beschreibung: Mit Zuhilfename der API-Funktion SendMessage lässt sich der Monitor in den StandBy-Modus schalten und auch wieder einschalten. Erstellen Sie ein neues Windows-Forms Projekt und platzieren auf die Form einen Button, um den Monitor in den StandBy-Zustand zu versetzen. Mit Hilfe eines Timers wird der Monitor dann nach 10 Sekunden autom. wieder "reaktiviert".Funktion: Visual Basic: Quelle: vbarchiv.net

Verfasst am: 29.06.2009, 14:22 Aufrufe: 1306

Beschreibung:Diese Klasse überwacht veränderungen in der Registry entweder an einem Key oder an einem Wert.Wenn man einen Key überwacht wird das Event immer dann ausgelöst wenn irgendetwas an diesem Key geändert wird wie z.B. es wird unter diesem Key ein neuer Key angelegt oder es wird ein Wert geändert.Wenn man einen Wert überwacht wird das Event immer nur dann ausgelöst wenn auch genau dieser Wert verändert wird.Fu ...

Verfasst am: 29.06.2009, 14:16 Aufrufe: 836

Beschreibung: Das ist eine Kryptographieklasse die die Verschlüsselungsalgorithmen aus den .NET Frameworkzusammenfasst und in einfach anzuwendenen Funktionen kapselt.Es gibt für jedes Szenario eine passende Funktion z.B. wenn man eine Datei von der Festplatte direkt in ein Bytearray entschlüsseln will oder wenn man ein Bytearray verschlüsseln will und das Ergebnis in ein anderes Bytearray speichern wil ...

Verfasst am: 29.06.2009, 14:11 Aufrufe: 2113

Beschreibung:Mit dieser Klasse kann man sehr leicht eine globale Hotkey funktionalität in seinem Programm einbinden.Man muss nur diese Klasse mit WithEvents deklarieren und ihr eine Form zuweisen die gesubclassed werden soll.Dann muss man nur noch ein paar eigene HotKey-Kombinationen registrieren (z.B. Strg+Alt+X) und diesemit dem Event abfragen bzw, abfangen. Dazu muss man eine eigene HotKeyID angeben um einen besti ...

Verfasst am: 29.06.2009, 14:02 Aufrufe: 1104

Beschreibung:Mit dieser Klasse kann man - wie man es vom Windows Media Player kennt - sich in MSN bzw. Windows Live Messenger anzeigen lassen was man gerade hört. Es wird einfach mittels SendMessage ein String-Parameter an den Messenger geschickt und der zeigt den Text dann in das entsprechende Feld "Was ich gerade höre". Diese Funktion muss aber im Messenger aktiviert sein.Funktion:Visual Basic: Quelle: dotnet-snipp ...

Verfasst am: 15.06.2009, 12:55 Aufrufe: 695

Thema: Enums nutzenAutor: exe-cuteHier ein TUT fuer das benutzen eines Enums.Mit einem enum gelingt folgendes:Lets go:Enum:Die sub:(mir faellt grade auf, bei Case Mogen is die MassageBox Falsch. Ich denk aba das wird jeder cheggen.)Dies ist nun ein beispiel, zu welches man ein enum benutzen kann. EIn enum hat jedoch nicht immer die werte 1,2 oder 3.Meist haben sie laengere werte die man sich nicht alle merken moechte ...

Verfasst am: 23.04.2009, 22:55 Aufrufe: 1004

Hier ein TUT fuer das benutzen eines Enums. Mit einem enum gelingt folgendes: Lets go: Enum: Die sub: (mir faellt grade auf, bei Case Mogen is die MassageBox Falsch. Ich denk aba das wird jeder cheggen.) Dies ist nun ein beispiel, zu welches man ein enum benutzen kann. EIn enum hat jedoch nicht immer die werte 1,2 oder 3. Meist haben sie laengere werte die man sich nicht alle merken moechte. Ihr ...

Verfasst am: 25.03.2009, 20:28 Aufrufe: 1108

Hallo zusammen, habe einen Code geschrieben, der zuerst die Standardzeit (siehe Sub Main()) 10:24:36 anzeigen soll (Das funktioniert auch). Anschließend soll er 50 Minuten und danach 135 Sekunden hinzu addieren. Dazu muss ich eine Enumeration deklarieren, die ich später der Einheiten wegen zum Rechnen benutze. Außerdem muss ich einen Konstruktor definieren, der die Werte für Stunde, Minute und Sekunde übergibt (A ...

Verfasst am: 19.09.2008, 19:53 Aufrufe: 2409

Verfasst am: 04.09.2008, 19:44 Aufrufe: 844

... s Long dwMajorVersion As Long dwMinorVersion As Long dwBuildNumber As Long dwPlatformId As Long szCSDVersion As String * 128End TypePrivate Declare Function GetVersionEx Lib "kernel32" _ Alias "GetVersionExA" (lpVersionInformation As _ OSVERSIONINFO) As Long'System beenden + neu startenPrivate Declare Function ExitWindowsEx Lib "USER32" _ (ByVal uFlags As Long, ByVal dwReserved As Long) As LongPublic Enum ...

Verfasst am: 23.05.2008, 11:52 Aufrufe: 363

Also du hast die Enum HKEY_ROOTS als Integer das ist die Auswahl für die Value "Root".Möchtest du z.B. einen bestimmten SubKey löschen (in meinem Beispiel AdobeAcrobatReader8.0AccessiZoomType) so hat die Funktion wie folgt auszusehen.Visual Basic: [code]Public Function RegDelValueName(ByVal Root As HKEY_ROOTS, ByVal Path As String, ByVal ValueName As String) As Boolean Try Select Case Root ...

Verfasst am: 03.05.2008, 16:41 Aufrufe: 1322

Verfasst am: 27.03.2008, 18:51 Aufrufe: 1512

InteropServices Innerhalb der Form Class: Dim SErr As New TSteamError() Public Enum eSteamError eSteamErrorNone = 0 eSteamErrorUnknown = 1 eSteamErrorLibraryNotInitialized = 2 eSteamErrorLibraryAlreadyInitialized = 3 eSteamErrorConfig = 4 eSteamErrorContentServerConnect = 5 eSteamErrorBadHandle = 6 eSteamErrorHandlesExhausted = 7 ...

Verfasst am: 14.03.2008, 15:45 Aufrufe: 680

... ; (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cbuttons As Long, ByVal dwExtraInfo As Long) Private Const MOUSEEVENTF_LEFTDOWN = &H2 Private Const MOUSEEVENTF_LEFTUP = &H4 Private Const MOUSEEVENTF_MIDDLEDOWN = &H20 Private Const MOUSEEVENTF_MIDDLEUP = &H40 Private Const MOUSEEVENTF_RIGHTDOWN = &H8 Private Const MOUSEEVENTF_RIGHTUP = &H10 Public Enum ...

Verfasst am: 29.02.2008, 22:20 Aufrufe: 1780

... yte 'IDE drive/head register bCommandReg As Byte 'Actual IDE command bReserved As Byte 'reserved for future use - must be zero End Type 'SENDCMDINPARAMS contains the input parameters for the 'Send Command to Drive function Private Type SENDCMDINPARAMS cBufferSize As Long 'Buffer size in bytes irDriveRegs As IDEREGS 'Structure with drive register values. bDriveNum ...

Verfasst am: 21.07.2007, 16:51 Aufrufe: 498

... Long) As Long Private Const AW_ACTIVATE = &H20000 Private Const AW_BLEND = &H80000 Private Const AW_CENTER = &H10 Private Const AW_SLIDE = &H40000 Private Const AW_HIDE = &H10000 Private Const AW_HOR_POSITIVE = &H1 Private Const AW_HOR_NEGATIVE = &H2 Private Const AW_VER_POSITIVE = &H4 Private Const AW_VER_NEGATIVE = &H8 Private Const WM_PAINT = &HF Enum ...

Verfasst am: 05.04.2007, 17:34 Aufrufe: 980

dll" Alias "SHGetPathFromIDListA" (ByVal pidl As Long, ByVal pszPath As String) As Long Private Type SHITEMID cb As Long abID As Byte End Type Private Type ITEMIDLIST mkid As SHITEMID End Type Public Enum spfSpecialFolderConstants spfDesktop = &H0 spfPrograms = &H2 spfPersonal = &H5 spfFavorites = &H6 spfStartup = &H7 spfRecent = &H8 ...