由中国天气网提供
[不指定 2010/09/20 09:52 | by 白燕湾 ]

黄兴蓉:山果

[不指定 2016/10/06 18:04 | by 吕进 | Via 本站原创 ]
点击在新窗口中浏览此图片
我常抱怨日子过得不称心。我知道这么想没有什么可指责之处,人朝高处走,水往低处流嘛。但是怎么算过得好?应该和谁比?我不能说不模糊。前些日子我出了一趟远门,对这个问题好像有了一点感悟。
我从北京出发到云南元谋县,进入川滇边界,车窗外目之所及,都是荒山野岭。火车在沙窝站只停两分钟,窗外一群约十二三岁破衣烂衫的男孩和女孩,都背着背篓拚命朝车上挤,身上那巨大的背篓妨碍着他们。
我所在的车厢里挤上来一个女孩,很瘦,背篓里是满满一篓核桃。她好不容易地把背篓放下来,然后满巴掌擦着脸上的汗水,把散乱的头发抹到后面,露出俊俏的脸蛋儿,却带着菜色。半袖的土布小褂前后都是补丁,破裤子裤脚一长一短, 也满是补丁,显然是山里的一个穷苦女娃。
Tags: , ,

在ACCESS中用VBA设置EXCEL单元格的格式

[不指定 2016/09/25 09:29 | by 吕进 | Via 本站原创 ]
在ACCESS中用VBA更改EXCEL单格元格的格式可用以下代码:
Private Sub test5()                                                        'EXCEL单元格格式设置
Dim excelapplication As Object
Dim str As String
str = Application.CurrentProject.Path & "\book1.xls"
Set excelapplication = GetObject(str)                                      '获取指定的EXCEL文件
With excelapplication.sheets(1)
    .Range(.Cells(1, 1), .Cells(3, 4)).Borders.LineStyle = xlContinuous    '设置单元格的边框
    .Range(.Cells(1, 1), .Cells(3, 4)).Borders.ColorIndex = xlAutomatic    '设置单元格边框的颜色,可用1~56间的数字设置不同的颜色
    .Range(.Cells(1, 1), .Cells(3, 4)).NumberFormat = "0.00%"              '设置单元格的值以百分比的形式显示
    .Range(.Cells(1, 1), .Cells(3, 4)).interior.ColorIndex = 24            '设置单元格的颜色
    .Range(.Cells(1, 1), .Cells(3, 4)).Font.Bold = True                    '字体加粗
End With
End Sub

从外包装的条形码怎么能看出商品的条形码

[不指定 2016/06/22 09:41 | by 吕进 | Via 本站原创 ]
外包装的条形码一般都是13位的,商品的条形码都是12位,我只记得外包装的条形码1打头的尾数加3  ,2打头的尾数加6,3打头的尾数减1,4打头的尾数加2,谁能给我个从0到9打头的尾数应该加几 就是商品的条形码?谢谢了!

商品条码有8位的,13位的,是EAN标准,还有12位的是美国的部分地区和加拿大使用的UPC标准。
外箱条码按照标准都应该是14位的,第一位叫包装指示符,除了第一位以外,后边的12位是商品代码,最后一位是校验码。对于8位的和12位的,去掉校验码后分别有7位和11位,变成外箱码时要在前面分别加5个0和1个0,变成12位,再加包装指示符。
外箱条码的最后一位校验码根据第一位的不同要重新计算,计算方法楼上已经给出了。由于外箱码与商品条码只是增加了第一位,所以也可以由下面的列表推算。
Tags:

Win7图片查看器无法查看Gif动图的解决办法

[不指定 2016/06/11 17:47 | by 吕进 | Via 本站原创 ]
Win7系统,在查看图片时,常遇到Gif动图无法正常查看的情况,

安装插件,重启后可以解决问题:

ImageViewerforWindows7(网上搜索)
分页: 1/134 第一页 1 2 3 4 5 6 7 8 9 10 下页 最后页 [ 显示模式: 摘要 | 列表 ]