close


發問區
會員登入 新使用者？立即註冊 . 服務首頁|服務說明|Yahoo!奇摩. 知識+ 首頁 知識分類 電腦網路 科學常識 醫療保健 煩惱心事 生活資訊 手機通訊 休閒嗜好 視聽娛樂 運動體育 社會人文 商業金融 教育學習 .如何做 煩惱 主題知識 .我要發問 發表 我要發問 ..熱門： 新年賀詞 年菜食譜 過年禁忌 犯太歲 平溪天燈節 主題 金蛇報喜，大過好年 用手機上知識+ .知識搜尋 ....知識+ 首頁> 電腦網路> 程式設計> C&C++ 加入追蹤 轉寄朋友 友善列印 .知識問題| 誰是Visual Basic高手？ 急~ 20点~~. 發問者： 廣哥 ( 初學者 5 級) 發問時間： 2010-01-09 18:50:31 解決時間： 2010-01-10 17:36:53 解答贈點： 20 ( 共有 0 人贊助 ) 回答： 1 評論： 0 意見： 0 [ 檢舉 ] 網友正面評價 0% .共有 0 人評價.題目：放一個Lable在表單裡隨便一個地方 執行時 用滑鼠任意點擊8個地方 點完之後 那一個Lable 會開始按照所點擊的順序跑 有人會做ㄇ 我要程式碼 和註解 還有執行的結果 拜託各位大大 我試了好幾變都失敗 所以請大大分享一下您的結果檔 和程式碼 2010-01-10 16:23:32 補充 有些好像是C語言的？ 我看不懂意思 可以解釋一下ㄇ 最佳解答發問者自選 .. 回答者： MrAYD ( 研究生 5 級 ) 擅長領域： C&C++ | VisualBasic 回答時間： 2010-01-09 22:02:24 [ 檢舉 ] . Public Class Form1 Dim i As Integer Dim j As Integer Dim ObjLocation(7) As Point Dim timerObj As New Timer() Private Sub RunObj(ByVal sender As System.Object, ByVal e As System.EventArgs) If j > 7 Then j = 0 End If Label1.Location = ObjLocation(j) j = j + 1 End Sub Private Sub Run_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Run.Click i = j = 0 AddHandler timerObj.Tick, AddressOf RunObj timerObj.Interval = 1000 timerObj.Start() End Sub Private Sub Form1_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseClick If i

arrow
arrow
    文章標籤
    facebook facebook網頁 facebook登入 facebook註冊 facebook官網 facebook廣告 facebook社群 facebook粉絲頁 facebook粉絲 facebook部落格 facebook社團 facebook正妹 facebook分享 facebook人氣 facebook相簿 facebook熱門 facebook遊戲 facebook討論 facebook買賣 facebook購物
    全站熱搜
    創作者介紹
    創作者 phibrain267 的頭像
    phibrain267

    youtubemp3轉檔

    phibrainno14 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