2009年4月25日星期六

很高興認識大家

我又多了許了外國朋友

歡迎外國朋友學BLOG

BANKHOE : 您好 ( 越南)
APA KABAR :您好 ( 印尼)
MI GA LABAR :您好 ( 緬甸)

妹咕好一些了

一週了 妹咕生病真的一週了

今天是假日 天氣一然冷冷
她的咳受次數變少了
真是令人高興
但是還是讓人担憂
不過她毛到大家的回應留言
真是開心
再此謝謝大家

2009年4月24日星期五

第二天 妹咕會偷哭 - 請大家留言祝福

昨天阿咪唸妹咕
妹咕就偷哭
我看了真是心.....
所以我就唸自己
陪妹咕算一算時間太少
請大家要給妹咕回應喔
今天我會請妹咕上本BLOG
讓她了解許多大哥哥和大姐姐 有來此BLOG回應
祝福她
阿爸先回應
妹咕加油

網路問卷 - 可以申請

新網路問卷
http://www.my3q.com/misc/register/register.phtml

2009年4月23日星期四

EXCEL -VBA 自動加總

這是解決學生要自動加總的VBA程式

Sub 自動加總()
Dim r1, r2, c1, c2, s
s = 0
r1 = ActiveCell.Row
c1 = ActiveCell.Column
  While (ActiveCell(r1, c1).Value <> Empty)

       While (ActiveCell(r1, c1).Value <> Empty)
   
              s = s + ActiveCell(r1, c1).Value
              r1 = r1 + 1
       Wend
 ActiveCell(r1, c1).Value = s
 r1 = ActiveCell.Row
 c1 = c1 + 1
 s = 0
 
 
 Wend
 
 r1 = ActiveCell.Row
c1 = ActiveCell.Column
 
 
  While (ActiveCell(r1, c1).Value <> Empty)

       While (ActiveCell(r1, c1).Value <> Empty)
   
              s = s + ActiveCell(r1, c1).Value
             c1 = c1 + 1
       Wend
 ActiveCell(r1, c1).Value = s
 c1 = ActiveCell.Row
 r1 = r1 + 1
 s = 0
 
 
 Wend
 
 
 
 
End Sub

妹咕真的氣人 - 生病

晚間下課約10:30到家

妹咕說 : 阿爸我不行了
我和阿咪(內人)一同快速送往新店急診
因為妹咕笑吼
這個會因天氣驟變而發作 , 這已是我BLOG
常見的文章了
只是昨天她一直到早上7:00才穩定回家休息
我今天一天都沒啥休息 , 又去上課了
課堂中學生們給了許多祝福
謝謝大家

2009年4月21日星期二

讓BLOG有聲有色

最近玩blog發現自己又進步了
因學生的提問讓自己又向前一步
以下是可以去提升自己log的音樂喔
大家有blog的朋友可以試喔
http://popo516.myweb.hinet.net/lost_heart/b/musicplayer/mini.htm

但是要先將音樂檔案上傳喔
以下是不用上傳音樂的做法
要先申請會員 步驟簡單
http://www.kkbox.com.tw/manual3/mybox/bgm.html

2009年4月19日星期日

思考

大家都會思考 , 但是不是每一位思考都有結論
而且結論要可行也不是每一位朋友都可以執行
妹咕 近日問我一個問題
阿爸 您可以不要這麼忙嗎
思考
..............
真是陷入思考

大家有空也要思考喔

休息是為了走更長的路

上一週忙翻了 , 今天休息一下

才發現 自己好累喔
今天醒來已是上午8:30分
昨天記得好像是2:30分
真是本週休息最久的一次了
妹咕一然咕咕哨
真是快一個月了
氣人
希望大家要健康喔

 
妹咕數位學園歡迎網友們來信指教 妹咕信箱