Re: [.NET] vb.net中自動新增tabcontrol,tabpage的 …
還是回文好了,感覺比較清楚
※ 引述《aMaa (aMa)》之銘言:
: 大家好!
: 我有個問題:
: 我自動去新增一個tabcotrol,再去新增一個tabpage,再去新增二個tabpage,
: 以下是我的寫法,請大家幫忙,因為我無法新增後二個tabpage
: (我的需求一定要先新增tabcotrol,再新增一個tabpage,再新增二個tabpage)
: dim PartTab as new TabControl
: dim PartTabPage1 as new TabPage
: dim cnt as integer=2
: PartTabPage1.location=new point(10,10)
: TabControl.tabpages.add(PartTabPage1)
: dim subPartTabPage(cnt-1) as TabPage
: for i as integer=0 as cnt-1
這邊你打錯了,應該是 to 才對,但不知妳原本程式是怎麼打的就是了
: subPartTabPage(i)=new TabPage
: subPartTabPage(i).location=point(10,10)
上面這一行我搞不懂妳在做什麼
如同我在妳文章的推文提到
我去查了MSDN,上面說到
「這個屬性對這個控制項來說不具意義。」
因為TabPage這個東西,無法改變其於父容器內的位置,頂多只能改順序
所以座標屬性對它無效,我不知道妳為何要設定這個屬性
再加上,妳座標全設的一樣,所以我也蠻看不懂妳在做什麼的
: TabControl.tabpages.add(subPartTabPage(i))
: next
: Me.controls.add(TabControl)
: 請問我哪裡錯?
: 如何在已有的tabcontrol中,並已存在一個tabpage情況下再去自動新增二個tabpage?
: 謝謝大家!
我是不曉得妳實際原始碼哪裡有錯
因為看來妳是在PTT上用打的,而非用貼上的
用貼的程式碼應該會被VS修改過才對(也會警告你for那邊語法打錯了)
要看問題好像很麻煩
我乾脆試著寫了一次
妳將就一下,拿去參考跟妳原始碼之間的差別
有看不懂的再問吧
※因為之前試過拿VB程式碼去BBS著色,效果很差,又會有著色錯誤,所以直接貼了
以下內容我寫在Form Load事件中
Dim tabCt As TabControl = New TabControl() '動態製造TabControl物件
tabCt.Location = New Point(10,10)
Me.Controls.Add(tabCt) '這行不管在這做或最後做都沒差
Dim page1 As TabPage = New TabPage() '製造第一頁並加入
tabCt.TabPages.Add(page1)
Dim number As Integer = 2 '剩下的兩頁
Dim pages(number - 1) As TabPage
For i As Integer = 0 To number - 1 '創造並加入的迴圈
pages(i) = New TabPage()
tabCt.TabPages.Add(pages(i))
Next
這樣就完成了,可以跑
老實說應該也沒差多少,跟妳的程式碼比起來
也許只是有妳沒發現寫錯的小地方
給妳個對照用的應該比較容易找出妳寫錯的地方
嘿嘿,收工!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.168.234.54
※ 編輯: Peruheru 來自: 118.168.234.54 (08/03 04:35)
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):