我要读取的数据date,lat,tp,emin,emax
date,lat,tp在一个文件里1.txt
emin,emax在一个文件里2.txt
如何将两个同时循环读取呢
最后得出3.txt
可是我的A和B是对应的,只循环A的话,B也是相应在循环吗
追答如果A\B是独立而不是同步的数据 那就需要做两个独立的循环 至于你怎么运用数据 那就是自己的事情了
dim A,B
open"c:\1.txt" for input as #1
do while not eof(1)
line input #1,A '这个A是读到的1.txt的数据
loop
close #1
open"c:\2.txt" for input as #2
do while not eof(1)
line input #2,B '这个B是读到的2.txt的数据
loop
close #2
AB是同步的
追答A\B同步的情况下按我上面那样就可以
能具体点吗?
追答这也看不懂,就算了。
VB如何将数据进行合并,求编程序
dim text open"c:\\windows\\system.ini" for input as #1 '打开文件 do while not eof(1) '循环至文件尾 line input#1,text '读入一行数据并将其赋予某变量 debug.print text ’在立即窗口中显示数据 loop close#1 '关闭文件 这里给你示例读2个文件的:dim A,B open"c:\\1.txt"...
VB 我要合并成“汇总.mdb",里面建立"表1"汇总1.mdb和2.mdb里的“表1...
1、要将那些需合并的mdb数据库放在同一文件夹中,这样可以实现自动生成;如果不在同一文件夹,要手动添加实现;2、通过VB Running Script获取指定文件夹中需合并的mdb文件,取得每一个文件名;3、通过DAO或ADO实现生成一个数据库,里面有格式与需合并mdb数据库中相同结构的表;4、通过DAO或ADO实现将每个...
VB合并重复项并统计数量的算法,怎么样处理能将数据合并?
在 VB 把原来的 2 列数读到一个 2 维数组,按名称排序然后合拼同名的数量。
VB 如何以二进制方式合并和拆分文件
Private Sub Command1_Click()'文件合并 Dim Buff() As Byte, i As Integer, Flen As Long, PicFlen As Long Dim DocName() As Byte, DocLen As Long For i = 1 To 3 Open App.Path & "\\b" & i & ".doc" For Binary Access Read As #11 Flen = LOF(11) ...
请问VB如何用ADODC控件实现两个数据表的合并
很简单的.首先建立一个表,然后打开两个表依次读取数据,加入其中.注:建立表的Create语句在Access中可能无效 需要的话加15502869
在VB下,如何将ACCESS中的3个数据表合并成另外一个总表
考虑到 Access 支持 SQL 查询语言,可以直接在 Access 内部利用 SQL 语句将多个表的数据合并到一个表中。这种方式通常比在外部程序中合并数据更加高效和直接。显示数据表在编程中并非VB的核心强项,不过借助于大量可用的控件,确实可以实现数据的可视化显示。例如,FlexGrid 控件就是一种常见的用于显示表格...
vb程序设计题,请高手解答
Vb编程实现两个有序数组的合并,即二路归并 数组A和数组B分别记录有一些数据,这两个数组上的数据都已经由小到大按顺序排列好。请用vb编写一个程序把这此数据合并到同一个数组之中,并使得合并后的数据全部按由小到大排列。这就是所谓的“二路归并”。在编写这个程序时先进行说明一下,首先,大量...
...的某两个单元格进行判断,并给其他单元格进行合并?
首先,先选择要合并的单元格区域。选择单元格区域后,用点击开始选项卡中的“复制”按钮或者按键盘的“Ctrl+C”键等方法进行复制。复制后点击开始选项卡中下图所示的“剪贴板”功能区右下角的按钮,这个按钮比较小。点击后会打开Excel自带的剪贴板,在剪贴板中会显示已复制的内容。此时用鼠标双击要粘贴的...
VB编程中数据库里面的数据如何合并?datagrid显示时同一日期里面多列...
Private Sub Form_Activate()With MSHFlexGrid1 .FixedRows = 2 .Cols = 11 .TextMatrix(0, 0) = "序号".TextMatrix(1, 0) = "序号".TextMatrix(0, 1) = "代码".TextMatrix(1, 1) = "代码".TextMatrix(0, 2) = "村名".TextMatrix(1, 2) = "村名".TextMatrix(0, 3) = "县...
如何在vb中将两个有序数组合并成一个新的有序数组
可以使用redim和重新排序的功能 就可以完成了