用VB求1到N的平方和,其中N的值由自己给定。要求使用for....next 语句
Private Sub Command1_Click()
Cls
Dim sum(1 to n) As double, n%, i%
n = Val(Text1.Text)
sum(1) = 1
For i = 1 To n
sum(i) = sum(i) i ^ 2 - 1
Next i
MsgBox "结果是:" & sum(n)
End Sub
这是我自己写的
运行时的一个出错提示是:要求常数表达式
这应该怎么去改。
请高手指教!
Private Sub Command1_Click()
Cls
Dim sum As double, n as integer, i as integer
n = Val(Text1.Text)
sum= 0
For i = 1 To n
sum = sum cdbl(i) ^ 2
Next i
MsgBox "结果是:" & sum
End Sub
答:线性链表分好几种,分为单链,双链等,它们的存储顺序也不一样. 线性表是顺序存储的,占顺序的存储空间详情>>
问:电脑安装了VB6.0,为什么打开方式里面没有VB程序选项,进安装好的VB里去关联...
答:打开方式最下面还有一个《选择程序》,点开后查VB的安装目录的EXE,找到后直接打开,下次就会在打开方式里查到了详情>>