steam游戏排行榜2017:vb高手请进

来源：百度文库 编辑：杭州交通信息网 时间：2024/05/01 04:59:14
8、 建立一个5行5列二维数组，要求右上三角元素（含对角线）为1，其余元素为0。运行结果如
1 1 1 1 1
0 1 1 1 1
0 0 1 1 1
0 0 0 1 1
0 0 0 0 1 代码怎么写啊,谢谢

Dim a(4, 4) As Integer
Dim i, j As Integer
For i = 0 To 4
For j = 0 To 4
a(i, j) = 0
Next i '初始化
For i = 0 To 4
For j = i To 4
a(i, j) = 0
Next i '赋值

相信你能搞定～

vb高手请进！！！！！！！！！！！！！！1 VB高手请进啊！ VB编程高手请进 VB高手请进 VB高手请进 VB高手请进 VB高手请进 vb高手请进来 vb高手请进 vb高手请进