文件名称:平均值程序(VB6.0代码编写)
文件大小:4KB
文件格式:RAR
更新时间:2011-09-30 01:32:08
平均值程序(VB6.0代码编写)
平均值程序(VB6.0代码编写) Function ave(ByVal a As Double, ByVal b As Double, ByVal c As Double) As Double ave = (a + b + c) / 3 End Function Private Sub Command1_Click() Text4 = ave(Val(Text1), Val(Text2), Val(Text3)) End Sub 任输入三个数,求得平均值 QQ223857666勾月
【文件预览】:
平均值
----平均值.exe(20KB)
----新建 文本文档.txt(278B)