vb.net多元运算 vba中有很多运算符主要有

在VB.net 中，如何用循环计算数组中各元素之和

'假设数组如下

dim d(10) as integer

dim i as integer

for i=lbound(d) to ubound(d)

d(i) = i

next i

'数组各元素之和

dim S as integer = 0

for i=lbound(d) to ubound(d)

s = s + d(i)

next i

msgbox(s)

相关问答

Q1: vb.net 的三元运算符怎么写

Private Sub Command1_Click()

x = Val(Text1.Text)

y = Val(Text2.Text)

Max = IIf(x y, x, y)

Print "Max="; Max

End Sub

Q2: vb怎么实现文本多行加减法运算

Dim BDS, JSS, I As Integer

Private Sub Command1_Click()

Dim kkl() As String   '取出各行表达式的运算符的数值

ReDim kkl(UBound(BDS))

For I = 0 To UBound(BDS)

kkl(I) = Right(Left(BDS(I), 3), 1)   '取出表达式的运算符

Select Case kkl(I)

  Case "+"

    JSS = Split(BDS(I), "+")   '取出运算符二边的数据，存储在 JSS 数组中，下同

    Text2.Text = Text2.Text  Val(JSS(0)) + Val(JSS(1))  vbCrLf    '在文本框2中显示计算结果。数据必须转换为数字数据！，下同

  Case "-"

    JSS = Split(BDS(I), "-")

    Text2.Text = Text2.Text  Val(JSS(0)) - Val(JSS(1))  vbCrLf

  Case "*"

    JSS = Split(BDS(I), "*")

    Text2.Text = Text2.Text  Val(JSS(0)) * Val(JSS(1))  vbCrLf

  Case "/"

    JSS = Split(BDS(I), "/")

    Text2.Text = Text2.Text  Val(JSS(0)) / Val(JSS(1))  vbCrLf

End Select

Next I

End Sub

Private Sub Form_Load()

Text1.Text = Text1.Text  "33*33"  vbCrLf

Text1.Text = Text1.Text  "33+33"  vbCrLf

Text1.Text = Text1.Text  "33*33"  vbCrLf

BDS = Split(Text1.Text, vbCrLf) '将数据存储到 BDS 数组中

End Sub

这个程序符合二位数与二位数的+、-、*、/ 的计算，比较简单。

Q3: vb.net如何计算textbox中的运算

在textbox中的是字符串，所以，你需要对字符串进行处理。

首先获取到字符串的数字，存储在两个变量中然后取得操作符，通过select case或if elif进行判断，从而在textbox2中显示。

Q4: 用VB.NET编写一个程序 ：编一求阶乘的函数f(n),主调程序求组合数的程序，分别调用f(n),用来计算组合数的值

Private Sub Command1_Click()

Dim A, B, C

A = 10

B = 3

C = f(A) / (f(B) * f(A - B))

Print C

End Sub

Private Function f(n)

Dim I As Integer

f = 1

For I = 1 To n

f = f * I

Next I

End Function

Q5: VB.net的开方运算

VBvb.net多元运算的运算顺序是：先乘除、后加减vb.net多元运算，有括号的先算括号内，有负号的先算负号。

请你比较一下这个运算中x和y的值：

Dim n As Single = 4

Dim x As Single

Dim y As Single

x = n + 1

x = x / n

x = x - 1

x = Math.Sqrt(x)

y = Math.Sqrt((n + 1) / n - 1)

这样就会发现，你的代码中括号的位置错了。

正确的应该是： Math.Sqrt((n + 1) / n - 1)

vb.net多元运算的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vba中有很多运算符主要有、vb.net多元运算的信息别忘了在本站进行查找喔。