文件名称：任输入三个数，求得平均值,平均值程序(VB6.0源代码编写Function ave(ByVal a As Double,
文件大小：5KB
文件格式：RAR
更新时间：2012-02-03 08:58:48
任输入三个数，求得平均值,平均值程序(VB6.0源代码编写Function ave(ByVal a As Double,
任输入三个数，求得平均值,平均值程序(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
【文件预览】：
VB090113-平均值
----Form1.frm(3KB)
----工程1.vbp(755B)
----MSSCCPRJ.SCC(190B)
----工程1.vbw(47B)
----平均值()
--------平均值.exe(20KB)
--------新建 文本文档.txt(333B)