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立方根函数
分享URL:http://scyanting.com/article/docedoo.html