陋博

　　如果在装修上巧妙运用，也可以降低居室噪音。选用壁纸、文化石等装修材料，使墙壁表面粗糙一些，可减弱噪声。用质地厚实的窗帘帷幔织物可控制光线和外界噪声。　　　　人长期在噪声超标的环境里，会产生烦躁不安、神经衰弱、心跳加快、血压升高、食欲不振、睡眠不宁等症状，给人的身心健康带来危害。如果在装修上巧妙运用，也可以降低居室噪音。　　　　墙壁过于光滑，回音就会加重，选用壁纸、文化石等装修材料，使墙壁表...

   装修的工序繁杂，项目多。光是看看材料就能让人头晕目眩，更别提什么尺寸 啊型号啊……记住这些东西，都需要花费很多精神和脑力。不过，繁杂是繁杂，该记住的还是得记。比如如下细节，就得在装修过程中多加留心! 1、鞋柜的隔板不要做到头，留一点空间好让鞋子的灰能漏到最底层，方便日常清洁。 2、鞋柜要做两个抽屉，且用百叶门作门，可以防臭。 3、鞋柜留一个插座，用来插烘鞋 4、鞋柜必须留出一个(不低于45厘米)较...

实木复合地板铺设完毕后，至少要养护24小时后方可使用，否则将影响实木复合地板使用效果。一般实木复合地板耐水性差，不宜用湿布或水擦，以免失去光泽。在以后的日常生活中，必须养护好实木地板，具体措施如下：　　　　1、保持地板干燥清洁，用拧干的软湿毛巾抹擦地板，在北方干燥地区，干燥季节可用湿布擦拭地板，在南方气候潮湿的地方，不宜用湿拖布擦地板或直接用水清洗。　　　　2、地板铺装好以后应在二周内入住。长时间...

发现一个很有趣弹钢琴的网页, 算是一个打发无聊,练习键盘指法的好网站吧  http://www.tantan123.com/playhall.php 刚开始选些难度(下图绿圆框所标)低一点的曲练,循序渐进.

废话不说,直接进入正题.建一个 按钮Command1 和一个 Textbox Text1 ,下面只以男名为例.女名同理. 原代码: Private Sub Command1_Click() Dim x1, x2, x3, x4, x5, x6, x7, x8, x9, z, o, o2, o3, o4 As String o = "伟勇毅俊峰强平保东文辉力明永健世广志义兴良海山仁波宁贵福生龙元胜学祥才发武新利清飞彬富顺信子杰昌成星光天达安岩中茂进林有坚和博诚先敬震振壮会思群心邦承乐绍功松善厚庆磊民友裕河江超浩亮政谦亨奇翰朗...

首先要[工程]－[引用] Microsoft Scriptting Runtime Private Sub Command1_Click() Dim fso As New FileSystemObject If fso.FolderExists("c:abc") Then   MsgBox ("文件夹已存在") Else   fso.CreateFolder ("c:abc") End If End Sub Private Sub Command2_Click() Dim fso As New FileSystemObject If Not fso.FolderExists("c:abc") Then   MsgBox ("文件夹不存在") Else   fso.DeleteFolder ("c:ab...