-
楼主：
soutyc
发表时间：
2014-08-16 01:29
请看下我的代码，就是没有做到自己想要的效果，麻烦大家看看帮忙提示或改正一下，有样式！
-
楼主：
soutyc
发表时间：
2011-09-21 16:48
VB代码，主要是获取一个网卡中的信息
Private Sub Command1_Click()
Dim v As String
Winsock1.GetData v
Me.Text1 = v
End Sub
Private Sub Form_Load()
Winsock1.Connect "172.16.11.99", 1433 '
End Sub
-
楼主：
soutyc
发表时间：
2010-10-19 12:26
本帖最后由 soutyc 于 2010-10-20 00:19 编辑
[e].版本 2
.判断循环首 (是否在文件尾 (id1, ) ＝ 假)
txt3 ＝ 读入一行 (id1)
j ＝ j ＋ 1
.判断循环尾 ()
.计次循环首 (j ÷ 3000× 5), m)
进度条1.位置 ＝ m ÷ (j ÷ (到整数 (编辑框2.内容) × 5)) × 100
...
-
楼主：
soutyc
发表时间：
2010-10-05 15:39
各位兄台，请教一下，我启动两个线程，各将一个文件数据分别读入数组，1文件读入数组1,2文件读入数组2，等两个线程读入数组成功后，再进行两个数组比较。可是我写的代码，压根都没等两个线程结束后在比较，直接就退出了。（两个文件大约有200万行）
.版本 2
启动线程 (&子程序1, , )
启动线程 (&子程序2, , )
如果（数组1= ...
-
楼主：
soutyc
发表时间：
2010-09-27 10:14
[e]
版本 2
.程序集 窗口程序集1
.程序集变量 分割后文本, 文本型, , "0"
.程序集变量 程序集_文件1, 文本型
.子程序 _按钮1_被单击
程序集_文件1 ＝ 到文本 (读入文件 (通用对话框1.文件名))
分割后文本 ＝ 分割文本 (程序集_文件1, “,”, )
写到文件 (“相同文本.txt”, 到字节集 (到文本 (分割后文本 [1])))
写到文件 ...
-
楼主：
soutyc
发表时间：
2010-09-26 10:39
各位老师，请教下，比较两个文本文件（按行比较），取出相同的行和不相同的行，怎么做比较快？100万的数据，现在用的是删除法，一样的行内容就删除，这样比较下来后面就变的快些，可实际下来100万根本处理不了，慢的很，20万都要7分钟，30万近2小时。另外一种将两个文本排序后比较，100万数据比较也是有问题，这些都是数组 ...
粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173
扫一扫，关注易界动态