致癌空窗期 [2009-05-21](IR90)

致癌空窗期 [2009-05-21](IR90)

2009-05-21
短文的標題：
致癌空窗期

思緒或靈感的來源：
「報紙在 2009-05-21 以頭版的方式報導，[蕭萬長副總統] 因為得了肺腺癌，所以在 [台北_榮總] 動手術，切除肺臟左下方之部位。 沒有吸煙、沒有抽香菸，也沒有喝酒，又經常運動，也十分重視養生，為什麼會得癌症？」

短文的內容：
[致癌空窗期]

[GSH/GSSG 的比值] 暫時性地失去平衡，因為缺乏 [L-Cystetne (半胱胺酸)] 這種，在製造 [穀胱甘肽 (Glutathione)] 的過程中，最具關鍵性的胺基酸，所以細胞來不及製造出 GSH (還原型的 穀胱甘肽 (Glutathione))，也因此細胞在情急之下只好把 GSSG 排出細胞之外，也就無法再把 GSSG 回收並且轉換成 GSH 了。

DNA 的直徑 大約是 2 nm ( 2 奈米 )。
穀胱甘肽 (Glutathione) 的大小 大約是 2.6 nm ( 2.6 奈米 )。
[L-Cystetne (半胱胺酸)] 的大小 大約是 1.2 nm ( 1.2 奈米 )。

平常被保護在 [細胞核] 內之[染色體] 中的 [DNA]，必須在多次遭受到 [多重性的攻擊 (multiple hits)] 之後，才有可能從 [正常穩定的狀態] 而被 [自由基] 竄改成為 (而突變成) [會致癌的狀態]。 [DNA] 從 [正常穩定的狀態] 因為突變，而被更改成為是 [會致癌的狀態]，這段敘述，就幾乎等同於是說，你得了癌症了！

結論：
人不可以過勞，不管你是多麼地年輕。 一旦細胞內部的 redox defense system 失去了平衡，甚至於被瓦解了，而使得細胞，相對於 過量之自由基的攻擊，呈現出 [致癌空窗期] 的狀態，這樣就會使 細胞和 DNA 處於十分危險的狀態。 這也就是為什麼，長期重複性短暫過勞 (例如 長期工作壓力過大的人)，或者是短期過勞 (例如 跑 長程馬拉松 的選手) 的人容易發生突發性的健康風險。

湯偉晉 (WeiJin Tang) 親手原創性地寫作於 西元 2009-05-21

湯偉晉 先生
WeiJin Tang
電子郵件
WeiJin.Tang@gmail.com
行動電話
0958-227-243
中華民國_台北市_天母_臥龍崗

「喜樂的心是一帖良藥」
聖經中的箴言

「助人為快樂之本」
青年守則

「我的恩典夠你用」
聖經中的箴言

「神賜給我們的乃是剛強、仁愛、謹守的心。」
聖經中的箴言

「真正的愛可以遮掩一切的過錯」
湯偉晉 曾經在 基督教 的書籍中看到過，而記下來的一句話。

[多層次及多方位的思維模式] 是 [湯偉晉先生] 所使用的思維模式。

教育從來就不是中立的 [2009-05-10](IR90)

教育從來就不是中立的 [2009-05-10](IR90)

教育從來就不是中立的；它不是讓人得以自由，就是讓人在不知不覺之中成為奴隸，卻不自知。

湯偉晉 (WeiJin Tang) 寫於 西元 2009-05-10

