显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

9lee的博客

最近爱上钩蕾丝.........最近又迷上织蕾丝........

 
 
 
 
 
 

【转载】VBA 读取/写入文本文件

2013-12-6 21:57:40 阅读377 评论1 62013/12 Dec6

1、Open 语句

打开方式有

Input:以读取方式打开。

Output:以写入方式打开。

Append:以追加方式,即添加内容到文件末尾打开。

Binary:以二进制方式打开。

Random:以随机方式打开,如果未指定方式,则以 Random 方式打开文件。

Open pathname For mode As [#]filenumber

Open "c:\a.txt" For Output As #1

filenumber  是一个有效的文件号,范围在 1 到 511 之间。

如果 pathname 指定的文件不存在,那么,在用 Append、Binary、Output、或 Random 方式打开文件时,可以建立这一文件。

2、Close 语句

语法:Close [filenumberlist]

filenumberlist 参数为一个或多个文件号,若省略 filenumberlist,则将关闭 Open 语句打开的所有活动文件。

说明:打开文件后,必须在使用完后关闭文件。

3、EOF 函数

语法:EOF(filenumber)

功能:返回一个 Integer,它包含 Boolean 值 True,表明已经到达为 Random 或顺序 Input 打开的文件的结尾。

Open "c:\a.txt"  For Input As #1 ‘以读入方式打开c:\a.txt

作者  | 2013-12-6 21:57:40 | 阅读(377) |评论(1) | 阅读全文>>

【转载】VBA -网页控制方式简介

2013-12-6 21:56:16 阅读210 评论0 62013/12 Dec6

这是本人在学习Excel VBA 填写表单过程中的一些学习心得,可能存在错误,仅供参考。

以登录网易163邮箱为例(只限于打开网页,不涉及填写表单和获取数据)

方式一:VBA 打开浏览器并打开指定网页

Sub Goto163()

   With CreateObject("InternetExplorer.Application")

        .Visible = True

        .navigate "http://mail.163.com"

        Do Until .Readystate = 4 '判断网页是否加载完毕

             DoEvents

        Loop

  End With

  MsgBox "Ok"

End Sub

方式二:VBA窗体添加WebBrowser控件,打开网页

VBA默认是没有加载WebBrowser控件,需要在工具箱添加控件“Microsoft Web Browser”控件

窗体web添加的WebBrowser名称为WebBrowser1

Sub openurl ()

web.WebBrowser1.Navigate "http://mail.163.com"

    web.Show '不要这句的话就是后台执行了

End sub

作者  | 2013-12-6 21:56:16 | 阅读(210) |评论(0) | 阅读全文>>

【转载】VBA-填写网页表单的方法

2013-12-6 21:55:57 阅读278 评论0 62013/12 Dec6

本次介绍的方法是http://chiensq.blog.163.com/blog/static/1035628201174015765/?newFollowBlog中介绍的第二种方法控制网页

要填写网页表单,就要知道网页中各个要填写的项目名称,就需要分析网页。分析网页有好几种方法:

以:http://mial.163.com/为例

1、直接查看网页的源代码(网页右键有该功能)

在源代码中直接搜索如“用户名”,“密码”等需要填写的项目的文字。找到类似以下的代码

<LABEL class="lb for for-1">用户名</LABEL> <LABEL class="lb for for-2 for-3">手机号</LABEL> <INPUT class=ipt-t id=idInput onblur="fCheckAccount(this);fEvent('blur',this)" onmouseover="fEvent('mouseover',this)" onfocus="fEvent('focus',this)" tabIndex=1 onmo

作者  | 2013-12-6 21:55:57 | 阅读(278) |评论(0) | 阅读全文>>

中药泡脚药方大全

2013-10-6 10:04:48 阅读224 评论0 62013/10 Oct6

树枯根先竭,人老脚先衰

诸病从寒起,寒从足下生

春天泡脚,升阳固脱;夏天泡脚,除湿去暑

秋天泡脚,肺腑润育;冬天泡脚,藏精温肾

热水泡脚,如吃补药: 中药泡脚,胜吃补药

天天吃只羊,不如中药泡脚再上床

用中药泡脚是利用热水促进药物渗透进人体的作用,即可保证药物能通过脚部透达周身经络,又不会出现口服药物过量导致不良反应的情况。可选择适合自身需要的中药配方,将刚煎好的中药放入足浴盆中,利用中药蒸汽熏蒸足部约10分钟。中药熏蒸是中医重要的外治法之一,将其应用于足疗中,能借助水蒸气扩张足部的毛细血管,使中药的有效成份充分地通过毛血管循环至全身经络,再循经络运行到五脏六腑,从而达到内病外治,上病下治的作用。

然后再加水调温浸泡三十分钟左右,通过双手对自己做自我按摩,使药物更好刺激足部穴位和反射区,从而达到疏通经络,改善血液循环,促进新陈代谢,调节神经系统,从而改善睡眠,防治各种血管疾病,防治糖尿病,调整血脂、血压,防治中老年风湿性关节炎,同时也是养生美容和减肥的好办法。中药泡脚对糖尿病足、便秘、小儿遗尿、神经衰弱、月经不调、痛经、更年期综合征、慢性疲劳综合征、抑郁和抗衰老均有一定的效果。

生姜泡脚:脚凉怕冷,用生姜一块(像枣大这么一块姜)用刀拍扁,红花、取一份用纱布包好放在水里一起烧开,再加一勺盐泡脚。

红花泡脚:和血化淤,药店买一两红花分成10份,取一份用纱布包好放在水里烧开,然后加一勺盐,方法先熏脚后泡脚,治腰酸痛。(泡脚的水一定满过脚踝骨)

艾叶和花椒泡脚,可治疗皮肤病如湿疹。

作者  | 2013-10-6 10:04:48 | 阅读(224) |评论(0) | 阅读全文>>

泡脚药方

2013-10-6 9:53:50 阅读217 评论0 62013/10 Oct6

 

  这就是老按摩师告诉我的一个泡脚方。大家按这个方子,到卖中药的药店,告诉店员这是泡脚方,让他们把药完全粉碎成面了给你。

  红花5g,百部5g,苏木5g,独活5g,栀子4g,透骨草4g,细辛3g,威灵仙3g

  这只是一付药的药量,一次你来十付就行了。可以用上半年。没多少钱。

  当从药店取回这些泡脚药粉后,你需要找一个丝袜,一次放上10-20克,系好了,放到木桶里,这个时候,你用洗澡的热水一冲,药液就冲开了,淡黄色的,很清亮,有一股药香味。

  全家人都可以用这个药一起泡,不会传染脚气。孩子泡完,LP泡,最后你再泡。一桶泡脚水,服务三个人。有的人很会过日子,觉得天天用药很浪费,想省着点用,行不行呢?一般来说,在秋冬季,这个药水,可使用3天以上。只要你觉得药液不浑浊,不发粘拉丝,就可以继续使用。不过如果第二天还要继续用,只好用热得快加热了,一大桶水,加热要花很长时间,值不值得这样做,你自己考虑吧。

作者  | 2013-10-6 9:53:50 | 阅读(217) |评论(0) | 阅读全文>>

【转载】爱尔兰花图解(73)

2013-7-23 13:15:02 阅读296 评论0 232013/07 July23

TATYSIY

Листья"

Воскресенье, 21 Июля 2013 г. 15:51 (ссылка) + в цитатник

Прочитало: 11 за час / 25 за сутки

1.

2.

3.

4.

5.

6.

7.

8.

9.

10.

11.

12.

13.

14.

15.

16.

17.

18.

19.

20.

21.

22.

23.

24.

25.

26.

作者  | 2013-7-23 13:15:02 | 阅读(296) |评论(0) | 阅读全文>>

【转载】Lady Boutique №5 2013 贵夫人 (3)

2013-7-23 13:07:58 阅读226 评论1 232013/07 July23

作者  | 2013-7-23 13:07:58 | 阅读(226) |评论(1) | 阅读全文>>

【转载】Lady Boutique №5 2013 贵夫人 (2)

2013-7-23 13:04:30 阅读239 评论0 232013/07 July23

作者  | 2013-7-23 13:04:30 | 阅读(239) |评论(0) | 阅读全文>>

【转载】Lady Boutique №5 2013 贵夫人 (1)

2013-7-23 13:04:11 阅读226 评论0 232013/07 July23

作者  | 2013-7-23 13:04:11 | 阅读(226) |评论(0) | 阅读全文>>

【转载】2011年07月11日

2013-7-23 12:56:24 阅读297 评论0 232013/07 July23

嘻嘻....终于完工的果绿色叶子包包

这个包带(双股)可以手提,(单股)可以跨肩。

这个是包包的图解,我稍微改动了一下....

作者  | 2013-7-23 12:56:24 | 阅读(297) |评论(0) | 阅读全文>>

【转载】2013年07月10日

2013-7-23 12:47:54 阅读180 评论0 232013/07 July23

作者  | 2013-7-23 12:47:54 | 阅读(180) |评论(0) | 阅读全文>>

【转载】阿瑛手工坊系列---花形钩织

2013-7-23 12:32:00 阅读174 评论0 232013/07 July23

作者  | 2013-7-23 12:32:00 | 阅读(174) |评论(0) | 阅读全文>>

【转载】斜肩收法数字说明

2013-7-23 12:17:17 阅读172 评论1 232013/07 July23

4、2-2-1的含义

以前看花样书,老看到类似的数字,很难懂哦,看朱杨氏的说明吧

http://bbs.bianzhirensheng.com/thread-259532-1-1.html

以2-2-1为例讲解吧:

  1.这是收针(即减针)或加针的意思。

大多数是表达的收针。

如是加针作者会在边上写上“加”字。

  2.从前向后看:每2行减2针减1次

  3给大家画了个图解:

4(1)可以算出减掉了几行:

第一位的数字2乘以第三位数字1==2*1=2行

(2)可以算出减掉了几针:

第二位的数字2乘以第三位数字1==2*1=2针

  5再举一例子:3-5-7

就是每3行减5针减7次

算出减掉了几行:3*7=21行

算出减掉了几针:5*7=35针

(五)肩膀。

1、肩膀留针通用方法:肩膀留针的宽度约是毛衣宽度(B)的20%(20%-22%不等,视不同的款式而定)

2、我的肩膀留针实例:左右肩膀各留144*20%=30针。

3、斜肩通用收法:

1先将(左、右肩针数-6)÷3针/次 = 各肩收针的次数(其中6针为:边3针+ 预留将并收的3针),然后再将收针次数×2行 = 收肩完成的总行数(收1次,来回共2行。每次收针都在正面,反面不收针,)。

作者  | 2013-7-23 12:17:17 | 阅读(172) |评论(1) | 阅读全文>>

【转载】灰色也温暖——诺宝贝的围巾

2013-7-23 11:40:13 阅读192 评论0 232013/07 July23

  补记:看到这篇日志被某人转载并做了删减。心情真的很糟糕。文字并不华丽,作品也不精致。但作品及文字真真切切代表着我对孩子的一份爱和牵挂,对青春期孩子教育的无奈,代表着一个母亲最原始最坦荡最炙热的心。我不想这分温度被改变。转载的姐妹,请不要任意改变别人的这份心意和心情!

眼看着气温骤降,诺每天早晨不到六点出家门,晚上九点下晚自习,两头都是一天中最冷的时候,每天冻得通红的小脸、露着细长的脖子,当妈的很是心疼。多少次说要给他织条围巾,人家一口回绝,坚决不围!小坏蛋,你可以不围,但是为娘我不能不给你准备!

  诺不是个娇气的孩子,穿衣不是特别讲究,只要能穿就行。唯独对毛织品,有一点点扎都不行。于是决定给他用羊绒。都都说,小屁孩,用羊绒太奢侈了;小妹说,就你的儿子娇气是福娃,别人的孩子都是抗zao牌的?唉,可怜天下父母心!只要他肯围,只要他不马大哈的给弄丢了,就奢侈一回吧。

  每次开工前选款都很苦恼。在淘宝上下载了一堆大牌围巾的图片想效仿。仿了驴牌——LV的方块,已经织了一段,越织越没信心,那些大牌太过于成熟和稳重,不是15岁的孩子能驾驭得了的;带穗头的不行,调皮蛋毛毛愣愣的,会把穗头夹棉袄拉链里。电子书翻了不少,论坛也没少逛,最终看中了这款。不同形状的麻花增加了围巾的动感,正好适合青春期好动的小子。

  26支羊绒4股,中灰,用量不详。当初是打算织好缩绒的,用了4mm的针。织好后有人说缩绒伤线,于是改变初衷,用洗发水洗了,稍显的松,如果用3.75mm的针应该正好。起头55针,羊绒没弹性,起头可以少起几针,织麻花时再加针。最大的收获是学会了用缝针弹性收针的方法。最不愿藏线头,拍照时把线头掖在下面。

作者  | 2013-7-23 11:40:13 | 阅读(192) |评论(0) | 阅读全文>>

查看所有日志>>

 
 
 
 
 
 
 
 
模块内容加载中...
 
 
 
 
 
 
 
模块内容加载中...
 
 
 
 
 
 
 
 
 
 
 
网易云音乐 曲目表歌词秀
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
圈子列表加载中...
 
 
 
 
 
 
 
模块内容加载中...
 
 
 
 
 
 
 
列表加载中...
 
 
 
 
 
 
 
博友列表加载中...
 
 
 
 
 
 我要留言
 
 
 
留言列表加载中...
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017

注册 登录  
 加关注