vb.net 关于2维数组求平均数的问题

如图?图呢?

成都创新互联从2013年开始，先为深州等服务建站，深州等地企业，进行企业商务咨询服务。为深州企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

Dim cj(10, 6) As Double

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim i As Integer

For i = 1 To 2

cj(i, 0) = InputBox("输入第" i "位学生的学号")

cj(i, 1) = InputBox("输入数学")

cj(i, 2) = InputBox("输入心理学")

cj(i, 3) = InputBox("输入人事管理学成绩")

Next

Button2.Enabled = True

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim i As Integer

For i = 1 To 10

MsgBox("学号为" cj(i, 0) "的学生平均成绩为:" (cj(i, 1) + cj(i, 2) + cj(i, 3) + cj(i, 4) + cj(i, 5) + cj(i, 6)) / 6)

Next

MsgBox("数学总平均成绩为:" (cj(1, 1) + cj(2, 1) + cj(3, 1) + cj(4, 1) + cj(5, 1) + cj(6, 1) + cj(7, 1) + cj(8, 1) + cj(9, 1) + cj(10, 1)) / 10)

End Sub

VB平均分怎么弄

我做了一遍是这样做的：

A：先放3个label,caption值分别设为：语文 数学 英语

B：再放3个text控件

C：再放一个command caption值为平均分

Private Sub Command1_Click()

a = Val(Text1.Text)

b = Val(Text2.Text)

c = Val(Text3.Text)

print (a + b + c) / 3

End Sub

Private Sub Form_Load()

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

End Sub

我是初学的，我在本机试做是没错的，只是可能没有专家们的回答精致，我的比较笨拙，不过我做出来的结果是对的，你试下请不要见笑

用vb程序计算三个数的平均值 代码要简单易懂的，本人菜鸟

Private Sub Command1_Click() '计算平均分

Dim a As Single, b As Single, c As Single, d As Single

a = Val(Text1.Text)

b = Val(Text2.Text)

c = Val(Text3.Text)

d = (a + b + c) / 3

Text4.Text = d

End Sub

Private Sub Command2_Click() ‘清除

Text1.Tex = ""

Text2.Tex = ""

Text3.Tex = ""

Text4.Tex = ""

End Sub

Private Sub Command3_Click() ’退出

End

End Sub

vb输入10个同学的成绩,计算平均分和总分

Dim A(1 To 10) As Single。

Private Sub Command1_Click()。

'请在第一个文2113本中输入成绩,成绩之间用5261空格隔开。

Dim s As String

s = Trim(Text1.Text)

d = Split(s, " ")

ReDim A(1 To UBound(d) + 1) As Single

For i = 1 To UBound(A)

A(i) = d(i - 1)

Next

End Sub

Private Sub Command2_Click()

maxn = A(1)

For i = 2 To UBound(A)

扩展资料

vb.net 特性：

1、vb.net 完全集成到 Visual Studio 集成开发环境中，在这种集成开发环境与 VB 在若干方面有差异。主要体现在窗体的布局以及菜单等方面都有所不同。

2、vb.net 项目与 VB 不同。它使用基于文件夹的模型，所有项目均放置在项目文件夹层次结构中。

3、vb.net 中使用ado.net来访问数据库，ado.net是.netFramework的一部分。在 vb.net 中实现数据访问的方法主要有两种。

其一是在程序设计阶段，通过创建、配置数据适配器 DataAdapter 和生成数据集 DataSet；其二是在运行中，通过编程方式动态创建配置数据适配器和创建、生成数据集。

标题名称：计算平均分vb.net 如何计算平均分
网页链接：http://scgulin.cn/article/doohcjg.html