Inspired by a western educator, (I'm not sure what exactly his name is)


2009-05-26

File Index: 0001
Original file name (原始的檔案名稱):
TextOnImage_教育從來就不是中立的_[2009-05-10](IR90)_[2009-05-26].gif
GUID file name:
FN_CC939798FE154D4D85A473C35EE92F4E.gif

Keywords:
TextOnImage_教育從來就不是中立的_[2009-05-10](IR90)_[2009-05-26].gif

Number of attached files: 
1

 

WA_2009-0426 [2009-05-17-PM-01-13-38].zip

May 24, 2009; 09:41:10 a.m. Taipei Time

 

WA_2009-0426 [2009-05-17-PM-01-13-38].zip

WeiJin Tang (湯偉晉) at 台北市立圖書館_天母分館 [2009-05-18]; Try to learn something new everyday is an important habit.

May 20, 2009; 12:47:02 m.m. Taipei Time

Try to learn something new everyday is an important habit.

湯偉晉 (WeiJin Tang) 親手寫於 2009-05-20
WeiJin Tang (湯偉晉) at 台北市立圖書館_天母分館 [2009-05-18]

偉大的國家都會不斷地研發和運用高品質的軟體人類來教育她的人民 [2009-05-19]

 

May 17, 2009; 11:07:49 a.m. Taipei Time

 

偉大的國家都會不斷地研發和運用高品質的軟體人類來教育她的人民

 

湯偉晉 (WeiJin Tang) 親手寫於 2009-05-17

 

2009-05-19

File Index: 0001
Original file name (原始的檔案名稱):
TextOnImage_偉大的國家都會不斷地研發和運用高品質的軟體人類來教育她的人民_[2009-05-19].gif
GUID file name:
FN_FA00F7F35B4C4A4CA38A47C363A6C648.gif

Keywords:
偉大的國家都會不斷地研發和運用高品質的軟體人類來教育她的人民

Number of attached files: 
1

 

The Secret of Life and Death - a Scientific Approach (生老病死的秘密 - 從科學的觀點切入) [2009-05-06]

The Secret of Life and Death - a Scientific Approach  (生老病死的秘密 - 從科學的觀點切入) [2009-05-06]

The Secret of Life and Death - a Scientific Approach
生老病死的秘密 - 從科學的觀點切入

Title of the presentation WeiJin Tang (湯偉晉) presented to the 5070退休樂活論壇 at Taipei on May 6, 2009

Email template: Thanks for answering questions in the class! [2009-05-17]

Email template: Thanks for answering questions in the class! [2009-05-17]

 

 

May 17, 2009; 10:17:45 a.m. Taipei Time

 

Dear NameOfStudent‏:

 

Thanks for answering questions in the class!

 

Have a nice day!

 

Best regards,

 

WeiJin Tang (湯偉晉)

Instructor of the programming class, spring 2009

 

She can quickly answer the question I gave in the class.

 

Keywords:

Email template: Thanks for answering questions in the class! Student,

 

Do_DownloadFileFromInternet_2009_05_10_AM_10_50_19

' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' '  [2009_05_10_AM_11_05_56]  ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
    Private Sub Do_DownloadFileFromInternet_2009_05_10_AM_10_50_19()
        ' (本段程式之目的) Purpose:
        '     Demo how to download an internet file
        '                "中華民國國旗歌 (Performed by 復興中學合唱團).mp3"
        '     Using My.Computer.Network.DownloadFile()
        '
        ' (本段程式是否已經在被使用中) In use: Yes
        ' (程式撰寫的進度) Developing: 100% (Mandatory)
        ' (程式堪用的程度) Workable: 80% (Threshold at 80%)
        ' (程式的測試程度) Code tested: 0% (max 99%)
        ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
        ' (修改程式的日期) Revision Date: (2009 05 10 AM 10 45 11)
        ' (修改程式的人員) Revised by: WeiJin Tang (湯偉晉)
        '
        '     Version 1.00.02; Last Updated on [2009-05-10-AM-11-03-12]
        '
        ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

        Dim URL As String
        URL = "http://tools.wj.googlepages.com/Anthem_of_the_Flag_of_Republic_of_Ch.mp3"

        Dim FP As String
        FP = "D:\WeiJin Tang\"

        Dim FNOfDestinationFile As String
        FNOfDestinationFile = "中華民國國旗歌 (Performed by 復興中學合唱團).mp3"

        Dim FPFNOfDestinationFile As String
        ' FPFNOfDestinationFile = FP & FNOfDestinationFile
        FPFNOfDestinationFile = IO.Path.Combine(FP, FNOfDestinationFile)

        Try
            My.Computer.Network.DownloadFile(URL, FPFNOfDestinationFile)

            Me.RichTextBox1.Text = "Finish downloading file at " & vbCr & URL

        Catch ex As Exception
            Me.RichTextBox1.Text = "Downloading of file " & vbCr & URL & vbCr & "Failed for the following reason:" & vbCr & ex.Message
        End Try

    End Sub ' Do_DownloadFileFromInternet_2009_05_10_AM_10_50_19
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' '  [2009_05_10_AM_11_05_56]  ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '

Demo how to download an internet file using My.Computer.Network.DownloadFile() [2009-05-10-AM-10-47-13]

' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' '  [2009_05_10_AM_10_47_37]  ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
    Private Sub Do_DownloadFileFromInternet_2009_05_10_AM_10_44_11()
        ' (本段程式之目的) Purpose:
        '     Demo how to download an internet file using My.Computer.Network.DownloadFile()
        ' (本段程式是否已經在被使用中) In use: Yes
        ' (程式撰寫的進度) Developing: 100% (Mandatory)
        ' (程式堪用的程度) Workable: 80% (Threshold at 80%)
        ' (程式的測試程度) Code tested: 0% (max 99%)
        ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
        ' (修改程式的日期) Revision Date: (2009 05 10 AM 10 45 11)
        ' (修改程式的人員) Revised by: WeiJin Tang (湯偉晉)
        '
        '     Version 1.00.01; Last Updated on [2009-05-10-AM-10-45-55]
        '
        ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

        Dim URL As String
        URL = "http://11349240132027612376-a-g.googlegroups.com/web/Influenza+A+(H1N1)+Virus+Infection%2C+(swine+flu)+%5B2009-05-03%5D.mp3?hl=zh-TW&gda=QKdgWYMAAACniCMh1GzGPFMZzlWvIfDkjoGsmCZkafwQHbhJchlVCOieO0jE1BXEF-K6DwAW_D-U9vvZQjgU499OHIw-VegFJATjfGhGVklTHIIb03qlv8heNQyNXJDkhqXNTTYLcq0BcQpLqP8F8uRyN0FpiZImbcVT3VtYGKLco-_l-8AzjYnI_iG0FUcyafVtIn3AwlU"

        Dim FP As String
        FP = "D:\WeiJin Tang\"

        Dim FNOfDestinationFile As String
        FNOfDestinationFile = "Influenza A (H1N1) Virus Infection, (swine flu) [2009-05-03].mp3"

        Dim FPFNOfDestinationFile As String
        FPFNOfDestinationFile = FP & FNOfDestinationFile

        FPFNOfDestinationFile = "D:\WeiJin Tang\Influenza A (H1N1) Virus Infection, (swine flu) [2009-05-03].mp3"

        My.Computer.Network.DownloadFile(URL, FPFNOfDestinationFile)

    End Sub ' Do_DownloadFileFromInternet_2009_05_10_AM_10_44_11

' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' '  [2009_05_10_AM_10_47_37]  ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '

WA_2009-0426 [2009-05-03-AM-11-51-03].zip

May 3, 2009; 11:58:10 a.m. Taipei Time

 

WA_2009-0426 [2009-05-03-AM-11-51-03].zip

 

LocalTools_Y2009M05D03 ; Version 1.00.01; Last Updated on [2009-05-03-AM-10-54-58]

' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' '  [2009_05_03_AM_11_45_30]  ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
'
'  Public Module LocalTools_Y2009M05D03
'
'  Version 1.00.01; Last Updated on [2009-05-03-AM-10-54-58]
'

Public Module LocalTools_Y2009M05D03

    Public Function GetStandardDateStampWithWeekdayIndex_Y2009M05D03(Optional ByVal AnyDate As Date = Nothing) As String
        ' (本段程式之目的) Purpose:
        '     Return a StandardDateStampWithWeekdayIndex like
        '
        '        2009-05-03-WD7
        '
        '     where 1 is the WeekdayIndex of Monday
        '     where 2 is the WeekdayIndex of Tuesday
        '     where 3 is the WeekdayIndex of Wednesday
        '     where 4 is the WeekdayIndex of Thursday
        '     where 5 is the WeekdayIndex of Friday
        '     where 6 is the WeekdayIndex of Saturday
        '     where 7 is the WeekdayIndex of Sunday
        '
        '        2009-05-03-WD7
        '        2009-05-04-WD1
        '        2009-05-05-WD2
        '        2009-05-06-WD3
        '        2009-05-07-WD4
        '        2009-05-08-WD5
        '        2009-05-09-WD6
        '        2009-05-10-WD7
        '        2009-05-11-WD1
        '        2009-05-12-WD2
        '        2009-05-13-WD3
        '        2009-05-14-WD4
        '        2009-05-15-WD5
        '        2009-05-16-WD6
        '        2009-05-17-WD7
        '
        ' (本段程式是否已經在被使用中) In use: Yes
        ' (程式撰寫的進度) Developing: 100% (Mandatory)
        ' (程式堪用的程度) Workable: 80% (Threshold at 80%)
        ' (程式的測試程度) Code tested: 70% (max 99%)
        ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
        ' (修改程式的日期) Revision Date: (2009 05 03 AM 10 44 38)
        ' (修改程式的人員) Revised by: WeiJin Tang (湯偉晉)
        '     OK
        ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

        Dim D As Date

        If AnyDate = Nothing Then
            D = DateTime.Today
        Else
            D = AnyDate
        End If

        Dim myTextWith4DigitsYearIndex As String
        myTextWith4DigitsYearIndex = D.Year.ToString.PadLeft(4, "0")

        Dim myTextWith2DigitsMonthIndex As String
        myTextWith2DigitsMonthIndex = D.Month.ToString.PadLeft(2, "0")

        Dim myTextWith2DigitsDayIndex As String
        myTextWith2DigitsDayIndex = D.Day.ToString.PadLeft(2, "0")

        Dim myTextWith1DigitWeekDayIndex As String

        ' myTextWith1DigitWeekDayIndex = D.DayOfWeek

        '
        ' GetStandardDayOfWeekIndexUsedByWeiJinTang_Y2009M05D03
        ' is a supporting function used by this function.
        '
        myTextWith1DigitWeekDayIndex = GetStandardDayOfWeekIndexUsedByWeiJinTang_Y2009M05D03(D)

        Dim SB As New System.Text.StringBuilder

        With SB
            .Append(myTextWith4DigitsYearIndex)
            .Append("-")
            .Append(myTextWith2DigitsMonthIndex)
            .Append("-")
            .Append(myTextWith2DigitsDayIndex)
            .Append("-WD")
            .Append(myTextWith1DigitWeekDayIndex)
        End With

        Dim myDateStamp As String

        myDateStamp = SB.ToString

        Return myDateStamp

    End Function ' GetStandardDateStampWithWeekdayIndex_Y2009M05D03

    Public Function GetStandardDayOfWeekIndexUsedByWeiJinTang_Y2009M05D03(ByVal AnyDate As Date) As Integer
        ' (本段程式之目的) Purpose:
        '     Return a StandardWeekdayIndex used by WeiJin Tang
        '
        '     where 1 is the WeekdayIndex of Monday
        '     where 2 is the WeekdayIndex of Tuesday
        '     where 3 is the WeekdayIndex of Wednesday
        '     where 4 is the WeekdayIndex of Thursday
        '     where 5 is the WeekdayIndex of Friday
        '     where 6 is the WeekdayIndex of Saturday
        '     where 7 is the WeekdayIndex of Sunday
        '
        ' (本段程式是否已經在被使用中) In use: Yes
        ' (程式撰寫的進度) Developing: 100% (Mandatory)
        ' (程式堪用的程度) Workable: 80% (Threshold at 80%)
        ' (程式的測試程度) Code tested: 70% (max 99%)
        ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
        ' (修改程式的日期) Revision Date: (2009 05 03 AM 11 30 09)
        ' (修改程式的人員) Revised by: WeiJin Tang (湯偉晉)
        '     OK
        ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

        Dim D As Date
        D = AnyDate

        Dim myDayOfWeekIndex As Integer
        myDayOfWeekIndex = D.DayOfWeek

        If myDayOfWeekIndex = 0 Then
            ' Here, we define the index of Sunday as 7 instead of 0
            Return 7
        Else
            Return myDayOfWeekIndex
        End If
    End Function ' GetStandardDayOfWeekIndexUsedByWeiJinTang_Y2009M05D03

End Module ' LocalTools_Y2009M05D03

' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' '  [2009_05_03_AM_11_45_30]  ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '
' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' '

Output of your code should look exactly like the following text [2009-05-03]

// - - Begin memo item - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - //

(Memo Item created on May 3, 2009 09:54 AM)

- - - Begin title or keyword:

Output of your code should look exactly like the following text

- - - End title or keyword:

 

Figure [2009-04-26] A001 of B01.png

Figure [2009-04-26] A002 of B02.png

Figure [2009-04-26] A003 of B03.png

Figure [2009-04-26] A004 of B04.png

Figure [2009-04-26] A005 of B05.png

Figure [2009-04-26] A006 of B06.png

Figure [2009-04-26] A007 of B07.png

Figure [2009-04-26] A008 of B08.png

Figure [2009-04-26] A009 of B09.png

Figure [2009-04-26] A010 of B01.png

 

// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - End memo item - - //

 

WA_2009-0426 [2009-04-26-MM-12-41-01].zip

WA_2009-0426 [2009-04-26-MM-12-41-01].zip