當前位置:編程學習大全網 - 網站源碼 - 急求VB代碼書中的習題

急求VB代碼書中的習題

我有壹個賽馬手,呵呵...

選項顯式

私有子命令1_Click()

定時器1。啟用=真

末端接頭

私有子窗體_Load()

定時器1。間隔= 100

定時器1。啟用=假

末端接頭

私有子定時器1_Timer()

使不規則化

圖片1。左= Picture1。Left + Rnd * 100

圖片2。左=圖片2。Left + Rnd * 100

如果圖片1。Left & gt6000或圖片2。Left & gt那就6000

定時器1。啟用=假

如果圖片1。Left & gt圖片2。然後向左

標簽1。caption = "第65438號+0勝"

其他

標簽1。caption = "第二名獲勝"

如果…就會結束

如果…就會結束

末端接頭

  • 上一篇:萬家購物好嗎,?有風險嗎?
  • 下一篇:onexplayerrgb燈快捷鍵
  • copyright 2024編程學習大全網