Re: [VBA ] Array宣告問題

看板Programming作者devil.時間14年前 (2011/06/02 02:01)推噓1(1推 0噓 0→)

留言1則, 1人參與討論串1/1

這種陣列在 VBNET 已定名為不規則陣列。至於是否正確，要看你的需求才知道。從程式碼上來說，是可行的做法。 ==> 本文由 "flare0118 <s963870.bbs@ptt.cc>" > 於 news:568gYk%248KN%40ptt.cc 發表 > ※ [本文轉錄自 Visual_Basic 看板 #1DvF-YI2 ] > 作者: s963870 (flare0118) 看板: Visual_Basic > 標題: [問題][VBA ] Array宣告問題 > 時間: Tue May 31 22:47:59 2011 > Sub SwapBlank(BtnNo As Variant) > Dim i As Integer > Dim Neighbors > Neighbors = Array(Array("2","4"),_ > Array("1","3","5"),_ > Array("2","6"),_ > Array("1","5","7"),_ > Array("2","4","6","8"),_ > Array("3","5","9"),_ > Array("4","8"),_ > Array("5","7","9"),_ > Array("6","8")) > If Controls("CommandButton"& BtnNo).Caption<>""Then > For i = 1 To UBound(Neibors(BtnNo)) > If Controls("CommandButton"&Neighbors(BtnNo)(i)).Caption = "" Then > Controls("CommandButton"&Neighbors(BtnNo)(i)).Caption = > Controls("CommandButton"&BtnNo).Caption) > Controls("CommandButton"&BtnNo).Caption = "" > Exit For > End If > Next i > End If > End Sub > 可以請問這樣ARRAY宣告部分有錯誤嗎? 錯的話應該怎麼訂正?? > -- 風禹科技驗證有限公司 ASP.NET Web News Reader 0.2.9 UTF-8 Beta 網站地圖 http://tlcheng.twbbs.org/wwwmap.htm 流域防洪/區域水資源/徐昇網/玫瑰圖/語音通訊文章與程式 Basic/Fortran/Windows API/.Net/輔助說明檔原始碼、文章與討論微軟程式設計、系統管理使用新技術論壇討論區，網友回覆後即時簡訊、電子郵件通知： MSDN: http://social.msdn.microsoft.com/Forums/zh-TW/categories/ TechNet: http://social.technet.microsoft.com/Forums/zh-TW/categories/ -- ASPNET News Reader http://tlcheng.twbbs.org/News/Reader.aspx RSS 2.0 http://tlcheng.twbbs.org/News/rss2.aspx?Action=List&Newsgroup=tw.bbs.comp.language