繁體瀏覽工具設為首頁收藏本站
 找回密碼 或 安全提問
 註冊
|註冊|登錄

伊莉討論區

搜索
感激所有對伊莉作出奉獻的人認識好友、聊天，分享生活趣事你準備好成為出色的版主了嗎？
伊莉討論區 › 論壇 › 電腦資訊 › 電腦程式設計 › Visual Basic 語言 › vb2008 select case 問題 !!
刀劍神域無修cosplay柯南母乳鬼滅之刃office
abp 511死神商館花葬巫女雜交別人練級お兄ちゃ凤凰
休閒聊天興趣交流學術文化旅遊交流飲食交流家庭事務PC GAMETV GAME
熱門線上其他線上感情感性寵物交流家族門派動漫交流貼圖分享BL/GL
音樂世界影視娛樂女性頻道潮流資訊BT下載區GB下載區下載分享短片
電腦資訊數碼產品手機交流交易廣場網站事務長篇小說體育運動時事經濟
上班一族博彩娛樂

[繁]月光下的異世界之
(4月新番)[繁]THE NEW
[繁]怪人的沙拉碗03-

[繁]老夫老妻重返青春
[繁]無職轉生 第二季1
(4月新番)[簡]被稱為
C & C++ 語言C# 語言Visual Basic 語言PHP 語言JAVA 語言
返回列表發新帖

查看: 1510|回復: 3
打印上一主題下一主題

[求助]vb2008 select case 問題 !![複製鏈接]

power78917

Rank: 1

帖子
1401
積分
125 點
潛水值
8370 米
跳轉到指定樓層
樓主
發表於 2012-1-1 06:58 PM|只看該作者|倒序瀏覽
如果你忘記伊莉的密碼，請在登入時按右邊出現的 '找回密碼'。輸入相關資料後送出，系統就會把密碼寄到你的E-Mail。
本帖最後由 power78917 於 2012-1-1 06:59 PM 編輯

我要做一個繞著地圖走一圈的人 地圖是 5 * 8 的picturebox ,大小是100*100
移動步數是用骰子決定 程式裡是用walk代表, man1是人物
現在問題是他只會執行case的第一個 ,幫我看一下程式哪裡有問題
想很久了 拜托
  1. Select Case c
  2.             Case man1.Left = 0 And man1.Top = 0, man1.Top = 100, man1.Top = 200, man1.Top = 300, man1.Top = 400, man1.Top = 500
  3.                 man1.Top = man1.Top + walk
  4.                 If man1.Top > 500 Then
  5.                     man1.Left = man1.Top - 500
  6.                     man1.Top = 500

  8.                 End If

  10.             Case man1.Top = 500 And man1.Left = 0, man1.Left = 100, man1.Left = 200, man1.Left = 300, man1.Left = 400, man1.Left = 500, man1.Left = 600, man1.Left = 700, man1.Left = 800
  11.                 man1.Left = man1.Left + walk
  12.                 If man1.Left > 800 Then
  13.                     man1.Top = (800 - man1.Left) + 500
  14.                     man1.Left = 800
  15.                 End If

  17.             Case man1.Left = 800 And man1.Top > 0
  18.                 man1.Top = man1.Top - walk
  19.                 If man1.Top < 0 Then
  20.                     man1.Left = 800 + man1.Top
  21.                     man1.Top = 0
  22.                 End If
  23.             Case man1.Top = 0 And man1.Left > 0
  24.                 man1.Left = man1.Left - walk
  25.                 If man1.Left < 0 Then
  26.                     man1.Top = -(man1.Left)
  27.                     man1.Left = 0
  28.                 End If

  30.             Case Else
  31.                 man1.Top = man1.Top + walk

  33.         End Select
複製代碼
...
瀏覽完整內容，請先 註冊 或 登入會員
分享分享0收藏收藏0支持支持0
升級為尊貴會員或贊助會員，讓你擁有自由、暢通無阻、應有盡有及所有資源任你使用的無窮快感。

使用道具檢舉

darkjack

  專　家(12000/24000)

偶素程式設計下的產物「浻」

Rank: 5Rank: 5Rank: 5Rank: 5Rank: 5

帖子
1412
積分
17880 點
潛水值
38347 米
頭香
發表於 2012-1-1 08:37 PM|只看該作者
若登入不正常或變回訪客狀態，請先刪除COOKIE再登入。
如果你的起始圖案 沒特別設定 那當然會只跑第一個
因為所有的圖形起始點 就是 0,0為 一開始點
本人 都是寫 vb.net 如果看到本人的原創 請自備 .Net FrameWork 3.5
如果你忘記伊莉的密碼，請在登入時按右邊出現的 '找回密碼'。輸入相關資料後送出，系統就會把密碼寄到你的E-Mail。

使用道具檢舉

power78917

Rank: 1

帖子
1401
積分
125 點
潛水值
8370 米
3樓
發表於 2012-1-1 09:23 PM|只看該作者
所有積分大於負-100的壞孩子，將可獲得重新機會成為懲罰生，權限跟幼兒生一樣。
回復
下載: 訪客無法瀏覽下載點，請先 註冊 或 登入會員
darkjack

起始圖案?
那要怎麼設定?
是要讓他每次都確認自己的位置嗎?
可是我在select case裡已經有條件了阿
如果發覺自己無法使用一些功能或出現問題，請按重新整理一次，並待所有網頁內容完全載入後5秒才進行操作。

使用道具檢舉

darkjack

  專　家(12000/24000)

偶素程式設計下的產物「浻」

Rank: 5Rank: 5Rank: 5Rank: 5Rank: 5

帖子
1412
積分
17880 點
潛水值
38347 米
4樓
發表於 2012-1-2 08:31 PM|只看該作者
如果你覺得伊莉做得不錯，那就不要再猶疑了。今天就贊助和支持我們，立即行動！我們需要你的一點力量喔。
一般來說 select case 是你已經確定 或者 固定 的行走路線才用
要不然 select case 很死板的
且 程式的執行永遠都是上到下
如果你用select case 把某些最小值排在最上面 那就會只跑第一個 case 問題


這邊有個 類似問題給你參考
下載: 訪客無法瀏覽下載點，請先 註冊 或 登入會員
...
瀏覽完整內容，請先 註冊 或 登入會員
本人 都是寫 vb.net 如果看到本人的原創 請自備 .Net FrameWork 3.5
如果你忘記伊莉的密碼，請在登入時按右邊出現的 '找回密碼'。輸入相關資料後送出，系統就會把密碼寄到你的E-Mail。

使用道具檢舉

返回列表發新帖
高級模式
BColorImageLinkQuoteCodeSmilies
您需要登錄後才可以回帖 登錄 | 註冊

Powered by Discuz!

© Comsenz Inc.

重要聲明：本討論區是以即時上載留言的方式運作，對所有留言的真實性、完整性及立場等，不負任何法律責任。而一切留言之言論只代表留言者個人意見，並非本網站之立場，用戶不應信賴內容，並應自行判斷內容之真實性。於有關情形下，用戶應尋求專業意見(如涉及醫療、法律或投資等問題)。 由於本討論區受到「即時上載留言」運作方式所規限，故不能完全監察所有留言，若讀者發現有留言出現問題，請聯絡我們。有權刪除任何留言及拒絕任何人士上載留言，同時亦有不刪除留言的權利。切勿上傳和撰寫 侵犯版權(未經授權)、粗言穢語、誹謗、渲染色情暴力或人身攻擊的言論，敬請自律。本網站保留一切法律權利。
回頂部