You set the number of rows and columns next. You set the size of each tile with intSquare and intWidth. New Size(picTile.Width, picTile.Height)), _Īdd the following fields to your Form: Private Const intSquare As Integer = 64 PicTile.Height)), New Rectangle(pntImage, _ Rectangle(New Point(0, 0), New Size(picTile.Width, _ This event creates all the tiles: Private Sub picTile_Paint(ByVal sender As System.Object, _īyVal e As ) _ Add the Tile Sub procedure, which is responsible for setting each tile’s position: Public Sub Tile(ByVal imImage As Image, ByVal ptStart As Point)Īdd the Paint event for the Tile User Control. ImageSize gets and sets the image’s size depending on which Size menu option was selected. The Index property will be used in conjunction with intIndex. Public ReadOnly Property ImageSize() As Size Add the following Properties to your User Control: Public ReadOnly Property Index() As Intege

intIndex is used to keep track of the tile’s index. PntImage is used to keep track of each tile object’s position. Open the code window for your User Control and add the following fields: Private pntImage As Point On the User Control, make sure you have the following objects: Add a User Control to your project (again, name it anything you want). On the form, you need to include the a MainMenu with the following items and subitems:įeel free to name the objects differently than I have just remember having done so when you code them. When the loaded form appears, design it as displayed in Figure 1: You may name it anything you desire I have named my project HTG_TileSlide. Start a new Visual Basic Windows Forms project. Sliding puzzles are mostly two-dimensional in nature and you are not allowed to lift a piece off the board. What Is a Tile Slider Game?Ī tile slider, sliding puzzle, sliding block puzzle, or sliding tile puzzle is a combination puzzle in which a player has to slide pieces along certain routes on a board to establish a certain end-configuration. Today, I will show you how to create a Tile Slide game with Visual Basic.NET.

My Slider Puzzle instal the new