VS 2008 Game Code - Sub Moves A Rectangle To The Center Of The Form
Jul 27, 2009
This sub moves a rectangle to the center of the form and when it gets there it moves back to its original location. But something weird has happened and the rectangle still moves, but the boolean values dont change. I tested to see if that part of the code was executed by putting a messagebox where the boolean values are supposed to change and the messagebox didnt appear.
Here is the sub:
Public Sub Start()
Dim Energy As New PictureBox
_IsMoving = True 'here is the boolean values along with some other variables
I got this code to create textstring and make it center in the rectangle. The probleam that I faced is, it make the text only center for the hight rectangle( as you see in the pic). How can I make it center for both width and height?.
Dim drawString As [String] = "Sample Text" ' Create font and brush. Dim drawFont As New Font("Arial", 16)
i have media center's "put media center always on top UNchecked, but it doesn't seem to affect how the program works if it's maximized. I have a custom media control interface with functions that change depending on an event such as holding the button in. To show the user what it's SUPPOSED to be doing, i've tried a few different ways to get a notification to show over the top of media center's screen.
1. Had media center's display notifications turned on and showed a balloontip in the task bar... NO EFFECT
2. Found a MCE Plugin i can shell to, but am unable to actually find a download site in english for it
3. Wrote a simple vb.net program to give a popup form to show text but it appears behind the mce window always, even when i have the form's "always on top" checked, and i even tried the setwindowpos api call, although i might not have used it correctly since i manually converted it from vb6.
My final attempt will be to send the keycommand to "restore" the media center window which will open up some screen real estate on the bottom and right, exposing part of my program's window that i can show text on.
I'm trying to find out when the ball strikes the paddle. So what I did was made two rectangles, one around the ball and one around the paddle.
[Code]...
The problem is, the ball goes right through the paddle!!!! Shouldn't the ball deflect off the paddle and move in a new direction depending on angle? Why does the ball go right through the paddle?
Is there any way I can move a form in the center of the screen ? I am talking about run time for a form that is already shown . I need this because some times this form may become larger or smaller during run time and I'd like it to be moved in the center of the screen in order to look better . Back in VB6 I used to show again the form (despite being already shown) by MyForm.Show , which resulted i the form being moved to the center , but now it seems this doesn't work anymore ...
For a while i have been playing a guessing game with this line of code.
If Sdown = True And Shooter.Top >= Me.ClientRectangle.Height Then Shooter.top += Shooterspeed End If
Basically i have a shooter on the form and whenever i press the down key the shooter moves down the form and disappears off of the bottom of the form. I have been trying to get this to stop for some while.
I am working on a poker game and I have the game setup the way I want it in terms of graphics and I have the code programed to deal the cards out exactly how I want them. Granted, the code is very simplistic, but functional for a new programmer like myself. I'm sure there are other more efficient ways to code my game, but I like mine so far because I can at least understand the majority of it. With that being said, here are a few problems and questions that I have.
1. How come when all 12 cards are dealt out I have some cards repeating in the game? For example, I get queen of diamonds in more than one picture box when I only want the card to be dealt once and then removed until the next game.
2. I was hoping to have a button 3 to clear all the boxes, basically resetting the game to the next game. When I hit button 3 it only clears the contents of picturebox 10 and 12.Other notes: I have the deal down the way I want it. It deals the first 10 picture boxes and a second button deals the 11 and 12 picture boxes.
3. I know this is my next step so I want to post it with the code I currently have. I want to start taking my project one step further by evalutating each of the three rows of cards (3 rows of 3 cards each - I'm not worried about the dealers hand (picture box 10, 11, 12 yet). So I want to evaluate a row of pictureboxes against a "pay scale" and display the win in a text box or label next to the 3 card hand. For example, Q of diamonds, Q of Clubs, Q of spades would win 15, etc. ( have a weird feeling I may have to change the names of the cards (I have them named card1, card2, etc. right now) to something that identifies them in order to evaluate the hands.
Here is the code that I currently have. I'm using visual basic.
Public Class Form1 Dim Rndm As New Random Dim myPB(11) As PictureBox Dim HiddenCards As New List(Of String)
I'm trying to make a 2D platform game and I'm pretty inexperienced at programming. I've coded the player to move left and right and jump, but I can't figure out how to prevent multiple jumps while the player is in the air. Anyone know how to do this?
Check Score: The winner is the one with the highest score less than or equal to 21If both scores(player total and computer total) are over 21, or if both are equal but under 21, the game is declared a draw.
There is something wrong with this line: If intPlayerCardTotal < intScore And intComputerTotal < intScore Then MsgBox "Draw"
im struggling to work out the code for 3 of a kind in my yahtzee game, i think that if i can work this out i can sort my everest of the full house code!
I just finished my own snake game, and I need some recommendations on how to make this game better.If you see a problem, please tell me.The only problem with this game is that I can't get the code to get longer, other then that its good.EDIT: Sorry I meant : The only problem with this game is that I can't get the SNAKE to get longer, other then that its good.
I'm creating an app where I don't want to allow the cursor to leave the form, even when the mouse moves.Would it be something to type into pongMain_MouseLeave ? Something like Cursor.Stop () is all I
I am writing a Class Library for a GIS Windows application. The class has a form that I open when I load the dll command in the application. After the form opens the form moves to the back of the GIS Windows application, and I want it to be in front of the GIS Windows application all the time. How can I do this?
I'm trying to add a feature to my program that makes it so when the cursor moves off of the form, the form drops in opacity, making it sort-of transparent. However, it's not working for some reason.
Private Sub hovertimer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles hovertimer.Tick If MousePosition.X < "0" Then Me.Opacity = 60%
So I pretty much built the game, that was the easy part. I am having trouble entering a name on my first form(startup) and keeping track of the score on second form(game) and displaying it both combined on the first page with the current users score. Also the way it set up now if you are running the game for the first time it says can't find LowScores.Text. Start Up
I have quite an annoying problem and I don't know how to fix it. See I have several panels in one of my forms, all with background images. On the start of the application, the form slides down, and when the form reaches a set value, all my panels slide out.The problem is, when the panels are sliding, they flicker furiously! It's really annoying and I'm not sure how to fix the problem. When the panel reaches it's set value and stops moving, the flickering stops. I can only assume it's because of the background image
As can be seen in the image, the X has 2 branches of moves (arrows), it can capture the Os by leaping on them (marked yellow), and I am not sure how to store such branches of moves/captures.
i have my main form and other forms. the other forms startposition is set to manual.is there a way i can set the start position of the other forms to center at the main form
Me.Location = New Point(150, 248)
the above code will position according to the monitor not the mainform.
