急 急 急 编写VB程序

[复制链接]
查看11 | 回复1 | 2009-8-1 15:16:13 | 显示全部楼层 |阅读模式
没事无聊给你写一下。。。dim a(0to 3,0 to 3) as integer赋值过程省略。1、对角线dim i as integer ,j as integerfor i = 0 to 3for j = 0 to 3
if i=j or j+i=3 then me.print a(i,j)nextnext2、行列和dim sum as integerfor i = 0 to 3sum =0for j = 0 to 3
sum = sum + a(i,j)nextme.print "第" & i & "行总和是" & sumnext...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行