Private Sub Form_click()
Dim y As Integer, f As Integer, k As Integer
y = Val(InputBox("请输入年号:", , "键盘输入年号"))
y = y - 1
f = yy \ 4 - y \ 100y \ 4001
k = f Mod 7
MsgBox y1 & "年的元旦是星期" & k
End Sub
呵呵,公司送台历啊,我只能说“呵呵” 。
首先 ,这既是风俗,这是近现代以来,大工业发展迅猛以来,厂家为回报员工,想出的美其名曰犒劳员工而用的廉价方式。
而到当代以来,公司更是认识到了这其中的便宜,以小恩小惠博得员工的拥护。其实,现代以来,这种方式更是流弊深重,本来可以以支付员工金钱的方式,而国家又要促进工业发展,因此,两厢勾搭成奸,就形成了过年公司送台历这种方式。
当然,我这里的话题有些偏大了。每一个事物的产生都有其客观环境,再加上其本身的内在原因,所以,就不可避免地出现了。当然,客观环境决定的是时间,是偶然因素,内在原因,是必然因素 。当然,依照阴阳家的观点,偶然因素也在必然因素辖属之内。这最末一段是我即兴发挥的。
望采纳。谢谢!!
到 年 底 了 公 司 定 制 的 台 历 昨 天 已 经 送 来 了 , 礼 叮 当 的 服 务 还 是 相 当 赞 的 , 单 独 设 计 的 台 历 款 式 , 不 仅 印 了 公 司 的 l o g o , 还 有 产 品 图 样 , 日 期 下 面 还 有 日 程 记 事 格 , 送 给 客 户 也 比 较 档 次 , 好 看 又 实 用 。
山东省青岛市市北区开平路。根据查询百度地图可知,青岛台历批发市场位于山东省青岛市市北区开平路,青岛,山东省辖地级市,别称岛城、胶澳,副省级市、计划单列市、特大城市,国务院批复确定的中国沿海重要中心城市和滨海度假旅游城市、国际性港口城市。
1、送日历没有什么忌讳,而且不同人送日历的寓意不同。
2、女生送男生日历:
是希望男生对自己的生活有更好的规划,注意时间的流逝,或者是希望男生对女生多一点心思,能够记下他们之间的重要日子!
3、男生送女生日历:
是希望女生了解他在他们在一起的日子有多么的珍惜,同时希望女生和他一起快乐的过每一天!(有的日历上有笑话等等)
4、朋友之间送台历:
合理安排时间,注意休息。
5、长辈送晚辈台历:
让你珍惜时间,做个会计划的人。
欢迎分享,转载请注明来源:品搜搜测评网