登录 | 注册

首页 | 学习中心 | 下载中心 | 知识大全 | 作文 | 常识 | 加入收藏 | 网站地图

您当前位置:多思学习网知识频道电脑学习软件技巧实现打印报表结果数据加分节号

实现打印报表结果数据加分节号

11-08 12:37:21软件技巧
浏览次数:234次 
标签:软件技巧大全,http://www.duosi8.com 实现打印报表结果数据加分节号,
 clear
        set talk off
        do while .t.
        mmm=0
        @10,10 say'请输入转换数' get mmm
        if mmm<>99999
        mm=ltrim(rtrim(str(mmm,14,2)))
        kk=len(mm)
        kk1=kk-4
        qq=int(kk1/3)
        if qq>0
        n=''
        m=.T.
        oo=1
        uu=kk-(qq+1)*3
        n=n+left(mm,uu)+','
        qq=qq-1
        do while m
        if qq=0
        n=n+right(mm,6)
        m=.F.
        else
        if oo=1
        uu=uu+1
        n=n+substr(mm,uu,3)+','
        qq=qq-1
        OO=2
        else
        uu=uu+3
        n=n+substr(mm,uu,3)+','
        qq=qq-1
        endif
        endif
        enddo
        @ 11,2 clear to 14,70
        @ 12,20 say n
        else
        @ 11,2 clear to 14,70
        @  12,20 say mm
        endif
        else
        exit
        endif
        enddo
        quit
 

,实现打印报表结果数据加分节号
《实现打印报表结果数据加分节号》相关文章

tag: 软件技巧,软件技巧大全,电脑学习 - 软件技巧

相关分类

联系我们 | 网站地图 | 幼教大全 | 试题下载 | 电脑学习 | 加入收藏


幼儿园教案_ 教案模板_ 课件模板_ 教学反思_ 教学计划


多思学习网 1 2 3 4 5 6