VB+VFP联合应用

各类语言都有其长处和缺憾,如何取长补短呢?希望这篇文章能起到抛砖引玉的效果。

目标:必须在VFP环境对CSV格式文件中所有的字符“/”替换成“-”

分析:如果在VFP中读入CSV格式文件然后再找字符“/”再替换成“-”,势必比较困难,速度也会很慢。因为不知道字符“/”将出现在那个字段。也不清楚字符“/”出现的位置。而这类问题的处理如果用VB就很简单。可以在VB中正行读入,然后使用Replace命令就可以了,然后循环读取下一行,直到文件末尾。可以使用OLE组件技术在VFP中调用VB实现的相关功能。具体方法如下:

首先用VB生成一个Dll,名为Lib,模块名为Tools。在Tools模块中写入下列代码。

例如:
Public Function ReplaceA(ByVal Source As String)
If Source = "" Then
Exit Function
End If

On Error GoTo Open_Err
Dim Destination As String

Destination = "c:/tmp.t"
FileCopy Source, Destination
Kill Source

On Error GoTo Replace_Err
Dim textLine

Open Destination For Input As #1
Open Source For Output As #2
Do While Not EOF(1)
Line Input #1, textLine
textLine = Replace(textLine, "/", "-")
Print #2, textLine
Loop
Close #1
Close #2

Kill Destination

Exit_Sub:
Exit Function
Replace_Err:
Debug.Print Err.Description
Resume Exit_Sub
Open_Err:
Debug.Print Err.Description
Resume Exit_Sub
End Function

然后在VFP中调用方法如下:
mytools = createobject("Lib.myLib")
mytools.ReplaceA("完整文件名并且要带绝对路径")
release mytools

VB+VFP联合应用相关推荐

  1. 计算机二级理工类报哪个,计算机二级考哪一科目,毕业后找工作会对科目有要求吗?还是说不管什么科目有证就行了?...

    计算机二级考哪一科目,毕业后找工作会对科目有要求吗?还是说不管什么科目有证就行了?以下文字资料是由(历史新知网www.lishixinzhi.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看 ...

  2. c语言密钥短语密码得到代替字母表,c语言程序设计竞赛题及其答案

    数学与统计学院 第三届计算机程序设计竞赛题 竞赛需知: 1. 答案必须写在答题纸上. 2. 程序采用C/JAVA /VB/VFP语言实现均可. 3. 考虑到各种因素,程序的键盘输入和结果输出可以用伪代 ...

  3. autorunner测试java代码,AutoRunner自动化测试工具介绍

    AutoRunner简介 AutoRunner是黑盒测试工具,可以用来完成功能测试.回归测试.每日构建测试与自动回归测试等工作.是具有脚本语言的.提供针对脚本完善的跟踪和调试功能的.支持IE测试和Wi ...

  4. 学校计算机二级模拟上机能看分数吗,全国计算机二级考试机试考完怎么储存的...

    全国计算机二级考试机试考完怎么储存的以下文字资料是由(历史新知网www.lishixinzhi.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 全国计算机二级考试机试考完怎么储存的 ...

  5. 《Java程序员,上班那点事儿》前言

    ☆★☆★快来!!10月25日读者见面会☆★☆★  应大家要求,我在此贴出<Java程序员,上班那点事儿>的前言,和目录,供大家参考.     清华大学出版社<Java程序员,上班那点 ...

  6. 在c语言程序中使用数据库,数据库与C语言程序设计两者之间有什么联系?

    数据库与C语言程序设计两者之间有什么联系?以下文字资料是由(历史新知网www.lishixinzhi.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 数据库与C语言程序设计两者之间 ...

  7. 800个电子竞技设计大赛毕业设计产品开发资料

    ** 800个电子竞技设计大赛毕业设计产品开发资料 部分列举如下: ```c 0001.PC 机与单片机通信(RS232 协议) 0002.C与VB语言联合在proteus上仿真 0003.IC卡读写 ...

  8. 2008最新全套计算机毕业设计

    计算机应用,计算机信息管理,   计算机网络,   计算机软件,   计算机科学与技术 毕业设计网主要向广大计算机专业的各类本.专科毕业生(包括全日制正规高校.自考.各级电大.夜大.函授.成人教育等类 ...

  9. Visual Basic专题(VB356套)--项目设计-毕业设计【建议在校生收藏】

    适合课程学习.毕业生学习和参考,VB6.0以及VS2008.VS2010.VS2012.2013.2017.2019.2021.2022以上版本即可运行 1 在线点播系统,(论文,ASP,JAVA,A ...

最新文章

  1. timestamp类型设置默认时间
  2. 从Github一开源项目ADSEC【学习域渗透攻防基础】
  3. 2016年,这50家创业公司将真正改变世界
  4. java maven 没有target_Maven最全知识点总结 可以收藏啦
  5. 【Linux】一步一步学Linux——iptables命令(186)
  6. git 项目常用命令
  7. freeswitch cdr mysql_部署FreeSWITCH + FusionPBX
  8. 计算机用户win7修改不,Win7电脑时间改不了的解决方法
  9. 虚幻4属性系统(反射)翻译
  10. 我想给小舅子投资个普通的洗车行,我出钱,他出力,五五分利润,可以吗?
  11. TeamViewer 远程连接一直显示正在初始化显示参数的解决方案
  12. 格雷码和二进制之间的转换
  13. 电子技术基础——基本共射放大电路
  14. 水色物语:清新水彩手绘插画技法
  15. SSL 3.0曝出Poodle漏洞的解决方案
  16. C#中sealed的用法
  17. 微信小程序底部菜单详解
  18. IDEA--安装、使用
  19. centos 系统软件包管理 yum 本地yum配置 扩展源epel rpm 清除yum缓存 yum provides */vim 第十节课...
  20. [转载]怎样做颠覆式创新?

热门文章

  1. Win11 网络连接正常,只有视频和音频加载不出来
  2. android notification 的总结分析,Android中Notification用法实例总结
  3. 微信小程序授权登录获取用户头像和昵称时得到微信用户,记录getUserInfo转变为getUserProfile的使用修改
  4. 解决Android Studio无法连接OPPO(android 9 ,coloros 6.0.1)问题
  5. 将xls表格数据转为点数据(1)
  6. 什么是以太网交换机?以太网交换机的工作原理详解!
  7. php和python哪个有前途_python、java、php,学哪个更有前景?
  8. 数据库的数据字典(Data dictionary)
  9. 怎么让footer始终在页面底部?
  10. app端前端框架对比 - Mui与ionic、Cordova 、Weex、React Native对比