编写程序，把下面的数据输入一个二维数组（vb）

用c语言编写程序,把下面的数据输入到一个二维数组中
int main(int argc, const char * argv[]) { int arr[4][4]={{25,36,78,13},{12,26,88,93},{75,18,22,32},{56,44,36,58}};int i,j,temp;printf("主对角线:\\n");for(i=0;i<4;i++)printf("%d ",arr[i][i]);putchar('\\n');printf("副对角线:\\n");for(i=...

如何用VB创建一个2维数组?
1、打开前面板，在控制板中选择数组矩阵库中的数组放到前面板上。2、打开后面板，找到对应的数组。然后右键菜单中点击属性。3、默认的数组的属性为1维的，我们将其改为2。4、再次回到前面板，在数值库中，将数值插入控件拖入二维数组中的灰色区域。5、此时前面板中，数组的形状发生了变化。6、此时点...

vb把text中数据储存到二维数组
Private Sub Command1_Click()Dim Strtemp As String, A() As Double '读入数据到数字a中 Dim X As Variant, uu As Integer Strtemp = Text1 X = Split(Strtemp, ",") 'uu = UBound(X)ReDim A(uu - 1, 0 To 1) As Double Dim St As Integer, Ed As Integer St = 0 Do While...

设有一个二维数组A(5,5),试用VB编写程序?
Private Sub Command1_Click()For i = 1 To 5 For j = 1 To 5 If i = 1 Or j = 1 Or i = 5 Or j = 5 Then bsum = bsum + a(i, j) '所有靠边元素之和 asum = asum + a(i, j) '所有元素之和 If i = j Or i + j = 6 Then dsum = dsum + a(i, j) '...

在vb中,如何把文本文档中的数据读入到二维数组中,并且使二维数组的下...
Private Sub Form_Click()Dim temp As String, str As String Dim w1 As Integer, w2 As Integer '维数 Dim a() As Integer, b() As Integer Dim i As Integer, j As Integer, k As Integer w1 = 0 w2 = 0 Me.Text1.Text = "矩阵的初始状态为："+ vbCrLf Me.Text2.Text = "...

...帮忙啊:vb 中如何从txt文件中将数据读取出来并赋值给二维数组?
假设点击命令按钮Command1就将e:\\aa.txt读入p(i,j)中，Command1的代码如下（你照复制就是）：Private Sub Command1_Click()Dim StrLine As String, a() As String, p(11, 5) As String, i As Long, j As Long Open "e:\\aa.txt" For Input As #1 For j = 0 To 5 Do Until EOF...

在VB中怎样将一个datagrid中的数据传送到一个新定义的二维数组中
select * from tab", con, adOpenDynamic, adLockOptimistic, adCmdText arrA = rs.GetRows '---取得SElECTa Recordset的二维数组 '注意，arrA=GetRows 后得到的数组，第一维是代表列，第二维代表行 要是回答的内容有问题，或认为不妥，请发送百度消息给我，消息内容加上本页网址哦。。·

在vb中如何在一个二维数组中插入一整行数据???
ReDim a(1 To 4, 1 To 4)Print "插入前的数组"For j = 1 To 4 For i = 1 To 4 a(i, j) = i + j * 4 Print Tab(4 * i); a(i, j);Next i Print Next j ReDim Preserve a(1 To 4, 1 To 5)For j = 5 To 4 Step -1 For i = 1 To 4 a(i, j) = a...

VB 导入文本数据作为一个二维数组的元素,用自定义的函数调用数组元素处 ...
2，数组为数值类型。3，自定义函数，执行将某一行4个数值型数据转换成4个字符串类型，并连接成一个字符串。算法描述如下：1，读取文本文件行数 h 2，Redim 二维数组(h,4) as Integer '假设是整数 3，读取数据到数组 ReDim dd(h, 4) As Integer Dim i As Integer i = 0 Open "c:\\1...

VB 把一个m行n列矩阵中的元素存放到一个二维数组中,并求出该数组的平 ...
'创建数组 dim d() as integer dim i as Integer dim j as integer dim m as integer dim n as integer dim x as integer m=4 '设4行 n=3 '设3列 redim d(m,n) as integer x=1 for i=1 to m for j=1 to n d(i,j)=x x=x + 1 next j next i '求平均值，...