|
楼主 |
发表于 2012-9-20 22:25:14
|
显示全部楼层
空间 表格测试
//定义默认空间
功能 逻辑型 开始_点击()
//这里添加你要执行的代码
表格.设置内容("表格0",1,0,"同学A")
表格.设置内容("表格0",2,0,"同学B")
表格.设置内容("表格0",3,0,"同学C")
表格.设置内容("表格0",4,0,"同学D")
表格.设置内容("表格0",5,0,"同学E")
表格.设置内容("表格0",6,0,"同学F")
表格.设置内容("表格0",7,0,"同学G")
表格.设置内容("表格0",8,0,"同学H")
表格.设置内容("表格0",9,0,"同学I")
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
辅助.退出()
返回 真
//函数返回语句
功能结束
功能 逻辑型 按钮1_点击()
字符型 a
字符型 b
字符型 c
字符型 d
整型 求和
a=表格.获得内容("表格0",1,1)
b=表格.获得内容("表格0",1,2)
c=表格.获得内容("表格0",1,3)
d=表格.获得内容("表格0",1,4)
求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
表格.设置内容("表格0",1,5,(转换.整型转字符型(求和)))
如果(求和<=0)
表格.设置内容("表格0",1,5,"")
如果结束
a=表格.获得内容("表格0",2,1)
b=表格.获得内容("表格0",2,2)
c=表格.获得内容("表格0",2,3)
d=表格.获得内容("表格0",2,4)
求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
表格.设置内容("表格0",2,5,(转换.整型转字符型(求和)))
如果(求和<=0)
表格.设置内容("表格0",2,5,"")
如果结束
a=表格.获得内容("表格0",3,1)
b=表格.获得内容("表格0",3,2)
c=表格.获得内容("表格0",3,3)
d=表格.获得内容("表格0",3,4)
求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
表格.设置内容("表格0",3,5,(转换.整型转字符型(求和)))
如果(求和<=0)
表格.设置内容("表格0",3,5,"")
如果结束
a=表格.获得内容("表格0",4,1)
b=表格.获得内容("表格0",4,2)
c=表格.获得内容("表格0",4,3)
d=表格.获得内容("表格0",4,4)
求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
表格.设置内容("表格0",4,5,(转换.整型转字符型(求和)))
如果(求和<=0)
表格.设置内容("表格0",4,5,"")
如果结束
a=表格.获得内容("表格0",5,1)
b=表格.获得内容("表格0",5,2)
c=表格.获得内容("表格0",5,3)
d=表格.获得内容("表格0",5,4)
求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
表格.设置内容("表格0",5,5,(转换.整型转字符型(求和)))
如果(求和<=0)
表格.设置内容("表格0",5,5,"")
如果结束
a=表格.获得内容("表格0",6,1)
b=表格.获得内容("表格0",6,2)
c=表格.获得内容("表格0",6,3)
d=表格.获得内容("表格0",6,4)
求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
表格.设置内容("表格0",6,5,(转换.整型转字符型(求和)))
如果(求和<=0)
表格.设置内容("表格0",6,5,"")
如果结束
a=表格.获得内容("表格0",7,1)
b=表格.获得内容("表格0",7,2)
c=表格.获得内容("表格0",7,3)
d=表格.获得内容("表格0",7,4)
求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
表格.设置内容("表格0",7,5,(转换.整型转字符型(求和)))
如果(求和<=0)
表格.设置内容("表格0",7,5,"")
如果结束
a=表格.获得内容("表格0",8,1)
b=表格.获得内容("表格0",8,2)
c=表格.获得内容("表格0",8,3)
d=表格.获得内容("表格0",8,4)
求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
表格.设置内容("表格0",8,5,(转换.整型转字符型(求和)))
如果(求和<=0)
表格.设置内容("表格0",8,5,"")
如果结束
a=表格.获得内容("表格0",9,1)
b=表格.获得内容("表格0",9,2)
c=表格.获得内容("表格0",9,3)
d=表格.获得内容("表格0",9,4)
求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
表格.设置内容("表格0",9,5,(转换.整型转字符型(求和)))
如果(求和<=0)
表格.设置内容("表格0",9,5,"")
如果结束
//如果(求和==0)
//如果结束
//这里添加你要执行的代码
返回 真
功能结束
//功能 逻辑型 按钮2_点击()
////这里添加你要执行的代码
//字符型 a
//字符型 b
//字符型 c
//字符型 d
//整型 求和
//a=表格.获得内容("表格0",2,1)
//b=表格.获得内容("表格0",2,2)
//c=表格.获得内容("表格0",2,3)
//d=表格.获得内容("表格0",2,4)
//求和=转换.字符型转整型(a)+转换.字符型转整型(b)+转换.字符型转整型(c)+转换.字符型转整型(d)
//表格.设置内容("表格0",2,5,(转换.整型转字符型(求和)))
//返回 真
//功能结束
空间结束
//空间结束语句
这是更改后的代码我就不重新上传了改后没写的地方就不会有0了 |
|