用易语言写一段代码,实现根据日期读取对应单元格内容并输出展示

查看 41|回复 1
作者:沛沛   
没有这方面知识,请写注释 ,要求实现的功能:
1,获取当前日期并显示
2,根据日期读取对应表格的内容,需要2个输出框(好比A列为日期格式如:9.4活9-4等等,B列为1,C列为2,),文本框1输出1,文本框2输出2,
3,需要的模块啥的一并上传,
大家好,在此收集文件
有效期截止到2024年9月11日18:42,麻烦在此之前点击以下链接将文件发送给我,支持发送任意格式的文件,感谢~
链接:https://pan.baidu.com/disk/main#/transfer/send?surl=AD8AAAAAABKfvw
来自:WSKQYW

日期, 在此

wxx1337   

.版本 2
.程序集 程序集1
.子程序 __启动, 整数型, , , 公开
    .局部变量 当前日期, 字符型
    .局部变量 文本框1, 文本框型
    .局部变量 文本框2, 文本框型
    .局部变量 表格, 表格型
    .局部变量 行数, 整数型
    .局部变量 日期列, 整数型
    .局部变量 数值列, 整数型
    当前日期 = 获取系统日期()
    当前日期 = 当前日期到字符串(当前日期, "m.d")
    文本框1 = 创建文本框("文本框1", 100, 100, 100, 20)
    文本框2 = 创建文本框("文本框2", 100, 150, 100, 20)
    表格 = 打开文件("你的文件路径", "你的表格名称")
    行数 = 表格行数(表格)
    日期列 = 表格列号(表格, "A")
    数值列1 = 表格列号(表格, "B")
    数值列2 = 表格列号(表格, "C")
    到 (行数)
        如果 表格读取文本(表格, 行数, 日期列) = 当前日期 或 表格读取文本(表格, 行数, 日期列) = 当前日期到字符串(当前日期, "m-d") 则
            文本框1.文本 = 表格读取文本(表格, 行数, 数值列1)
            文本框2.文本 = 表格读取文本(表格, 行数, 数值列2)
        如果真
    步进
    关闭文件(表格)
.子程序 end
您需要登录后才可以回帖 登录 | 立即注册

返回顶部