请教vb中怎么按格式输出数组
vb中，按
1，2，3，4，...
2，3，4，56，...
5，6，7，8，...
。。。
这样的格式读入了数组，现在想把数值按原来的排列方式输出到csv文件中
请教应该怎么操作，谢谢您帮助
用Split函数
比如一行文本
Dim a As String
a="1,2,3,4,5,6,78,9"
Dim UU() As String
UU=Split(a,",")
这样就以","为分割符号分割到UU数组里了,如
Msgbox "UU(0):" & UU(0)
结果是 "UU(0):1"
Split函数详细的你仔细看看MSDN吧
VB code:
Dim s$(3)
s(0) = "1": s(1) = "2": s(2) = "3": s(3) = "4"
MsgBox Join(s, ",")
运行结果：“1,2,3,4”
不知道楼主是否这个意思？
谢谢楼上两位，
我没有讲述清楚意思。
我已经有了这样一个数组，
现在想把它原样输出来。
假如已经有了这样的数组
array（x，y）
我要完整输出这个数组到一个文件，
排成x+1行，y+1列，自动用逗号分割，保存为csv或文本文件。
怎么实现？
试试看，不知道是不是楼主要的结果
VB code:
Private Sub Command1_Click()
Dim s$(3, 2), ss$
For i = 0 To UBound(s)
For j = 0 To UBound(s, 2)
相关问答：
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
MouseWait()
Dim ClearTempTabelSQL As String
'If Not ......
把已有数据（数据大于20行）的RS(recordset)的第10行数据与第11行数据做加法后，删除第11行的数据，然后把后面的数据向前移。
RS的话修改数据是会更新数据库，现在的问题是RS里的已有数据是用SQL语句分类统计出来的 ......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
