也就是这样的二维数组元素值的排列:
a11 a12 a13
a21 a22 a23
a31 a32 a33
输出为文本文件请大家帮忙
a11 a12 a13
a21 a22 a23
a31 a32 a33
输出为文本文件请大家帮忙
解决方案 »
- 如何调用WORD打印预览及打印这一项功能
- 得到字体的文件名
- 如何获取局域网内SQL SERVER 2000服务器的时间以及设置 下午3:00前保证结贴
- 请问怎么运行外部程序?比如运行播放器啊,一个外部网页文件啊。
- LineSeparator 指定换行格式 , adCRLF =-1 什么意思?
- 我怎么引用Crystal Report中自动汇总后的值?
- 各位高手,看看我的工资软件价值如何?
- 我很无奈,请帮帮忙!!
- 关于NT的命名管道的资料,尤其是在VB中的应用方法?
- 打开数据库后,如何使用sql语句?小弟是直接使用set db=db=opendatabase("xx.mdb")的
- 高手求救,在线等....
- 高分跪求 如何找到窗口名为“第XXX号选项的内容”的窗口句柄?
dim a as long ,b as longdim i(1 to x,1 to y) as long dim fn as long fn=freefileopen "c:\1.txt" as append for #fn'这行需要验证一下语法是否准确for a=1 to x step 1
for b=1 to y step 1
print fn,i(a,b)
next b
print fn,vbcrlf '换行
next a
for b=1 to y step 1
print fn,i(a,b)
print fn,";"'如果是svc文件,是以;为分割的,或者加入空格也行,execl2003支持智能分割next b
print fn,vbcrlf '换行
next a
for b=1 to y step 1
print fn,i(a,b) print fn,vba.space(10-len(i(a,b)))'加点空格啊next b
print fn,vbcrlf '换行
next a