`
yilin
  • 浏览: 19936 次
  • 性别: Icon_minigender_2
  • 来自: 天津市
社区版块
存档分类
最新评论

遍历数据窗口对象

    博客分类:
  • pb
SQL 
阅读更多
string ls_msg
string ls_datatype
string ls_value,ls_tag
string ls_objects
String ls_obj[], ls_Obj_Band[] 
long li_pos, li_i

ls_Objects = dw_1.Describe("datawindow.objects") 
ls_Objects += '~t' 
DO While ( Pos( ls_Objects, "~t" ) > 0) 
    li_i ++ 
    li_pos = Pos( ls_Objects, "~t" ) 
    ls_obj[li_i] = Left( ls_Objects, li_pos - 1 ) 
    ls_Objects = Right( ls_Objects, Len(ls_Objects) - li_pos) 
	 
	if dw_1.describe(ls_obj[li_i]+".band") = "detail" then
		if dw_1.describe(ls_obj[li_i]+".type") = "column" or dw_1.describe(ls_obj[li_i]+".type") = "compute" then
			
			ls_tag = dw_1.describe(ls_obj[li_i]+".tag")
			if isnull(ls_tag) or ls_tag = "" then continue //tag为空则继续
			
			ls_datatype = dw_1.describe(ls_obj[li_i]+".ColType") 
			choose case left(ls_datatype,4)
			case "char"
				ls_value = dw_1.getitemstring(1,ls_obj[li_i])
			case "long"
				ls_value = string(dw_1.getitemnumber(1,ls_obj[li_i]))
			case "deci"
				ls_value = string(dw_1.getitemdecimal(1,ls_obj[li_i]))
			case "date"
				ls_value = string(dw_1.getitemdatetime(1,ls_obj[li_i]),"YYYY-MM-DD")
			end choose
			if isnull(ls_value) or ls_value="" then 
				ls_msg += ls_tag + "~r~n"
			end if
		end if
	end if
	 
loop


分享到:
评论

相关推荐

    内存遍历工具(驱动版)

    2.区域6的作用是显示遍历结果,这个窗口的数据不是时时更新的,并且软件关闭后不会记录,除右键菜单外还支持快捷操作 (1)左键双击-记录鼠标选择行所有信息到区域3(当前激活的) (2)DELETE-删除鼠标选择行 3....

    VBA常用技巧

    119-2使用对象类型遍历控件279 119-3使用程序标识符遍历控件280 119-4使用名称中的变量遍历图形281 119-5使用FormControlType属性遍历图形282 技巧120使微调框最小变动量小于1283 技巧121不打印工作表中的控件285 ...

    数据结构演示软件

    一般情况下, 左侧图示窗口显示演示数据的逻辑结构或存储结构,右侧上方窗口显示算法文本,右侧下方窗口显示当前算法中各变量的值或递归工作栈的状态。各窗口间的边界大小均可自由调节,且可按需扩大至全屏。 算法...

    用c描述的数据结构演示软件

    一般情况下, 左侧图示窗口显示演示数据的逻辑结构或存储结构,右侧上方窗口显示算法文本,右侧下方窗口显示当前算法中各变量的值或递归工作栈的状态。各窗口间的边界大小均可自由调节,且可按需扩大至全屏。 算法...

    Visual C++开发经验技巧宝典(第4章)

    0215 根据句柄获得窗口对象的方法 104 0216 如何共享MSDN 104 0217 从完整的文件名中去除路径 104 0218 从复合字符串中解析子串 105 0219 如何获得应用程序的完整路径 105 0220 修改对话框图标的几种方法...

    传送器:自动生成完整的UI来传送数据

    传送带被设计为用于连接索引表,详细信息页面,用于详细信息页面的嵌套选项卡,创建堆栈(由可以遍历的相关对象连接的表单),删除按钮,删除警告弹出窗口,内联编辑和表编辑的前端框架。 在模型和现场级别上都有...

    Visual Basic 6编程技术大全 中译本扫描版带书签 2/2

    4.2.10对象数据类型106 4.2.11变量数据类型107 4.2.12十进制数据类型110 4.3联合数据类型110 4.3.1用户自定义类型110 4.3.2数组111 4.3.3集合120 4.3.4字典对象125 4.4过程127 4.4.1作用域128 4.4.2参数列表和返回值...

    Visual Basic 6编程技术大全 中译本扫描版带书签 1/2

    4.2.10对象数据类型106 4.2.11变量数据类型107 4.2.12十进制数据类型110 4.3联合数据类型110 4.3.1用户自定义类型110 4.3.2数组111 4.3.3集合120 4.3.4字典对象125 4.4过程127 4.4.1作用域128 4.4.2参数列表和返回值...

    精通Windows.API-函数、接口、编程实例.pdf

    2.1.2 Windows数据类型与标准C数据类型的关系 14 2.1.3 Windows数据类型与Windows API 14 2.1.4 Windows中的数据结构 15 2.2 Windows API的功能分类 15 2.2.1 系统基本服务 15 2.2.2 系统管理 17 2.2.3...

    JavaScript王者归来part.1 总数2

     11.2.5.1 一个遍历Anchors对象的例子   11.2.5.2 一个颠倒图片的例子   11.3 对话框和状态栏   11.3.1 创建一个简单对话框   11.3.2 其他类型的对话框   11.3.2.1 模拟对话框--创建一个窗口对话框及一个...

    精通WindowsAPI 函数 接口 编程实例

    2.1.2 Windows数据类型与标准C数据类型的关系 14 2.1.3 Windows数据类型与Windows API 14 2.1.4 Windows中的数据结构 15 2.2 Windows API的功能分类 15 2.2.1 系统基本服务 15 2.2.2 系统管理 17 2.2.3...

    ActionScript开发人员指南中文版

    遍历XML结构 使用XML命名空间 XML类型转换 读取外部XML文档 在ActionScript中使用XML的示例:从Internet加载RSS数据 第章:使用本机JSON功能 JSONAPI概述 定义自定义JSON行为 第章:处理事件 事件处理基础知识 ...

Global site tag (gtag.js) - Google Analytics