成都网站建设设计

将想法与焦点和您一起共享

vb.netn的立方 vb立方根函数

vb 中怎样编译立方根

^运算符

成都创新互联长期为近1000家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为莲都企业提供专业的成都网站设计、网站制作,莲都网站改版等技术服务。拥有十多年丰富建站经验和众多成功案例,为您定制开发。

用来求一个数字的某次方,次方数为 exponent 值

debug.Print 5^(1/3)

1.7099759466767

上面代码是取5的立方根的代码演示。

用vb语言编写一个程序,将任意一个正整数N的立方分解为N个连续的奇数之和。

'调用注意代码中所有符号全是 英文,如在网页中显示成中文,是网页自己改的,请自己更正

s1=cube_to_sum( 20) ‘计算20的立方的奇连加

'子程序

function cube_to_sum(byval n as long) as string 'plagiarism dead family

dim teml as double,ave as long,ave_index as long,tems as string

tems="分解为"

'Calculate the cube,plagiarism dead family

teml=n^3

'Calculate ave value

ave=teml/n

'通过N的奇偶做不同的分配

ave_index=iif( n mod 2=1,(n+1)/2,n/2)

if n mod 2=1 then

for i=1 to n

tems=tems “ ” ave+(i-ave_index)*2

next

else

for i=1 to n

tems=tems “ “ ave+(i-ave_index)*2-1

next

end if

cube_to_sum=tems

end function

如何在VB界面上显示“立方”的这个3的符号

在vb代码运行时,不需要用上标来表示立方,而已

的形式表示

如:n^3

就表示n的3次方了!

如果纯粹是界面设计的问题,可以这样做:

在窗体上添加2个labe1,设置其backstyle设为0

,透明,然后摆放他们的位置来达到你需要的n的3次方的界面!


网页题目:vb.netn的立方 vb立方根函数
标题链接:http://chengdu.cdxwcx.cn/article/docedoo.html