以下題目為設計一個賽跑程式
| 物件 | 屬性 | 設定 |
| Label1 | ||
| Label2 | ||
| Picture1--(第一隻龍) | picture | Rdino.gif |
| backcolor | &H80000009& | |
| boderstyle | 0-沒有框線 | |
| Picture2--(第三隻龍) | picture | Bdino.gif |
| backcolor | &H80000009& | |
| boderstyle | 0-沒有框線 | |
| Picture3--(第二隻龍) | picture | Gdino.gif |
| backcolor | &H80000009& | |
| boderstyle | 0-沒有框線 | |
| Command1 | Caption | 結束 |
| Command2 | Caption | 開始 |
| Timer1 | interval | 100 |
以下三行程式必須打在一般--宣告
以下程式點二下Command1--結束按紐，再開始輸入
