⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 readme.txt

📁 rocket 演示了控制图片移动的方法
💻 TXT
字号:
		Rocket Blast Off
Version 1.4.0
Written with VB4-32 - Win95 compatible
		    - It may run in Win 3x

(use word wrap for ease of reading)

Ham & Ham Services
Ed Hammond
hamham@harborside.com

Uddip Mitra, indioman@hotmail.com, taught me how to make the mouseup function work.
******************************************************* 
See PROGRAM OPERATION below for questions on how to use the program.
******************************************************* 

		Program History

This is something I originally made in VB 3 class. I used command button click events to make the rocket move. Now it uses mousedown and mouseup events to scroll the rocket. The program also uses the Select Case function instead of If statements to select the direction of movement.

Uddip taught me to use the DoEvents statement to pause a loop and check for other events to be processed. Specifically the MouseUp event in this case. Before each loop is completed it checks for the MouseUp event using the DoEvents statement. 

I have included both the source code and the exe program in this zip file. If you use the exe file you will have to create your own shortcut as there is no setup program. If you use the code in another program please let me know. If you make improvements to this please send me a copy of the code.

******************************************************* 

		PROGRAM OPERATION

		Rocket Blast Off

This is a simple program to show how to use the MouseDown and MouseUp events. 


- Left Button
If you push down the left mouse button, on the Left Button the rocket will scroll from right to left on the form. When the rocket reaches the left side of the form it will disappear and reappear on the right side of the form. This scrolling action will continue until the left mouse button is released.

- Right Button
If you push down the left mouse button, on the Right Button the rocket will scroll from left to right on the form. When the rocket reaches the right side of the form it will disappear and reappear on the left side of the form. This scrolling action will continue until the left mouse button is released.

- Up Button
If you push down the left mouse button, on the Up Button the rocket will scroll from down to up on the form. When the rocket reaches the top of the form it will disappear and reappear on the bottom of the form. This scrolling action will continue until the left mouse button is released.

- Down Button
If you push down the left mouse button, on the Down Button the rocket will scroll from top to bottom on the form. When the rocket reaches the bottom of the form it will disappear and reappear at the top of the form. This scrolling action will continue until the left mouse button is released.

- Exit Button
This menu option will end the program.

- Help Button
This Button will run this file (readme.txt). When Help is selected a message box will open and ask "Do you wish to read the program instructions?". It has two buttons, Yes and No. One of these buttons must be selected.

- Yes Button
The yes button will open the "readme.txt file that contains instructions on how to use the program and a history of this program.

- No Button
The no button will close the message box and display the form the way it was before Help was selected.

*******************************************************			    End of File
*******************************************************

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -