1. 首页
  2. 编程语言
  3. VB
  4. 任输入三个数,求得平均值,平均值程序(VB6.0源代码编写Functionave(ByValaAsDouble,

任输入三个数,求得平均值,平均值程序(VB6.0源代码编写Functionave(ByValaAsDouble,

上传者: 2019-04-30 05:50:39上传 RAR文件 5.34KB 热度 40次
任输入三个数,求得平均值,平均值程序(VB6.0源代码编写Functionave(ByValaAsDouble,ByValbAsDouble,ByValcAsDouble)AsDoubleave=(a+b+c)/3EndFunctionPrivateSubCommand1_Click()Text4=ave(Val(Text1),Val(Text2),Val(Text3))EndSub
下载地址
用户评论