How Do I Make A Shape Stop Moving?
I have a shape(Shape1) that you can move with the arrow keys....how do i make the Shape1 cease to move when a certain event happens, even though the arrow keys are still pressed?
thanks for any help!
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
How To Stop The Shape From Flickering(A Shape Control Is Used)
Hello Every1,
I have a peuliar problem for u guys. Follow closely the code given below......
Dim x1 As Single, y1 As Single
Dim draw As Boolean
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
x1 = X
y1 = Y
draw = True
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If draw = True Then
Shape1.Left = x1
Shape1.Top = y1
Shape1.Width = X - x1
Shape1.Height = Y - y1
End If
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
draw = False
End Sub
The shape sizes according to our mouse, the only problem is the shape flickers. Can any1 stop that flickering. I'll be really happy if any1 can do it for me. Thank u...
PS: I have tried changing the AutoRedraw & ClipControl options on & off. They dont help...
Stop People From Deleting A Shape?
Hi,
I'm working on a report where text gets moved from one cell to a different sheet (into a control) during the macro. Originally when this was done, it was noticed that there was a limit to the number of characters that the cell will allow (1024 I think). In order to circumvent this problem, an autoshape was overlaid on the cell, because it could handle a lot more characters for whatever reason (nothing gets cut off when the text it moved over). The problem now is that if people delete the autoshape, a lot erros can happen, because the code is looking for that shape.
So this is what I need help with...either
I need to find a new way to have more than 1024 characters in a cell be copied over into the control during the macro without using an overlaid shape on the cell (cause this seems dumb to me)
OR
I need a way to stop the users from deleting the shape. I know you can protect the worksheet, but I'm not totally sure how this works, and I don't want everything to be locked?
Any help would be greatly appreciated!
Dawn
Moving A Shape
I am wanting to move a shape using the arrow keys but everytime i press an arrow key i get a message saying invalid use of property what can i do to get this to worK???
The Moving Shape.
I have a circle shape on a form and the following code in a Timer Control
(Interval = 1000): Shape1.Left = Shape1.Left + 100
I want to move the shape left by 100 twips every second. That works fine but I am having trying to write code to stop the shape when the Shape1.Left property = 2000.
Can anyone help ?
Fogless.
Moving A Shape Around
What would be an effective way to manipulate a shape on
a form, by way of using the mouse(mouseDown??) to
move it around the form?
Any suggestions would be greatly appreciated...
Moving Shape
i have a circle and i want to move it all over the form by using arrow buttons. can someone teach me please? thank you
Moving A Shape
can anyone tell me how to move a shape like the wat you can make a label move around the form?
ythanks in advance
Moving Shape
HI EVERYONE!!!!!!!! LETS GET THIS PARTY PUMPIN YALLLLL I AM NEEDIN SOME HELP IF YALL DON MIND THEN HOOK ME UP WIT DA INFO. how can i make a shape either follow a cursor, or move using the arrow keys on the keyboard? thanx YALL!!!!!!!!
Moving A Shape With Keys ?
I want to move a (circle) Shape1 with keys, (up, right, etc). Here is my code that isn't working:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyDown
Case 37 'Left arrow
Shape1.Left = Shape1.Left - 40
Case 38 'Up arrow
Shape1.Top = Shape1.Top - 40
Case 39 'Right arrow
Shape1.Left = Shape1.Left + 40
Case 40 'Down arrow
Shape1.Top = Shape1.Top + 40
End Select
End Sub
Can someone tell me what the problem is ?
fogless.
Moving Shape Speed Help, Please
I'm fairly new to VB (mainly started using in Sept of this year), and I'm having some difficulties with a project I have to do in school. I need to move a shape diagonally and get it to speed up, but I cannot lower the intervals of the timer, because that would just be too easy for my teacher. I have it mostly. I can get the shape to move back in forth in a dimond and stay in the form without going off. I just can't figure out how to get it to speed up. He makes us use two dims: xadder and yadder. This is how he wants it to be, except I'm missing how to make it accelerate and something else in timer, I believe:
Dim yadder As Integer
Dim xadder As Integer
______________________________________
Private Sub Form_Load()
xadder = 100
yadder = 100
End Sub
______________________________________
Private Sub Timer1_Timer()
If Shape1.Left > 300 Then yadder = -200
If Shape1.Left < 10 Then yadder = 200
If Shape1.Top > 300 Then xadder = -200
If Shape1.Top < 10 Then xadder = 200
End Sub
Thank you for helping an idiot!
Moving Shape Game
I need to create a form that will allow a shape(e.g.a black square) move around the screen, when the user presses certain letters the shape moves ie. W(up),A(left),S(right),and Z(down).
every time the shape moves in a direction it should change shape and colour ie.right(change to red circle),left(change to blue square),up(change to green rectangle),down(change to yellow oval).
If the shape is past one of the form edges the shape should reset to the middle of the form, and under any of the following conditions the user should see the appropriate message:
EDGE SHAPE/COLOUR MESSAGE
Top Red Circle "Up and Around"
Left Yellow Oval "Left behind again"
Bottom Blue Square "Rock Bottom"
Right Green Rectangle "Right out of it"
Any help is very much appreciated.
Moving Shape Back And Forth
For some reason I am not getting this today. I need my shape to move left + 12 then when it reaches 3756 move backwards. Here is the code I have so far what am I missing?
[vb]
Private Sub Timer1_Timer()
S_Ball.Left = S_Ball.Left + 12
If S_Ball.Left >= 3756 Then
Do Until S_Ball.Left = 12
S_Ball.Left = S_Ball.Left - 12
Loop
End If
End Sub
[/vb]
Moving Excel Chart/Shape???
I have the following code that generates an Excel chart on the worksheet that is passed to it. The creating of the chart works fine but I am having trouble moving the chart where I want to after it is created. I am passing several different worksheets through this code and it bugs out after the first sheet because I have not been able to find an effective way telling it which chart/shape I want to move. Right now I have the shape index manually coded in but only works for the first chart. Any suggestions would be helpful.
CODE
Public Function addHeaderFooter(ByVal wrksheet As Excel.Worksheet, ByVal headerText As String, ByVal footerText As String)
With wrksheet
.PageSetup.Zoom = False
.PageSetup.CenterHeader = headerText
.PageSetup.CenterFooter = footerText
.PageSetup.Orientation = xlLandscape
.PageSetup.LeftMargin = (0.5)
.PageSetup.RightMargin = (0.5)
End With
End Function
Public Function createChart(ByRef excelapp As Excel.Application, ByRef wrksheet As Excel.Worksheet, _
ByVal startRow As Integer, ByVal endRow As Integer)
Dim eChart As Excel.Chart
Dim chartName As String
With wrksheet
Set eChart = wrksheet.Parent.Charts.Add
With excelapp
.ActiveChart.ChartType = xlLineMarkers
.ActiveChart.SetSourceData wrksheet.Range("G" & (startRow) & ":G" & (endRow) & ", " & "E" & (startRow) & ":E" & (endRow) & "")
.ActiveChart.SeriesCollection(1).XValues = wrksheet.Range("B" & (startRow) & ":B" & (endRow) & "")
.ActiveChart.SeriesCollection(1).Values = wrksheet.Range("G" & (startRow) & ":G" & (endRow) & "")
.ActiveChart.SeriesCollection(1).Name = "=""CWT"""
.ActiveChart.SeriesCollection(2).Values = wrksheet.Range("E" & (startRow) & ":E" & (endRow) & "")
.ActiveChart.SeriesCollection(2).Name = "=""WEIGHT"""
.ActiveChart.Location xlLocationAsObject, wrksheet.Name
.ActiveChart.SeriesCollection(2).AxisGroup = 2
chartName = .ActiveChart.Name
End With
'INCREASING SIZE OF CHART
With excelapp
.ActiveChart.PlotArea.Select
With excelapp.Selection
.Width = 300
.Height = 130
End With
End With
'ADDING TITLE TO CHART
With excelapp.ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = "CWT"
.Axes(xlValue, xlPrimary).HasTitle = True
.Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "CWT"
.Axes(xlValue, xlSecondary).HasTitle = True
.Axes(xlValue, xlSecondary).AxisTitle.Characters.Text = "Weight"
End With
'ADDING LEGEND TO CHART
With excelapp
.ActiveChart.HasLegend = True
.ActiveChart.Legend.Position = xlLegendPositionBottom
End With
'MOVING CHART BELOW FINAL LINE OF DATA
With wrksheet.Shapes(2)
.Top = wrksheet.Rows(endRow + 3).Top
.Left = wrksheet.Columns(1).Left
End With
'MOVING CURSOR BACK TO FIRST CELL
With wrksheet
.Cells(7, 1).Select
End With
Set eChart = Nothing
End With
End Function
Creating, Coloring, And Moving A Shape (circle)
I'm making a screen saver type program and It needs a moon at the top to move. I know I need to use a timer, but I don't know how to make a circle, color it white, and move it across the screen. Also, if you could post code instead of .zip files (because I have to put the file on a disk and take it to my teacher for it to be unzipped) I would appreciate it.
Thanks
Stop Txt Moving
can any1 tell me how u stop txt that is in side a pic box moving ever thing u click in the box
Pic Box, Object To Stop Moving
what im trying to do is make it so that i have one bit picture box and a pong design interface inside it(this is a final assignment im making a variation of pong) anywho what im trying to do(and tryed everything i've thought of) is to get it so that when you drag the padel down it cannot pass the line at the top or the bottom, and both these lines are drawn, not made at runtime. thanks for help
also after you hit the line you cannot go down or up further then the line, and you can continue moving inside the two lines
Trying To Stop A Form Moving
hi, i am making a program that has docking forms onto the main mdi form. I am trying to make it so that the forms can be docked and undocked. I have so far made a timer that keeps a form in its position all the time but when the user tries to drag the form it flashes and such and then returns to the position wheras i don't want it to move at all, is there any way i can subclass it to stop it moving?
Flicker-free Drawing When Moving A Shape Control Very Fast
Hi there! I coded the following :
option Explicit
private Sub Command1_Click()
Timer1.Enabled = true
Timer1.Interval = 20
End Sub
private Sub Timer1_Timer()
Dim i as Integer
'MyPicture is a shape control
for i = 0 to 2000
MyPicture.Move pictureLift.Left, MyPicture.Top - 1
next i
End Sub
These lines of code means that when the command button is clicked, the shape control will move up to the top of the form.(it's originally at the bottom of the form)
Now, as you can see, the moving code is trigger every 20 milliseconds, which is very fast. of course, there's heavy flicker around the shape object.
In VB, is there anyway to get rid of this flicker?
I know there's this technique that draws on a memory DC, and then bit-blts the whiole thing onto the screen.
But this approach doesn't seem to work at all well here......is there any other ways u coders know? Thanks a lot! :-)
ListView - Stop Icons Moving
Hi,
I'm using a listview control in the Icon mode, to display a control panel for my application. The only problem is that when a user clicks an icon, when you move the mouse it moves the icon as well.
Is there any way to stop the user moving the icon?
Stop Maximized Form From Moving
I am using a picturebox as a container to act as a mdiparent because only 1 midparent is allowed when I need 2. When I maximize a "child" form, the title bar is still visible which enable the user to move the max form. I get an error when I set moveable=false during runtime. Is there any way to stop the maxed form from moving? Thanks.
How Do I Stop Flickering In Moving Graphics?
I haven't dealt with graphics in vb before, but I know of a common graphics method to reduce/eliminate flicker in animations called double-buffering.
The flicker is caused from clearing the old frame before drawing the new one. To counter this problem you actually would have 2 picture boxes (or whatever you're using) the first one is the visible one that will display the animation. On the second buffer, you do the calculations for the next frame and place all the objects there, then once the frame is ready for display you change the image on the visible buffer to that of the second buffer.
Since I haven't done this in vb before I'm not to helpful in the code department, but hopefully you'll find this method usefull.
Trying To Stop Moving Past Last Record
I am writing a database with a number of tables with forms atttached to each table. I have placed navigation buttons on each form to move to first, last, next, previous. I have set up the code associated with the buttons as "public sub" so it is available for each form to use.
This was working OK except that when I used the NEXT button at the last record it would open a new blank record & keep opening a new blnak record on each click.
To over overcome this I put in an If statement to check if it had moved to a new record. To do this I used the following:
If Me!NewRecord Then ..... etc
Now I get an error "Invalid use of Me key word" I suspect it is because I am using ME in a public sub
How do I overcome the problem of moving passed the last record and still have the coding available to all forms?
The Code is below.
Thnaks for any help.
Public Sub Next_Record_Click()
On Error GoTo Err_Next_Record_Click
DoCmd.GoToRecord , , acNext
If Me!NewRecord Then
' If new record move back to previous
DoCmd.GoToRecord , , acNext
' Send message
MsgBox "This is the last record", , "No More Records"
End If
Exit_Next_Record_Click:
Exit Sub
Err_Next_Record_Click:
MsgBox Err.Description
Resume Exit_Next_Record_Click
End Sub
Stop User Moving The Chart Around In MsChart
VB6 SP6
I am using MsChart. I need to allow selections but when this is set to True users can click on the chart and move the plot area around the unplotted area.
Anybody know a way to avoid this
Thanks
Stop Item Dragging/moving In ListView
Is there any way you can stop the user from moving the item position in a listview?? I need them to stay the same as i added them first by code, with them being fixed for the user and not allowing any movement of item position!
thanks!
Stop A Moving Image Drawing Over Other Lines...
I have the following code which moves a little image control across the form, but what happens when it moves across slowly is it sort of half draws over lines that I have on the form....how can i get it so that it doesnt draw over the other lines and leaves them intact....so that it doesnt leave this kind of trail.....
VB Code:
Private Sub Timer1_Timer()If Image2.Left < 9240 Then Image2.Left = Image2.Left + 1'only move the picture one space over if it isnt alreadt at the desired locationEnd IfEnd Sub
How To Stop Cursor Keys Moving Focus ?
I am writing a program where an object can be moved round the screen. I first did this using command buttons and then wanted to add the option of using the keyboard cursor keys.
KeyAscii and/or KeyCode worked for most keys but not the cursor keys which didn't seem to generate any events. I got something working using an API call (GetAsyncKeyState).
The bit which still bugs me is that when the user presses the cursor keys, as well as moving the on-screen object, it also moves focus round the various command buttons.
Can anyone suggest how to stop this happening ?
Making A Label Stop Moving When It Hits A Certain Point[solved]
I have a long Label, it shows text, I want it to scroll slowly, but how do I make it stop at a certain point, If I do
VB Code:
Private Sub tmrAbout2_Timer() DoEvents LblAbout.Top = LblAbout.Top - 10 DoEventsIf LblAbout.Top <= 0 Then tmrAbout2.Enabled = FalseEnd Sub
Then it stops when the top of the label hits the top of the form/frame, I want it to scroll through the top of the frame, Its fine if I dont put an If then but it keeps going forever.
Possible To Make A Shape Clickable?
Hello!
I was wondering if there is any way to let the user actually click a shape (like a circle for example) so it fires a command?
At least for me, it seemse that a shape ain't by start an "object".
/Pedalen
How To Make A Shape Blink?
Hi i use this little code and would like to know how i make the Shape blink while the timer is counting down.
Frank
Private Sub Command1_Click()
Timer1.Enabled = True
Timer1.Interval = 1000
End Sub
Private Sub Form_Load()
Label1.Caption = 120
End Sub
Private Sub Timer1_Timer()
If Label1.Caption > 1 Then
Label1.Caption = Label1.Caption - 1
Shape1.BackColor = &HFF&
ElseIf Label1.Caption = 1 Then
Timer1.Interval = 1
Label1.Caption = 0
ElseIf Label1.Caption = 0 Then
Shape1.BackColor = &HFF00&
Timer1.Enabled = False
End If
End Sub
How Can You Make A Shape From Pure Code
I need my application to make a shape control while the application is running, it would like the user click's a command button, and a new shape is made. How the heck would i go about doing that. thanks for the help!
How Do I Make A Shape Move Towards A Click?help!
ok i have an idea for a useless but interesting program. see, the problem is that i dont know how to accomplish what i want to do. here ill describe the program: there is one form. on the form is a shape. when you click and hold your mouse on the form, I want the shape to move/"walk" towards the click/hold spot, but not just transport i want it to visibly "roll" "walk" "slide" or whatever you want to call it towards it. I think it has to do with using a timer and some mathematical equations , but I dont know the exact way to do it. its probably a really easy solve...i dont know. thanks for any help!
How To Make ADO SHAPE RELATE Case-sensitive.
We use the ADO SHAPE command to produce a hierarchical recordset.
The comand looks like this :
SHAPE APPEND new adVarChar(21) As st, new adVarChar(21) As version
( ( SHAPE APPEND new adVarChar(21) As st, new adVarChar(21) As version )
RELATE st TO st, version TO version ) As layoutX
This works fine, except that RELATE works case insensitive, which is the MS Jet Engine standard.
I would like my records to be related in a case-sensitive way.
Now in sql it is still possible using the StrComp function :
SELECT Table1.ID, Table1.Description
FROM Table1, Table2
WHERE StrComp(Table1.ID, Table2.ID, 0) = 0
But how to do this using the SHAPE command.
Kindest regards,
Bart De Ganck
Make A Shape Move At Angle Of Line
Hello,
I've been working on this program frantically for a while and can't come up with any solutions towards making a shape of a ball called shape1 move at the angle of a line, called line1. I tried the code below to almost success. Does anyone know how? I know the angle of the line, but don't know how to do this.
VB Code:
shell.Move shell.left + velocity, shell.top - angle
How Can I Make Just A Form Transparent So My Prog Can Look Like It Has A Dif Shape?
I want to be able to have a picture in the background that makes up my program shape. Like a circle or something... Just not a square ya know. Is there some code I can use that will allow me to do this? I found some code that used a module but that made my images disappear as well and just left the buttons. Any thoughts or code would be great!
How To Make A Form Irregular In Shape And Style???
Hello Chaps and Chappettes
I am wanting to customise my gui I know that it is possible to make a form a custom shape and style, however I have no idea of how to go about doing this.
If someone could give me an idea of where to start or of any online resources/tutorials it would be very helpful
Thanks in advance
Make It Stop! Help!
Hey, have any of 'yall been programming a graphics routine and VB "locks up your system".
You can't click on any buttons or anything because it's busy.
Now, isn't DoEvents supposed to solve that? Well, it doesn't.
You try to stop your program with Ctrl-Break and it takes like 10 seconds! Arg.
How do you fix this?
Make It Stop Beeping!!!
I'm working on a database entry form. There are a number of date feilds and I thought it would be nice to have a shortcut to automaticly insert the current date.
ctrl+D Easy enough for the user to remember...
I have gotten the code to work but there is one minor problem. Windows plays the default beep when the user presses ctrl+D!!!
This happens both with text boxes and masked edit boxes.
I understand the logic behind this. If you use a key conbination such as ctrl+z that has an actual function it doesn't beep. The beep is to let the user know that the key combination that they pushed has no effect. But in my application it does have a valid use!!!
Is there a way to supress this beeping?
Or does anyone have a better method of acomplishing the same thing?
Please, Make My Program Stop!
I have an Exit button that Unloads the form and a long series of calculations and DoEvents. When the Exit button is clicked, the form uloads but the code continues to execute and causes an error (obviously the vars, arrays, etc. no longer exist!). Microsoft says to use "Set form1 = Nothing" but this doesn't appear to do anything.
Is there a way to get the code to really terminate?
Jon
Make Pong Stop Flashing
So, Here be my problem, I am making a pong game> I have already drawen the paddels and the ball in Macromedia Fireworks. The back of the ball is transparent. Here lises the problem. When i move the ball [Ball.top = Ball.top + Inrement ], the space around the ball flutters. Like it blinks wite. I have gifs for the paddels too, and they do the same thing. The backs of the paddels are curved. So, i need to remove this flashing.
Halt System! Make It Stop!
How can I stop my computer from continuing...
I'm working on a passwordprogram, and I want WinME to stop working while the program runs..
Just like scandisk does @ boot...
10 out of 7 people don't see the logical error in this signature...
How To Make Random Colors Stop??
Alright, well I have a background that is randomly changing colors, and I want the user to be able to stop it when a check box is checked, how do I do this. the code I have for the random color changing is:
Private Sub Random_BG()
'This function will change the background color randomly
Call Randomize
'Each 256 represents the color depth, while each Rnd() is for each of the
'RGB colors
BackColor = RGB(Rnd() * 256, Rnd() * 256, Rnd() * 256)
End Sub
Hotkey To Make Program Stop?
Alright, what I have here is a program for a silly game called Runescape. It clicks where you put your mouse every 1.6 seconds, and it has an autotyper (in other words, it types a selected phrase. First I just made the autotyper, that works great, all is well. Now I tried to add an autoclicker, which is 10x harder, and I get an error. someone look over this code for me and I'll post the error I get.
THIS PARTS SOLVED read further posts.
VB Code:
Public Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)Public Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As LongPublic Declare Function GetCursorPos Lib "user32" (lpPoint As POaINTAPI) As Long Public Const MOUSEEVENTF_LEFTDOWN = &H2 Public Const MOUSEEVENTF_LEFTUP = &H4 Public Const MOUSEEVENTF_MIDDLEDOWN = &H20 Public Const MOUSEEVENTF_MIDDLEUP = &H40 Public Const MOUSEEVENTF_RIGHTDOWN = &H8 Public Const MOUSEEVENTF_RIGHTUP = &H10 Public Const MOUSEEVENTF_MOVE = &H1Public Type POINTAPI X As Long Y As Long End Type Public Function GetX() As Long Dim n As POINTAPI GetCursorPos n GetX = n.XEnd Function Public Function GetY() As Long Dim n As POINTAPI GetCursorPos n GetY = n.YEnd Function Public Sub LeftClick() LeftDown LeftUpEnd Sub Public Sub LeftDown() mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0End Sub Public Sub LeftUp() mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0End Sub Public Sub MiddleClick() MiddleDown MiddleUpEnd Sub Public Sub MiddleDown() mouse_event MOUSEEVENTF_MIDDLEDOWN, 0, 0, 0, 0End Sub Public Sub MiddleUp() mouse_event MOUSEEVENTF_MIDDLEUP, 0, 0, 0, 0End Sub Public Sub RightClick() RightDown RightUpEnd Sub Public Sub RightDown() mouse_event MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0End Sub Public Sub RightUp() mouse_event MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0End Sub Public Sub MoveMouse(xMove As Long, yMove As Long) mouse_event MOUSEEVENTF_MOVE, xMove, yMove, 0, 0End Sub Public Sub SetMousePos(xPos As Long, yPos As Long) SetCursorPos xPos, yPosEnd SubPrivate Sub Clicker_Timer() mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0End Sub Private Sub clickstart_Click()If clickstart.Caption = "Stop" ThenClicker.Enabled = Falseclickstart.Caption = "Start"ElseIf clickstart.Caption = "Start" ThenClicker.Enabled = Trueclickstart.Caption = "Stop"End IfEnd Sub Private Sub Command1_Click()If Command1.Caption = "Start" Then Command1.Caption = "Stop" TypInt.Enabled = False typtxt.Enabled = False Timer1.Interval = Val(TypInt) Timer1.Enabled = True ElseIf Command1.Caption = "Stop" Then Command1.Caption = "Start" TypInt.Enabled = True typtxt.Enabled = True Timer1.Enabled = False End If End Sub Private Sub Command2_Click()EndEnd Sub Private Sub Form_Load()Timer1.Enabled = False Form1.ShowEnd Sub Private Sub Timer1_Timer()Timer1.Interval = TypInt.TextSendKeys typtxt.TextSendKeys "{ENTER}"End Sub
Look down for further problem..
Starting Something To Make It Go On Forever Until You Stop It
Ok I want a start button, and a stop button...When you press the start button I want to have something keep going on and on until you press stop...how would this be done? Also if possible no timers because a timer didnt work for what I needed to do
|
TRACKER
