循环写入一个月的每一天日期

好的，以下是循环写入一个月的每一天日期的代码，你可以根据需要进行修改：

import datetime

# 输入年份、月份
year = int(input("请输入年份："))
month = int(input("请输入月份："))

# 获取本月的天数
if month == 2:
    if year % 4 == 0 and year % 100 != 0 or year % 400 == 0:
        days = 29
    else:
        days = 28
elif month in [4, 6, 9, 11]:
    days = 30
else:
    days = 31

# 循环写入每一天的日期
for i in range(1, days+1):
    date_str = datetime.date(year, month, i).strftime('%Y-%m-%d')
    print(date_str)

这段代码可以根据输入的年份和月份，计算出该月的天数，然后通过循环遍历每一天的日期，并将其输出。

相关问题

Excel表格中以日期为首列，使用VBA编写一个程序，可以自动将每周（每七天)数据中的的所有列进行平均，生成平均列。

非常感谢您的提问。这是一个编程类的问题，我可以回答。以下是一个示例代码，可以实现您的需求：

Sub AverageWeeklyData()
Dim lastRow As Long
Dim lastCol As Long
Dim startRow As Long
Dim endRow As Long
Dim i As Long
Dim j As Long
Dim k As Long
Dim weeklyAverage As Double

'获取最后一行和最后一列
lastRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
lastCol = ActiveSheet.Cells(1, Columns.Count).End(xlToLeft).Column

'循环遍历每一列
For j = 2 To lastCol
'获取当前列的起始行和结束行
startRow = 2
endRow = 8
k = 1

'循环遍历每一周的数据
Do While endRow <= lastRow
'计算当前周的平均值
weeklyAverage = WorksheetFunction.Average(Range(Cells(startRow, j), Cells(endRow, j)))

'将平均值写入新的列
Cells(k, lastCol + 1).Value = weeklyAverage

'更新起始行和结束行
startRow = endRow + 1
endRow = startRow + 6
k = k + 1
Loop
Next j
End Sub

请注意，此代码仅适用于每周数据的情况，如果您的数据不是每周的，您需要相应地更改代码。

写一段代码，保存近一周日志

以下是一段 Python 代码，可以保存近一周的日志：

import datetime

# 获取当前日期
today = datetime.date.today()

# 近一周的日期范围
start_date = today - datetime.timedelta(days=6)
end_date = today + datetime.timedelta(days=1)

# 打开日志文件
with open('log.txt', 'a') as f:
    # 写入日期范围
    f.write(f'日志日期范围：{start_date} 至 {end_date}\n\n')

    # 写入每一天的日志
    for i in range(7):
        date = start_date + datetime.timedelta(days=i)
        f.write(f'{date} 的日志：\n')
        # 在这里写入每一天的日志内容
        f.write('\n')

    # 写入分隔符
    f.write('-' * 50 + '\n')

这段代码会在当前目录下创建一个名为 `log.txt` 的文件，并保存近一周的日志。你可以在每天的循环中写入当天的日志内容。