想實作選擇選擇任意一個省份后，文本款顯示的內容實時改變
uj5u.com熱心網友回復：
在click里面寫if ctype(sender, RadioButton).Ckecked = True then
textBox1.Text = ctype(sender, RadioButton).Text
uj5u.com熱心網友回復：
是這樣的，我這里有31個，是每一個按鈕都加一個click觸發嗎uj5u.com熱心網友回復：
用comboBox好了，省地方uj5u.com熱心網友回復：
可以在一個click里寫 用引數 object sender 判斷是哪個被選中了uj5u.com熱心網友回復：
能給我參考代碼嗎uj5u.com熱心網友回復：
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'列舉GroupBox1內的所有RadioButton
'將CheckedChanged事件都系結到Group1_RadioButton_CheckedChanged函式
For Each Item As Control In GroupBox1.Controls
If Item.GetType = GetType(RadioButton) Then
AddHandler TryCast(Item, RadioButton).CheckedChanged, AddressOf Group1_RadioButton_CheckedChanged
End If
Next
End Sub
'某組內的所有RadioButton的CheckedChanged事件都在此回應
Private Sub Group1_RadioButton_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
TextBox1.Text = TryCast(sender, RadioButton).Text
End Sub
End Class
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/32855.html
標籤：VB.NET
下一篇：js決議json資料