-1 vb.net each loops for-loop button
我想做一个For Each循环,我可以检查每个按钮是启用还是禁用.如果启用该按钮,则必须获取每个按钮的标签中的值.我有26个按钮,每个按钮包含不同的值(现金奖励).*重要提示:此代码需要在按钮下方,所以每按六次按钮就会检查按钮.
伪代码:
btncase1.tag = 5
Begin while statement to go through each button
Check each button to see if it is enabled
If button is enabled then obtain values
Next
Run Code Online (Sandbox Code Playgroud)
我有实际代码,但它对我没有任何意义:
Public Class Form1
Dim button As Button
Dim totalremcases As Integer
Dim btncase As New Control
Dim btncollection As New Microsoft.VisualBasic.Collection()
Private Sub btncase1_Click()
For Each button As Button In btncollection
If btncase.Enabled Then
totalremcases = totalremcases + CInt(btncase.Tag)
End If
Next
Run Code Online (Sandbox Code Playgroud)
您可以尝试使用此方法解决它
Public Sub getallcontrolls(controls As System.Web.UI.ControlCollection)
Dim myAL As New ArrayList()
For Each ctrl As Control In controls
If TypeOf ctrl Is Button Then
If ctrl.Enabled = True Then
Dim tag As String = ctrl.Tag.ToString()
myAL.Add(tag)
End If
End If
Next
End Sub
Run Code Online (Sandbox Code Playgroud)