资源大小: 4KB
发布时间: 2008-09-09
文件格式: rar
下载次数: 0
分享到:

下载地址:

下载地址1
(本站为飞网专业下载站,域名:down.cfei.net)

资源简介:

平均值程序(VB6.0代码编写)Function ave(ByVal a As Double, ByVal b As Double, ByVal c As Double) As Double ave = (a + b + c) / 3End FunctionPrivate Sub Command1_Click() Text4 = ave(Val(Text1), Val(Text2), Val(Text3))End Sub任输入三个数,求得平均值QQ223857666勾月


飞网下载站,免费下载共享资料,内容涉及教育资源、专业资料、IT资源、娱乐生活、经济管理、办公文书、游戏资料等。