随笔分类 -  citectVBA

上一页 1 2 3 4
搬家第25天-citectv7.4citectVBA判断某个程序是否在运行，如果在运行就关掉它
摘要：比如判断计算器是否在运行，如果在运行就关掉它。 Sub killprocess()Dim strComputer As stringDim objWMIService As ObjectDim colProcessList As ObjectDim i As ObjectstrComputer = 阅读全文
posted @ 2021-02-22 12:27 来自金沙江的小鱼 阅读(124) 评论(0) 推荐(0)
搬家第25天-citectV7.4civba判断某个程序是否运行
摘要：有时候我们需要判断某个程序是否已经运行，使用citectvba脚本可以实现这个功能，下面的代码实验判断计算器程序是否运行，通过进程查找calc.exe是否存在来判断。 Sub FindProcess()Dim strComputer As stringDim objWMIService As Obj 阅读全文
posted @ 2021-02-22 12:24 来自金沙江的小鱼 阅读(221) 评论(0) 推荐(0)
搬家第25天-Citect V7.4 CitectVBA 利用excel宏和CDO发邮件
摘要：我们使用citect采集了现场数据形成报表后，有时候需要把数据定时发电子邮件给某些人。微软的CDO组件支持邮件发送功能，我在学习citectVBA发邮件时，经历了一些波折，我在这篇博客把这些学习过程下来。 我的想法是点击画面上的按钮，后台脚本用一个qq信箱给一个126信箱发一封电子邮件，不需要打开浏 阅读全文
posted @ 2021-02-22 12:23 来自金沙江的小鱼 阅读(450) 评论(0) 推荐(0)
搬家第25天-记录昨天的日期
摘要：前两天在qq群里看到有人问如何使用citectVBA取得昨天的日期，我看了一下CitectVBA资料，一个坏消息是没有日期加减计算的函数，一个好消息是excel里面丰富的日期时间函数可以计算昨天的日期，而且citect可以读取excel文件内容。当然可以在citectvba中通过if……then一大 阅读全文
posted @ 2021-02-22 12:20 来自金沙江的小鱼 阅读(138) 评论(0) 推荐(0)
搬家第25天-citectv7.4CitectVBA读取已经存在的Excel文件数据
摘要：假设c盘根目录下有一个text.xlsx文件，希望得到R1C1的数值，那么在cicode编辑器写以下CitectVBA代码： Sub getdatafromexcel()Dim xlApp As ApplicationDim objwb As ObjectDim objst As ObjectDim 阅读全文
posted @ 2021-02-22 12:19 来自金沙江的小鱼 阅读(291) 评论(0) 推荐(0)
搬家第25天-citect V7.4 CitectVBA 合并列制作msflexgrid控件表头
摘要：比如我们有这样一个access表格 希望在citect中的MSFlexgrid控件显示信息时，是这样的排版 那么在前面讲access数据写入msflexgrid代码基础上可以写以下代码 Sub msflexgridMergerow()Dim InsertRowCount,colcount,i,j A 阅读全文
posted @ 2021-02-22 08:14 来自金沙江的小鱼 阅读(243) 评论(0) 推荐(0)
搬家第24天-Citect V7.4 citectVBA定义excel边框样式
摘要：前面的博客记录了在excel一个区域划全部的边框，其实还可以自定义左、右、上、下、斜边框，以及边框线等等。在citectVBA编辑器写以下代码： Sub ExcelBordersCnfg()Dim fileName As stringDim xlApp As ApplicationSet xlApp 阅读全文
posted @ 2021-02-21 20:25 来自金沙江的小鱼 阅读(221) 评论(0) 推荐(0)
搬家第24天-citect V7.4 CitectVBA使用ADO连接ACCESS数据库，并且把表内容填入microsoft flexgrid控件里面
摘要：和wincc学习时一样，我想把access数据表中的内容写入msflexgrid控件，这一次联系CitectVBA方式。main画面上msflegrid控件编码是AN7，在access数据库myaccess有一个表table1，有这样的内容： 在编辑器中写入下面的代码： Sub ConnAccess 阅读全文
posted @ 2021-02-21 20:24 来自金沙江的小鱼 阅读(232) 评论(0) 推荐(0)
搬家第24天-ADO连接数据库表失败：因为表名
摘要：今天再次实验昨晚的ADO连接ACCESS数据表，由于ACCESS数据表名字是table，造成Set ors=ocom.Execute语句根本没有执行，也没有citectVBA编译错误，access中定于表名也没有报错，折腾了一段时间终于悔悟了。把表名字改成table1马上就好了。这给了一点教训，那些 阅读全文
posted @ 2021-02-21 20:19 来自金沙江的小鱼 阅读(182) 评论(0) 推荐(0)
搬家第24天-citect V7.4 CITECTVBA 通过ADO连接ACCESS数据库，计算表记录数
摘要：前面的博客记录过使用cicode通过ODBC连接ACCESS数据库，其实使用CitectVBA也能连接。本篇记录如何使用citectVBA脚本通过ADO方式连接ACCESS数据库，并且得到数据表记录数。其实了解了数据库连接写法，取得记录和字段值就相对容易了。 假设有一个myaccess数据库，下面有 阅读全文
posted @ 2021-02-21 20:17 来自金沙江的小鱼 阅读(234) 评论(0) 推荐(0)
搬家第24天-citectV7.4VBA获取控件属性
摘要：前面的博客介绍了如何使用cicode获取控件属性，使用citectVBA也可以获取控件属性。在页面main上放置一个microsoft flexgrid控件，其编号是AN4，在citectVBA编辑器中写入以下代码： Sub VBA_GetObjPropTest()msgbox main_AN4.c 阅读全文
posted @ 2021-02-21 20:16 来自金沙江的小鱼 阅读(282) 评论(0) 推荐(0)
搬家第24天citect V7.4 VBA自定义Excel表格格式
摘要：前面一篇博客记录了怎么创建一个excel文件并录入数据，数据录入之后还需要进行合并单元格、表格线之类的操作，使用脚本可以让这些定义全自动完成。 CitectVBA编辑器中插入以下脚本： Sub CreateExcelFileByVBA(sFileName As string)Dim xlApp As 阅读全文
posted @ 2021-02-21 20:14 来自金沙江的小鱼 阅读(370) 评论(0) 推荐(0)
搬家第24天-citect v7.4 CitectVBA创建一个excel文件并写数据
摘要：以前在wincc学习时，练习过创建一个excel文件，并且将数据写入新创建的excel文件。cicode代码似乎没有那么灵活，写数据到还要用到ODBC连接。不过CitectVBA功能还是不错的，本篇就记录怎么创建excel文件和写数据，思路和在wincc一样。 创建一段CitetVBA代码 Sub 阅读全文
posted @ 2021-02-21 20:10 来自金沙江的小鱼 阅读(686) 评论(0) 推荐(0)
搬家第24天-citectV7.4使用CitectVBA编程初步
摘要：citect写脚本，可以使用cicode，也可以使用CitectVBA，这篇博客开始记录citectVBA变成学习。先从一个简单的练习开始。 在citect项目管理器的菜单 工具-cicode编辑器 新建一个CitectVBA文件，写如下脚本 Sub mymsg()msgbox("这是一个Citec 阅读全文
posted @ 2021-02-21 20:08 来自金沙江的小鱼 阅读(544) 评论(0) 推荐(0)

上一页 1 2 3 4