Makes a little pong style game Original Author: Matthew Eagar Assumptions Nothin much, just a very basic knowledge of VB programming. Code Dim vmom As Integer ‘holds the ball’s vertical momentumDim hmom As Integer ‘holds the ball’s horizontal momentum Private Sub Form_Load()  Randomize  ‘make the vertical and horizontal momentums random  vmom = 100 + Int(Rnd * 200)  hmom = 100 + Int(Rnd *… Read More »

This code gives the “enter” key the same functionality as the “tab” key in a vb form. When the user presses the “enter” key, it moves the focus to the next control, based on the tab index order. Don’t forget to set the KeyPreview property of the form to True. (My thanks to Pennington. His TabToEnter2 code laid… Read More »

This code generates a moving 3D star field, almost identical to the windows ‘flying through space’ screen saver, except this runs in a window of any size, and when the user moves the mouse over it, they can change the camera angle, which I suppose could make a neet game back ground for an outter space filght sim.… Read More »

This code pastes into a Module that Create (if not exists) a MDB to record the errors that occur in your application. Original Author: WalkerBro Inputs Needs (DatabaseName, Date, Err.Number, Err.Description, PrivateNotes, Optional(User))Load in “References” the “Microsoft DAO 3.51 Object Library” Assumptions Basic Error handling information. Returns True or False if it was succesful. Side Effects No known side… Read More »

This code shows a circle bouncing off of the sides of the form like Jezzball (But not as good). Original Author: Ben Doherty Assumptions you need to make 2 timers named Timer1 and Timer2, make a circle shapeand name it pic. set the background color to black. Code Private Sub Form_Load()Form1.Height = 4770Form1.Width = 5865Form1.BackColor = &H0pic.BorderColor = &HFF&pic.Top… Read More »

This Function will change your Windows Resolution. It is very simple, and it does what most Resolution Change Functions don’t do, it changes the the Bits Per Pixels as well as the Screen Width and Height. Original Author: ScAnFrEaK Inputs Dim RetValue As IntegerRetValue = ChangeRes(800, 600, 32) Returns 1 = Resolution Successfully Changed0 = Resolution Was Not Changed… Read More »

This revised code finally supports the MP3 “Genre” tag (WinAMP 2.22+ compliant).Loads of you have emailed me requesting this facility – I think this is the first such VB code to support it! Easy to implement and the new genre routine is compact. It was a right pain in the arse collecting the Genre descriptions 😉 Note:- A… Read More »

you enter a word, or whatever else you want and it brings up a definition, or something else.Note: Saves into the registry key: HKEY_Current_UserSoftwareVB and VBA Program Setting whatever you set the path to Original Author: Tyler Robbins Assumptions create 4 textboxes name them:AddName, AddDefine, definition, Wordcreate 1 label, label3 (make its caption blank)make 2 command buttonsname them:LookUp, AddWord… Read More »

This code is a must have! It’s cooler than the “Cool Form Close” code , cooler than the “Implode and Explode” code! So what does it do? When you close you program a really cool effect will appear. Your form will shrink so just the Titlebar is being showned, then the titlebar accelerates and bounces againt the start… Read More »

With this code you can place any Icon in the title bar of any Window, just by reffering to a .ico file or to the position of the Icon in a DLL. Original Author: J. van Gils Inputs Handle of the window you want to change the icon of. Assumptions You need to have the Window Handle (hWnd) of… Read More »