Category Archives: Visual Basic 6 (VB6)

Play Othello Game in multiplayer mode with the TCP/IP or in local mode….Winsock and recursive code… Original Author: Jason Fleury Attachments File Uploaded Size CODE_UPLOAD1421.zip 9/3/2020 3:45:00 PM 14362

How to Activate CapsLock and NumLock from Code Original Author: Ian Ippolito (psc) Assumptions The keyboard APIs for VB4-16 and VB3 do not support the byte data type.By changing the Windows constant to Public Const VK_NUMLOCK = &H90, you can use the above to activate the NumLock key. API Declarations Public Const VK_CAPITAL = &H14Public Type KeyboardBytes?á?á?á?á?ákbByte(0 To 255)… Read More »

The DegreesToXYsubroutine, calculates the X (horizontal) and Y (vertical) coordinates of any point, measured in degrees, on the circumference of a circle or ellipse. Original Author: Found on the World Wide Web Inputs Pass the subroutine the center X, Y of your ellipse, the degree position,and the horizontal and vertical radii (if they are equal, you’re specifying acircle, if… Read More »

Prompting the User for a Directory in Win95. Windows’ common dialogs are great if you want the user to select a file, but what if you want them to select a directory? Call the following function, which relies on Win32’s new SHBrowseForFolder function: Original Author: Found on the World Wide Web API Declarations Private Type BrowseInfohWndOwner As LongpIDLRoot As… Read More »

This application will show a dancing flame. DANCING means the flame will beanimated. You can controll the flame. ENJOY IT!Short Code / Specially Cool! Original Author: Jongmin Baek Attachments File Uploaded Size CODE_UPLOAD1414.zip 9/3/2020 3:45:00 PM 35340

NOW IT’S POSSIBLE ON VB!This code INPUTS MIDI DATA, and echo it to a selected midiOut device. Nothing more. If you are not interested in MIDI PROGRAMMING, my advise to you is that, do not waste your time with this.This was hard. BECAUSE: There is a callback function, which Windows calls many times during the recording. You can’t… Read More »

This class module, complete with demo project, will allow you to easily scroll a large picture box inside a much smaller one. This can be extremely useful when space is something you have little of. Original Author: dcroft Attachments File Uploaded Size CODE_UPLOAD1448.zip 9/3/2020 3:45:00 PM 6277

A CD-Player with some functions and a cool form. This is a old code I programmed some years ago. A bit of the code is not from me. Original Author: Loreno Heer Attachments File Uploaded Size CODE_UPLOAD7365722000.zip 9/3/2020 3:45:00 PM 23042

16 AND 32 bit functions to read/write ini files–very useful! Original Author: VB Qaid API Declarations ‘****************************************************‘* INI_sm.BAS *‘****************************************************Option Explicit#If Win16 ThenDeclare Function WritePrivateProfileString Lib “Kernel” (ByVal AppName As String, ByVal KeyName As String, ByVal NewString As String, ByVal filename As String) As IntegerDeclare Function GetPrivateProfileString Lib “Kernel” Alias “GetPrivateProfilestring” (ByVal AppName As String, ByVal KeyName As Any, ByVal… Read More »

add a horizontal scroll bar to a listbox or combo box Original Author: VB Qaid API Declarations #If Win16 ThenDeclare Function SendMessage Lib “User” (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, lParam As Any) As Long#ElseDeclare Function SendMessage Lib “user32” Alias “SendMessageA” (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long,… Read More »