Blogtrottr
Changes are afoot at Blogtrottr!
By popular request, we're bringing in paid plans with some cool new features (and more on the way). You can read all about it in our blog post.
Yahoo!奇摩知識+ - 分類問答 - 電腦網路 - 發問中
Yahoo!奇摩知識+ - 分類問答 - 電腦網路 - 發問中
VB 高手請入!!
Jun 28th 2013, 18:48

我做了一個陣列 可以按下button1 後 產生 一個 lable 跟另一個按鈕:

ctrl = ctrl + 1
but(ctrl) = New Button
With but(ctrl)
.Top = ctrl * 33
.Left = 600
.Text = "完成"
.Size = New Size(65, 24)
.Name = "but" & (ctrl)
.Enabled = True
.Visible = True
End With
Me.Controls.Add(but(ctrl))

lab(ctrl) = New Label
With lab(ctrl)
.Top = ctrl * 30
.Left = 10
.Font = New Font("微軟正黑體", 16, FontStyle.Regular)
.Size = New Size(1000, 30)
End With
Me.Controls.Add(lab(ctrl))

lab(ctrl).Text = ("第" & clickcont & "位 " & "電話:" & telnumberscre & " 寵物姓名:" & petname + vbCrLf)

但現在的問題是,我沒辦法控制(觸發每個but(ctrl)_click的事件)請問我應該在哪裡加入哪也些程式碼呢?
我希望的是能產生掛號的順序:
1.xxxxx [按鈕] ←按了可以把這一行消除,然後下面其他的lable和按鈕可以往上提一層
2.xxxxx [按鈕]

...以此類推

ps.我是VB2008:)
謝謝~

This entry passed through the Full-Text RSS service — if this is your content and you're reading it on someone else's site, please read the FAQ at fivefilters.org/content-only/faq.php#publishers. Five Filters recommends: 'You Say What You Like, Because They Like What You Say' - https://www.medialens.org/index.php/alerts/alert-archive/alerts-2013/731-you-say-what-you-like-because-they-like-what-you-say.html

You are receiving this email because you subscribed to this feed at blogtrottr.com.

If you no longer wish to receive these emails, you can unsubscribe from this feed, or manage all your subscriptions
創作者介紹
創作者 2016韓劇排行榜前十名 , 好看的韓劇推薦 , 2016韓劇收視率 , 韓劇推薦 , 2016好看的韓劇推薦 , 好看的韓劇推薦20162016韓劇,好看的韓劇,韓劇推薦,日劇推薦  ... 的頭像
afs2

2016韓劇排行榜前十名 , 好看的韓劇推薦 , 2016韓劇收視率 , 韓劇推薦 , 2016好看的韓劇推薦 , 好看的韓劇推薦20162016韓劇,好看的韓劇,韓劇推薦,日劇推薦 ...

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