首页| JavaScript| HTML/CSS| Matlab| PHP| Python| Java| C/C++/VC++| C#| ASP| 其他|
购买积分 购买会员 激活码充值

您现在的位置是:虫虫源码 > 其他 > VB6.0 如何计算加权平均值

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

  • 资源大小:2.41 kB
  • 上传时间:2021-06-30
  • 下载次数:0次
  • 浏览次数:1次
  • 资源积分:1积分
  • 标      签: VB源码

资 源 简 介

VB6.0 代码演示如何计算加权平均值,计算加权平均值可编写以下代码实现:   Private Sub Command1_Click()    Text7.Text = jiaquan(Text1, Text2, Text3, Text4, Text5, Text6)   End Sub   Private Function jiaquan(ByVal a As Integer, ByVal b As Integer, ByVal c As Integer, ByVal d As Integer, ByVal e As Integer, ByVal f As Integer)    Dim sum As Integer    sum = (a * b + c * d + e * f) / (b + d + f)    sum = Round(sum, 2)    jiaquan = sum   End Function

文 件 列 表

codesc.net
计算加权平均值
MSSCCPRJ.SCC
计算加权平均值
计算加权平均值
Form1.frm
codesc.net

相 关 资 源

您 可 能 感 兴 趣 的

同 类 别 推 荐

VIP VIP