资源大小: 7KB
发布时间: 2008-12-23
文件格式: rar
下载次数: 1
分享到:

下载地址:

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

资源简介:

三角函数演示,VB6.0源代码,Select Case i Case 1 For x = 0 To 6.282 Step 0.001 y = Sin(2 * Pi * w * x) + Fi Picture1.PSet (x, y) Next x Case 2 For x = 0 To 6.282 Step 0.001 y = Cos(2 * Pi * w * x) + Fi Picture1.PSet (x, y) Next x Case 3 For x = 0 To 6.282 Step 0.001 y = Tan(2 * Pi * w * x) + Fi Picture1.PSet (x, y) Next x Case 4 For x = 0 To 6.282 Step 0.001 y = Atn(2 * Pi * w * x) + Fi Picture1.PSet (x, y) Next xEnd Select


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