VB.NET - 如何计算从文本框的值的平均值

Question

我是新的visual basic，我使用Visual Studio 2008快速版。

我需要创建一个程序来计算等级/平均值。

我需要为每个文本框重复if/then/else语句吗？

请参考下面的链接图片以供参考。

我不知道如何来平均这些值。

我需要创建许多重复的条件语句吗？

Answer 1

我会建议从几个if语句开始，每个向变量添加1个点，如果该文本框具有值。对每个文本框重复该语句。

然后，加起来每个文本框的值。

最后，将每个文本框的值的总和除以包含值的文本框的数量，您可以使用前面的if/then语句来计算该值。

因此，在计算按钮的点击事件，它可能看起来像这样（写在vb.net）：

Dim Count as Integer = 0 
If txtMath.text <> "" Then Count += 1 
If txtEnglish.text <> "" Then Count += 1 
If txtScience.text <> "" Then Count += 1 
If txtFilipino.text <> "" Then Count += 1 
If txtPE.text <> "" Then Count += 1 

Dim Sum as decimal = (txtmath.text + txtenglish.text + txtScience.text + txtFilipino.text + txtPE.text)/Count 

Answer 2

试试这个。

Dim tbList As TextBox() = {txtMath, txtEnglish, txtScience, txtFilipino, txtPE} 
      Dim Ave As Double = 0 

      For Each item In tbList 

       If item.Text = Nothing Then 

        item.Text = "0" 

       End If 

       Ave += Val(item.Text) 

      Next 

      Ave = Ave/tbList.Length 

      lb_Average.Text = Ave.ToString