易截截图软件、单文件、免安装、纯绿色、仅160KB

vb中怎么实现文本两列互换位置?

vb中怎么实现文本两列互换位置?第二列和第三列位置换过来，
文本内容格式如下：
a,s,d,f
g,h,j,k
q,w,e,r
转换成：
a,d,s,f
g,j,h,k
q,e,w,r
用split拆分成数组，变换一下位置，再用join合并成字符串
怎么来能不能帮忙写个源码出来？
要打开一个文本
想学习，就看看msdn的split和join的用法
变换一下位置,就如：a,b,c,d  b和c换位,s=ss(1):ss(1)=ss(2):ss(2)=s
是基础的算法
认真学习中！
是不是要先添加datagrid控件呀？
我在添加部件里也找不到这个东东呀，谁能给我个？
如果你仅仅是为了处理文件内容，什么控件都可以不要。
数据量大吗 不大的话用regtop 强烈推荐

表达式：
regtop -gt, 3.txt 33.txt "(.*?),(.*?),(.*?),(.*)" 0,0,2,1,3


引用
vb中怎么实现文本两列互换位置?第二列和第三列位置换过来，

就是把文本全部读进内存，交换后再写回去。用:
open "文件路径" for input as #1 '读入
交换操作……
close #1
open "文件路径" for output as #1'写回
写回操作……
close #1
VB code:
Private Sub Form_Load()
Dim s0 As String
Dim s1 As String
Dim ss As String
Dim s As String
Dim i As Integer
Dim a() As String
Open "C:\1.txt" For Input As #1
Do Until EOF(1)
Line Input #1,


相关问答：

vb插入数据库重复值问题

在vb中怎么判断，插入到数据库中的值是重复的，本人才刚接触VB语言，甚是有好多地方还不懂，还请各位大侠们给出代码，谢谢了呀！！！
插入之前select一下阿。
或者写一个组合SQL插入语句，例如
IF not Exist(
& ......

【急求】VB中使用WScript调用外部命令 - VB / 基础类

在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:

Private Function getFile_CMD(filename, filepath) As Bo ......

求助：VB调用动态库问题 - VB / 基础类

各位大虾：
  我是刚学VB，现在想用VB调用一个动态库，动态库里面有很多函数。我知道使用VB调用动态库调用函数，需要将要调用的函数在程序中声明即可，但是里面有很多函数，不会每一个函数都要声明吧。请� ......

关于VB.NET和MS ACCESS的问题

我写了一个软件，要用到ACCESS数据库，我再访问ACCESS的时候，我需要从表里读出一行数据，我的程序是这样写的，SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......

求vb大虾看一下啊！！！

Private Sub Form_Load()
  recs = Adodc1.Recordset.RecordCount '求当前记录数
  If recs > 0 Then '已有考生
  Adodc1.Recordset.MoveLast '移到最后一条记录
  num = V ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号