用VB编辑记事本文件内的数据

[复制链接]
查看11 | 回复3 | 2009-3-18 19:59:25 | 显示全部楼层 |阅读模式
如图:数据中有几个"列",分别用英文逗号隔开,我要用VB将目标文件的内容显示到TEXT1中,然后下面的按钮对TEXT1中的数据进行处理,并显示在TEXT2中.
"交换XY":将X列和Y列进行交换
"统改H","统改Y","统改X":对TEXT2中的对应列进行加和减的运算,加数和减数为常数,并由人来给出数字.运算完成之后,仍然显示在TEXT2中.
"数据存盘":将TEXT2中的数据进行另存为,路径需要手工指定,而不是固定路径.
谢谢各位大侠,为了避免没有满意的答案而使系统无谓的扣除掉积分,所以奖励分给的很少,但是追加分30.
我还是弄不好,要不你帮我做一个,要求:选择原始数据的文件>并显示到TEXT1>根据按钮功能得到对应的数据并显示在TEXT2>保存TEXT2中的数据到文本文件,自己选择文件的存放位置和文件名.发到我的邮箱,[email protected],包含源代码.我送你100分.任何人都同样的待遇,直接写一个给我邮箱里,然后在本页面提醒一下,奖励100分.

回复

使用道具 举报

千问 | 2009-3-18 19:59:25 | 显示全部楼层
Dim a() As String '声明一个数组Private Sub Command1_Click() '交换按钮 Dim temp As String '临时变量a = Split(Text1.text, ",") '将Text1中内容按逗号切分后存入数组a,a现在有4个元素,分别是Text1中的四个数据temp = a(1): a(1) = a(2): a(2) = temp '交换x和yrefreshB '刷新Text2End Sub Private Sub Command2_Click(Index As Integer) '3个统改按钮 Dim b(3) As String, delta As Sin...
回复

使用道具 举报

千问 | 2009-3-18 19:59:25 | 显示全部楼层
图片给出的程序是要控制的程序,还是要编的程序...
回复

使用道具 举报

千问 | 2009-3-18 19:59:25 | 显示全部楼层
于是大解放...
回复

使用道具 举报

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

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行