I'm building a slot machine, and I'm having some trouble.re's the
'Pulls down the slot
If e.KeyCode = Keys.Space Then
PictureBox2.Focus()
[code]....
When I debug and click space down, my picture box of the knob slides on down to 175, pauses, and shoots back up. The problem I'm running into, is that it doesn't do anything if I try to pull the knob down again. It doesn't bug out or anything, but it just doesn't do it again
Is it possible to set focus on the keydown event so after the button control, sets the focus into the keydown? although says often control can have focus,.Putting a button and a keydown event on a form...
View 2 RepliesBasically, for my first VB project, I am creating a virtual keyboard where a sound is played from the resources on KeyDown. So far, the program seems to work except for the fact that each key needs to be clicked by the mouse before the sound is played by pressing each key (hence put the object in focus), where I need the key to play the sound without clicking the keyboard key (put the object in focus on KeyDown). Below is an example of my code:
Private Sub C_KeyDown(ByVal sender As System.Object, ByVal e As PreviewKeyDownEventArgs) Handles C.PreviewKeyDown ' C is the label attached to the first 'Rectangle' (Key)
If (e.KeyCode = Keys.A) Then 'The A key should activate the C key on the keyboard
[code]....
I have KeyPreview set to 'True' under the form's properties.
Ok here's my dilemma. here's this code I have:
If e.KeyCode = Keys.A Then
TextBox1.AppendText("C, ")
PictureBox2.Visible = True
[code].....
this code works
Private Sub TxtLname_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TxtLname.KeyDown
If e.KeyCode = Keys.Enter Then
If IsNumeric(TxtLname.Text) Then[code]....
when I replace the keys.enter with "keys.tab" it won't work..
Private Sub TxtLname_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TxtLname.KeyDown
If e.KeyCode = Keys.tab Then
If IsNumeric(TxtLname.Text) Then[code].....
my child form is a game that allows user to move using keydown event (arrow key left and right). But when i import it to MDI, keydown event doesn't work anymore. Am i missing something here?
View 3 RepliesABCDE keydown events, the ones I needed, are not firing. I even set my Form KeyPreview to true but no joy.
up and down arrow keydown events work though.[code]...
how to use the keydown event soif you press 'A' a messagebox will popup saying you pressed A else it will say This function is not reconised i am hoping to use this knowlage to start a game so that if you press W the image will go up.
View 8 RepliesIs it possible to use the KeyDown on a picturebox?What I want is that when somebody presses the SPACEBAR the cursor has to change in the Hand-icon...and additionally do some operations when moving over the picturebox. I fact...when spacebar hasn't been pressed you can just move around the picturebox, without anything happening...with the spacebar pressed the cursor should change and you should be able to scroll the image using the mouse moving.
what I have is :
'in my global sub that loads everything, not the Main.Load, because he has to check some stuff in advance
AddHandler ACO_graph.PreviewKeyDown, AddressOf Me.ACO_graph_PreviewKeyDown
AddHandler ACO_graph.KeyDown, AddressOf Me.ACO_graph_KeyDown
[code]....
Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
If e.Control Then
MessageBox.Show("aaaa")
End If
End Sub
As you can see, my form will check for when the control key is pressed down.But it doesn't work. Why?
why does the keydown event not responding when i put a button on the form?all are set but after i put one button keydown event is not working...
View 9 RepliesI am trying to call the form_Keydown method from a procedure, CharacterJump()
Here is my
Keydown
frmGame_KeyDown(Nothing, New KeyEventArgs(Keys.Right))
What I am trying to do is after the user moves the character with the right arrow key and presses the up button to jump while still holding the right arrow key, the character will continue on moving, but the code that I put only does one movement and does not keep going.
Edit: I think I know the reason why it is only doing it once; it is because the keydown procedure is being called and therefore only executed once. The question is, how do I make it so it goes to keydown and doesn't return?
I am running out of function keys and it will be nice if I can double up on some of them with the Shift Alt or Ctrl keys.I am using
if e.keydown = keys.F3 then{it does what it is supposed to}end if I tried e.keydown = keys.F3 AND e.keydown = keys.Shift but it gets ignored. Am I seeking the impossible or am I just missing something?Can some one tell me what I am missing or point me to an example?
I have a web browser in my application. A simple one with a URL bar at the top, some back and forward buttons, the web browser component and a few other stuff. One thing I want though was a 'full screen' option. In most web browser, if you press F11 it goes full screen. I can make the web browser go full screen but I can't get the F11 short cut to work.it seems, I can only do it when the web browser component isn't focussed
View 7 Repliesin my Application i have created a status strip which has three lable to show capslock status, numlock status and current date.I have used the following code, it is working perfectly when Master(MDI Parent) Load but it dosen't change when key is pressed. every time i start my application it shows the current status of the keys but dosent change when key is pressed.[code]
View 1 Replieshow to get a keydown even to work but in 2010 this seems to have changed
Private Sub Form1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress
If e.Keycode = Keys.Enter Then
MsgBox("test")
End If
End Sub
Apparently "KeyCode" is not in use anymore..
Im currently writing a program to control a Velleman k8055 usb interface, i started by assigning keyDown and Keysup to control outputs. this worked fine, now ive added buttons to control the same outputs with MouseDown and Mouseup. however when i start to debug, the mouseup and mousedown works fine, but not the keys? is there a special code to use them with one another.
Heres some of the codes for each..
Private Sub Button1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Button1.KeyUp
If e.KeyCode = Keys.I Then
ClearDigitalChannel(1)
[CODE]...
I want to know how to do a keydown at form level. If I am not using Form Level the right way, this is what I mean. In my Form there is nothing.I want it so when the user presses a key that it will msgbox() something.As I said, there is nothing on the form what so ever No ComboBox, Button, nothing.
View 2 RepliesThis simple code works at child form, but not at MDI form.
Is there anything should I add or change?[code]...
I have checked my code countless times, tried other computers, and yet the keydown event will not work.
My code:Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyRight Then
imgPerson.Left = imgPerson.Left + 500
End If
End Sub
That's all there is because I was just testing it out. imgPerson does exist, so that's not a problem.
if I press F1 on another program like, internet explorer, it will open music. When I press F1 on my Windows Form(My program), It work fine and it play my music but when i'm on internet explorer or anything else it doesn't work and I am wondering if I can.
View 7 RepliesI have a pong type of game and I want the spacebar to pause the game... Here is my code to detect when the space bar is pressed.
Private Sub PongMain_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyValue = Keys.Space Then
Application.Exit()[code]....
For some reason the application is not closing... IS there something wrong with this code that I am not seeing?
I need to monitor KeyDowns outside of my application (probably running in a NotifyIcon) so I can detect a certain key combination to do something. How can I do this? I read somewhere before about using a process.
View 10 RepliesHow do I check for a null object in a subroutine handle?
Private Sub Form1_KeyDown( _
ByVal sender As Object, _
ByVal e As System.Windows.Forms.KeyEventArgs) _
[code]......
Public Class Form1
Inherits System.Windows.Forms.Form
Dim ct, ctJmp, ctRgt, ctLft, wait, wait2, origTop As Integer
Dim jumping, up, down, lft, rght As Boolean
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
[Code] .....
Basically what I want to do is if the player is still holding the right arrow key after the up arrow is pressed and jumping finishes, I want him to continue to run.
stop do-loop with keydown
View 5 RepliesI am extremely new to visual basic and it is the first time i have ever tried to program anything. I am currently using Visual Basic 2008 Express Edition which I downloaded for free off of the mictosoft website. Anyhow, to the question at hand: I was wondering how one would use keydown commands in VB express 2008. I have looked far and wide and have yet to find an answer to this. To simplify it to a specifit answer how would I move (or rather, slide), say, a picturebox to the left of the screen by holding down the left arrow key and have the picturebox stop moving after I released the arrow key. By simply seeing how the code is I should be able to do it for any other keydowns.
View 2 RepliesI am having trouble using keydown for the spacebar in a form.I would like the spacebar to start/stop a StopWatch that I have running. I can get that to work fine but whenever I am focused on another button it also executes that buttons function also.I know that is the default behavior for the enter key and spacebar but I would like to override that.
View 5 RepliesI am making a game that involves using the arrow keys I have been using the keydown function for the form but when i use it now all the timers seem to stop. this was my previous code for the arrow keys using the keydown function:
If e.keydata = keys.up Then
If pbxship.Top <= 77 Then
pbxship.Top += 10
Else
[Code]...
but this does not do anything like the keys are not pressed, does anyone know how to make it work or a different way to do this in a timer
Well I'm currently in the middle of adding a few fine details to a program I'm busy with. Basically whats happening though is that I want to be able to delete some settings on the fly instead of individually, I also want to accomplish this through a simple key press.
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyCode = Keys.F1 Then
MsgBox("Do you wish to remove all entries and clear all relative data?", MsgBoxStyle.YesNoCancel)
If MsgBoxResult.Yes Then
[code]....
