Visual Basic快速入门

来源：用户分享时间：2025/9/30 17:54:37 本文由

loading 分享下载这篇文档手机版

说明：文章内容仅供预览，部分内容可能不全，需要完整文档或者需要复制内容，请下载word后使用。下载word有问题请添加微信号:xxxxxxx或QQ：xxxxxx 处理（尽可能给您提供完整文档），感谢您的支持与谅解。

all = all + a(i, n)

Next i

Text2 = \

所有靠边元素之和

End Sub 9 ．

矩阵不靠边元素之和；

Option Explicit

Private Sub Command1_Click()

Dim n As Integer, i As Integer, j As Integer, all As Integer

n = InputBox(\

请输入方阵的阶数： \

ReDim a(n, n) As Integer

Randomize

For i = 1 To n

For j = 1 To n

a(i, j) = Int(90 * Rnd) + 10

Text1.Text = Text1.Text & a(i, j) & \ \

搜索更多关于： Visual Basic快速入门的文档

Visual Basic快速入门.doc 将本文的Word文档下载到电脑，方便复制、编辑、收藏和打印