建站
咨詢
售后
建站咨詢
新聞中心
vb.net 如何動(dòng)態(tài)添加N個(gè)一樣的textbox控件?(馬上采納)
自己在窗體上加一個(gè)按鈕，以下是詳細(xì)代碼（整個(gè)類）
專注于為中小企業(yè)提供成都網(wǎng)站設(shè)計(jì)、網(wǎng)站建設(shè)服務(wù),電腦端+手機(jī)端+微信端的三站合一,更高效的管理,為中小企業(yè)?？诿赓M(fèi)做網(wǎng)站提供優(yōu)質(zhì)的服務(wù)。我們立足成都，凝聚了一批互聯(lián)網(wǎng)行業(yè)人才，有力地推動(dòng)了上1000家企業(yè)的穩(wěn)健成長(zhǎng)，幫助中小企業(yè)通過網(wǎng)站建設(shè)實(shí)現(xiàn)規(guī)模擴(kuò)充和轉(zhuǎn)變。
Public Class Form1
Private N As Integer '用來記添加要加入textbox的個(gè)數(shù)
Private PL As Integer = 10 'textbox相對(duì)于窗體的Left
Private PT As Integer = 10 'textbox相對(duì)于窗體的Top
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.AutoScroll = True '窗體自動(dòng)顯示滾動(dòng)條
N = 10 '初始化N為10
For i = 1 To N
Dim newtextbox As New TextBox
newtextbox.Left = PL
newtextbox.Top = PT
Me.Controls.Add(newtextbox)
PT += newtextbox.Height + 10 '各 newtextbox上下間隔10-------PL不變是希望左對(duì)齊
Next
End Sub
End Class
VB.net如何實(shí)現(xiàn)點(diǎn)擊不同控件分別調(diào)用相同子窗體，以控件名稱動(dòng)態(tài)命名子窗體名稱
1，添加一個(gè)模塊，在模塊里聲明一個(gè)全局公共變量N；
2，在控件的調(diào)用窗體代碼段里，把此控件名稱給這個(gè)全局公共變量N賦值；
3，在窗體的Load()事件里，寫代碼： Me.Text = N。
vb.net自定義控件問題
首先，你已經(jīng)完成的步驟是：
1.新建一個(gè)用戶控件[注意，用戶控件（UserControl）不是自定義控件（CustomControl）]
2.給用戶控件起個(gè)名字（我在此處起名叫 RadioList）
3.在用戶控件上畫一個(gè) GroupBox，命名為 RadioGroup，
并將其 Dock 屬性設(shè)置為 Fill
然后，你需要做的是動(dòng)態(tài)增減控件。
如果你以前用過 VB 6，你可能會(huì)想到控件數(shù)組，
但在此處，你可以直接增刪控件。
具體實(shí)現(xiàn)如下：
4.在 GroupBox 里畫一個(gè) FlowLayoutPanel，命名為 RadioPanel，
將其 AutoScroll 屬性設(shè)置為 True，即自動(dòng)顯示滾動(dòng)條，
并設(shè)置其 FlowDirection 屬性（例如設(shè)置為 TopDown）
這樣就省去了手動(dòng)調(diào)整 RadioButton 位置的麻煩
5.實(shí)現(xiàn)選項(xiàng)的動(dòng)態(tài)增減（以下只是我的思路，你可以發(fā)揮一下）
（十分簡(jiǎn)潔，注釋除外）：
''' summary
''' 創(chuàng)建一個(gè)新的 RadioButton。
''' /summary
Private Function CreateRadio() As RadioButton
Dim NewRadio As New RadioButton
components.Add(NewRadio)
'components 字段由控件設(shè)計(jì)器自動(dòng)創(chuàng)建，
'此代碼目的是使控件在銷毀（Dispose）時(shí)能自動(dòng)銷毀 RadioButton
'詳情參見 RadioList.Designer.vb
NewRadio.Parent = RadioPanel
'設(shè)置容器
AddHandler NewRadio.CheckedChanged, AddressOf RadioButtons_CheckedChanged
'設(shè)置事件處理程序
Return NewRadio
End Function
''' summary
''' 移除已存在的 RadioButton。
''' /summary
Private Sub RemoveRadio(ByVal dest As RadioButton)
components.Remove(dest)
dest.Dispose()
End Sub
'無中生有的 RadioButton 的事件處理程序
Private Sub RadioButtons_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
'在此處設(shè)置選中項(xiàng)的屬性，通過 sender 來確定不同的 OptionButton
'你可以通過將 OptionButton 放在一個(gè)列表，
'如 List(Of OptionButton) 中來像數(shù)組一樣維護(hù)選項(xiàng)的次序
'注意，此處需要判斷 sender 的 Checked 屬性是否為 True
'因?yàn)?Changed 是“改變”，而不是“選中”
'例如：
If DirectCast(sender, RadioButton).Checked Then
SelectedIndex = ...
End If
End Sub
vb.net 界面控件，一組控件相同名字，index不同。vb6 很容易，.net 好像沒有ind
MyString(int size,const char cstr)
{
m_pChars=new char[size+1];
memset(m_pChars,'\0',size+1);
memset(m_pChars,cstr,size);
}
新聞標(biāo)題：vb.net控件名字一樣,VB的控件
網(wǎng)頁(yè)地址：http://fisionsoft.com.cn/article/hecsog.html
