2015-11-20 123 views
-3

我之前的问题不清楚。所以我要重复一遍。Visual Basic 2008

右侧部分的标签是转换后的等级,文本框是原始分数百分比。

如何为这个代码(在这里我就不再重复了又在其他文本框

暗淡等级为整数

该代码会在按钮,按下时做了一小段路,原始百分比将转化为转化等级。

If MathTextbox.Text = "100" then MathLabel.Text= "1" 

这样的代码,我的概率是如何避免在每个texboxes重复它。

+0

将2个控件传递给具有“类似代码”的方法。 – Plutonix

+0

不是一个好方法。按钮按下本质上是一个“除以100”的操作。 – Bathsheba

+1

''我之前的问题不清楚。“' - 你认为这是?显示你正在使用的代码,并解释代码如何不能达到你期望的效果。如果您试图避免某些代码风格或练习,请展示它,以便我们看到问题所在。不要模糊地描述你的代码类型,你实际上可以在这个问题中添加代码。 – David

回答

0

如果问题是你要一个按钮执行相同的动作多个控件那么你可以做这样的事情:

For Each ctrl1 As Control In Me.Controls 
    If TypeOf (ctrl1) Is TextBox Then 
     For Each ctrl2 As Control In Me.Controls 
      If TypeOf (ctrl2) Is Label AndAlso _ 
      Microsoft.VisualBasic.Strings.Left(ctrl1.Name, 4) _ 
      = Microsoft.VisualBasic.Strings.Left(ctrl2.Name, 4) Then 
       ctrl2.Text = ctrl1.Text 
       Exit For 
      End If 
     Next 
    End If 
Next 

注意,有更好的方法,用于识别标签对与文本框(我自己喜欢the Tag property)以及如果要对字符串执行数字操作(例如文本框的Text属性),应首先验证它,例如与IsNumeric