VB6.0 如何计算加权平均值.rar

VB6.0代码演示如何计算加权平均值，计算加权平均值可编写以下代码实现： 　　PrivateSubCommand1_Click() 　　Text7.Text=jiaquan(Text1,Text2,Text3,Text4,Text5,Text6) 　　EndSub 　　PrivateFunctionjiaquan(ByValaAsInteger,ByValbAsInteger,ByValcAsInteger,ByValdAsInteger,ByValeAsInteger,ByValfAsInteger)