2022年7月8日 星期五

13-《禪隱者、電腦通識、茅塞頓開》


     弟弟一生無憂,未經饑寒交迫,為人對下語出尖酸刻薄,年紀大了,這玩意已不好玩,改為欣賞和出手助人,這個殺傷力更大,死得更慘,年紀又再大了些,看著人們掉下深淵,又看著人們從深淵死裡逃生,人們遇難經歷,弟弟年紀又再大了些,終於有一天茅塞頓開,不再嬉戲,佛祖生在心間,判若兩人,走出另一條人生道路。

【茅塞頓開】
釋義:
被茅草阻塞的山路,豁然開通了。比喻閉塞的心思,頓時豁然了悟。語本《孟子.盡心下》。
典源:
《孟子.盡心下》孟子謂高子1>曰:「山徑之蹊間,介然2>用之而成路;為間3>不用,則茅塞4>之矣。今茅塞子之心矣。」 〔注解〕 (1) 高子:戰國時齊人,生卒年不詳,嘗學於孟子。 (2) 介然:堅固貌,有專一的意思。 (3) 為間:隔些時候。 (4) 茅塞:茅草塞住山徑。
典故說明:
「茅塞」是指山徑少人走,叢生的茅草塞住了山徑,語出《孟子.盡心下》。在這章中,孟子認為一個人如果為學不能專心有恆,那就會像山間的小路一樣,常常走動,就會變成一條大路。但如果隔一些時間沒有人走,茅草就會阻塞山路。意思是說,聖人之道,要學而時習,不可捨而不修,否則就像茅草塞路一樣。勉勵高子要恆心向學,德業才可精進。「茅塞子之心」是指高子的心已經被茅草塞住了,後來「茅塞」一語就用來比喻「閉塞的心思」,也可以指的是疑惑。「頓開」的意思就是「豁然了悟」的意思。往往是因為受了指點,突然間想通了。所以「茅塞頓開」一語就可以用來比喻閉塞的心思,頓時豁然了悟。

請下載:13-《禪隱者、電腦通識、茅塞頓開、矢量插圖、示範軟件》
https://drive.google.com/file/d/1d0SY67VERxt4pB-Ndw9X30Lx1dw2z-GL/view?usp=sharing

創作日期:‎星期五 ‎2022年‎七月‎8日    下午 04:24:29


2022年7月7日 星期四

《禪隱者、神馬浮雲》


【浮雲】

漂浮不定方向,處身不能自主,型態因風向做成各式不同,氣流冷熱引致時陞時降,遇熱成雨掉下煙消雲散,處身虛無飄渺間,【老子】道可道,非常道。《三十六計》第二十七計【假癡不癲】曰:「寧偽作不知不為,不偽作假妄為。靜不露機,雲雷頓也。」其大意是情願裝作糊塗而無所作為,也不自作聰明而輕舉妄動。這是為了沈穩地保住機密,不露聲色地籌劃計謀,就像冬天的雷電蓄而不發一樣(一發轟天)。寧可裝作不知道而行動,不可假裝知道而妄動,在沈靜中不顯山漏水,不露機巧。〝木秀於林,風必摧之〞,在為人處世中做到大智若愚,韜光隱晦。自己外表可以與自己的內心不一樣,要善於以假亂真,讓別人放松警惕。這就是說不可急於表現自己,而要善於以〝龍蛇曲伸〞之道隱藏自己。

【神馬】

今人們說:「詐假意」。古文原是【浸假而】,莊子愚言故事中:『以神為馬』。

《莊子‧大宗師》原文

『子祀、子輿、子犁、子來四人相與語曰:〝孰能以無為首,以生為脊,以死為尻;孰知死生存亡之一體者,吾與之友矣!〞四人相視而笑,莫逆於心,遂相與為友。俄而子輿有病,子祀往問之。曰:〝偉哉,夫造物者將以予為此拘拘也。〞曲僂發背,上有五管,頤隱于齊,肩高於頂,句贅指天,陰陽之氣有沴,其心閑而無事,胼囗‘足鮮’而鑒於井,曰:〝嗟乎!夫造物者又將以予為此拘拘也。〞

子祀曰:〝女惡之乎?〞曰:〝亡,予何惡!浸假而化予之左臂以為雞,予因以求時夜;浸假而化予之右臂以為彈,予因以求鴞炙;浸假而化予之尻以為輪,以神為馬,予因以乘之,豈更駕哉!且夫得者,時也;失者,順也。安時而處順,哀樂不能入也,此古之所謂縣解也,而不能自解者,物有結之。且夫物不勝天久矣,吾又何惡焉!〞 』

譯文:

【子祀、子輿、子犁、子來四人因參透不死之道而成爲莫逆之交,並認爲只要有人能凝神澄慮,形隨意轉的超然變化,便可以像他們一般,領略到什麼是形神不滅的永恆境界了。

子輿後來有病,子祀去探病,看見子輿駝背縮頭,身體呈嚴重變形扭曲狀,便問子輿是否嫌棄現在的身體?             

子輿答道:『不,我怎會討厭自己的身體呢!?憑意念,我可以「詐假意」當我的左臂是雞,那末我便可以計算夜裡的時間;憑意念,我又可以「詐假意」當我的右臂是彈子丸,我因而可以把天上的貓頭鷹打下烤來吃;憑意念,我還可以「詐假意」當我的精神是駿馬,我的下半身變成一輛馬車,如此我便可以坐著它任意馳騁,而不必勞神費力駕馭呢!形體因偶然而存在,亦會因偶然而消逝。能夠看透形體上的存滅本是自然現象,便不會因形體上的生死而遭受情緒的羈絆,這便是所謂的擺脫執著的痛苦了。人要是不能放下形體的執著,便永不能解脫形體牽絆的痛苦。既然天下沒有永恆存在的形體,我又何必計較這個短暫的形體上的缺憾呢!』】

《禪隱者、【神馬浮雲】》

叔叔孤獨如神馬,匆匆漂渺似浮雲。

喃喃談笑語靈人,依依惜別此耆人。

我孤僻一生無親友!活得快樂不覺孤單,市集買來古印章,就是我二千多年前朋友來探望我,它叫我猜印章刻的四國戰國時期先秦古字,這老家火可吊起我神經系統,有兩個古字不留至今,另兩個古字是篆體「合真」,第一個古字可曾見過,証實是先秦個「養」字,即「養X合真」?弄了幾個午夜凌晨!才找到一個似鬼畫符的學者,有這個先秦古字,是個「身」字!

何謂真人?古之真人,不逆寡,不雄成,不謨士。若然者,過而弗 悔,當而不自得也。若然者,登高不栗,入水不濡,入火不熱,是知 之能登假於道者也若此。

古之真人,其寢不夢,其覺無憂,其食不甘,其息深深。真人之息 以踵,眾人之息以喉。屈服者,其嗌言若哇。其耆欲深者,其天機淺 。

古之真人,不知說生,不知惡死。其出不欣,其入不距。翛然而往, 翛然而來而已矣。不忘其所始,不求其所終。受而喜之,忘而復之。 

是之謂不以心捐道,不以人助天,是之謂真人。若然者,其心志,其 容寂,其顙頯。悽然似秋,暖然似春,喜怒通四時,與物有宜而莫知 

其極。故聖人之用兵也,亡國而不失人心。利澤施乎萬世,不為愛人。 故樂通物,非聖人也;有親,非仁也;天時,非賢也;利害不通,非 

君子也;行名失己,非士也;亡身不真,非役人也。若狐不偕、務光、 伯夷、叔齊、箕子、胥余、紀他、申徒狄,是役人之役,適人之適, 而不自適其適者也。

古之真人,其狀義而不朋,若不足而不承;與乎其觚而不堅也,張 乎其虛而不華也;邴邴乎其似喜也,崔崔乎其不得已也,滀乎進我色 

也,與乎止我德也,廣乎其似世也,〔□〕(上〝敖〞下〝言〞)乎其未 可制也,連乎其似好閉也,悗乎忘其言也。以刑為體,以禮為翼,以 

知為時,以德為循。以刑為體者,綽乎其殺也;以禮為翼者,所以行 於世也;以知為時者,不得已於事也;以德為循者,言其與有足者至 

於丘也,而人真以為勤行者也。故其好之也一,其弗好之也一。其一 也一,其不一也一。其一與天為徒,其不一與人為徒,天與人不相勝 也,是之謂真人。

譯文:

真人是什麼樣的人呢?

古代的真人,不欺微賤不凌寡,待人平等;不求鼎盛不稱雄,貌似無能;不謀事業不做官,消極退隱。這樣的奇人,得失不繫心,錯了不悔恨,對了不歡欣,好好歹歹隨緣分。這樣的異人,危立崖畔,泰然不驚,兼有特異功能,下水水不濕腳,入火火不燒身。如此和諧靜止的內心,如此超越常態的本領,皆因為真知識合大道,靈魂飛入玄境。

古代的真人,一枕黑甜不做夢,心底乾淨;醒來舒暢微笑,不懂什麼人日之計在於晨;山蔬野果隨便吃,不貪肥美,不愛葷腥;呼吸深深深到肺,深到下體,深到腳跟。因為嗜欲很淺,所以呼吸系統超越常人,很深。常人七情六慾很深,所以呼吸系統很淺,淺到氣管淺到喉,淺到聲門。常人有那些屈背彎腰服勞役的呼吸更淺,哮喘有聲,說話氣緊如蛙嗚,發短促的喉音。

古代的真人,不知道生活有什麼可愛,不知道死亡有什麼可憎;生從虛無來,不必慶幸;死回虛無去,不必抗爭;飄然來,飄然去,來去本無心;早晨從哪裡起程,記憶分明,天黑到哪裡投宿,勿須打聽;領來肉身,樂於收下自然的禮品;失去軀殼,等於退給原物的主人。總之,不以智力抵抗規律,不以人力贊助天命,他是真人。這樣的真人,忘了社會,忘了個人,忘了自己的一顆心;額顙寬闊,容貌寂靜;有春之溫暖,有夏之盛情,有秋之淒清,有冬之猛狠,並非有意變臉色,只是自然而然的調整,同季節相對應;給人人以方便,誰也猜不透他的底蘊。

古代的真人,身材峨峨高,挺直不傾,四肢纖纖瘦,無力扛鼎;固守自我,寬容他人,不被視為頑梗;敞開胸襟,一片空白,不要裝飾花紋;掛著微笑看眾生,無所謂喜不喜,順著自然辦事情,無所謂勤不勤;和顏悅色,人說我可親;好心善意,人說我可敬;嚴詞厲聲,似乎很驕橫;傲骨豪情,禮法不能禁;躲噪避塵,似乎愛關門;悟道忘言,萬事不留心。

真人是這樣的人,顯然與眾人大不一樣。

真人有所愛,眾人有所愛。真人與眾人都有所愛,這是一樣的。真人有所不愛,眾人有所不愛。真人與眾人都有所不愛,這是一樣的。真人與眾人都有所愛,都有所不愛,這是一樣的,可見真人與眾人是一樣的。真人所愛所不愛,眾人所愛所不愛,在內容上是不一樣的,可見真人與眾人是不一樣的。但是,真人看來,一樣的與不一樣的,終歸是一回事。

你認同於自然,相信所有偽人都是自然之子,天生平等,都有權愛什麼不愛什麼,你就會看見所有的人,包括真人和眾人在內,是一樣的。

你認同於社會,相信所有的人都是社會之子,各有利益所在,各有不一樣的追求,你就會看見所有的人,包括真人和眾人在內,是不一樣的。

真人看來,認同於自然,認同於社會,都是有道理的,可以合二而一,不必對立起來。所謂天人合一,就是認同自然與認同社會的合一,就是天作天為與人作人為的合一。

解開市集買來古印章之迷團,「養身合真」。

鄧紫棋 G.E.M. 秘密新作 - "馬仔歌"!!!

https://www.youtube.com/watch?v=l0AapxHURbA

影音介紹:「柴九哥有飯吃無工錢」

https://www.bilibili.com/video/BV1ht4y1z7qK/

《【鬼叫你窮】、【張武孝】》

https://www.youtube.com/watch?v=-KcOzoztGMk

免費 WMF 強大繪圖軟件下載介紹:

InkscapePortable_1.2.zip    332.6 MB

MEGA 下載點

https://mega.nz/file/47ZWmBTb#gNtRGD3AfqbiED1cGMBXBcb_v_vuTPFDPeUgx6SKaXo

小創客動手畫    教學網站

http://www.nkps.tp.edu.tw/computer/inkscape/inkscape123/h512_ch1.html

請下載:12-《禪隱者、電腦通識、神馬浮雲、矢量插圖》
https://drive.google.com/file/d/1_3eA1xDu6ubFyoRskZPcj1qk2aJrE0BN/view?usp=sharing


創作日期:2014年

‎重載:星期四 ‎2021年‎一月‎14日    午夜 12:57:57

今加入插圖:‎星期四 ‎2022年‎七月‎7日    下午 06:35:39


 

2021年11月3日 星期三

《【禪隱者】、【VB.Net(滴滴仔)轉(慢行)時鐘】》


 告訴您們:
Visual Basic 執行運作:Times
「Tick 滴」是一秒鐘設定,所以下面下載程式是每秒跳動一次。
Visual Basic 執行運作:【滴滴仔】、【時鐘】
create analog clock in vb.net
https://visualstudiocodes.blogspot.com/2019/11/create-analog-clock-in-vbnet.html


以下示範則以百萬分之一秒計算,所以慢秒行走。
Visual Basic 執行運作:【慢行】、【時鐘】
微軟公司示範軟件,【Creating a Analog Clock】
https://social.msdn.microsoft.com/Forums/vstudio/en-US/a9d14692-0637-4961-9adc-b74a97583186/creating-a-analog-clock?forum=vbgeneral


要找個美麗或英俊補習老師嗎?小心上網,要帶眼識人。
老生常談,勤有功,嬉戲無益。


‎星期三 ‎2021年‎十一月‎3日    下午 03:13:51



2021年10月27日 星期三

《【禪隱者】、【Visual Basic 2010 通識】》

 


Visual Studio 2010 Ultimate Free Download

https://onesoftwares.net/visual-studio-2010-ultimate-free-download/


101 VB.NET Samples download

https://101-vb-net-samples.software.informer.com/download/



Vb.net 程式語法:
  
Vb.net的資料形態:
變數
(1)        變數的宣告:  變數的宣告為暫時儲存資料的空間供程式使用
=> 變數必須以字母或為開頭
  => 變數僅為字母數字及底線字
  =>  不可visual basic 使用關鍵字
    => 不可在同一範圍中有相同的變數名稱
(2)        變數的宣告:
=> asp.net 中變數必須宣告才可使用  (asp 可不用宣告)
語法:
  Dim 變數名稱[,變數名稱…..] as 資料型態〔=初值 〕
=>(asp 只有一種資料型態故以  dim變數名稱)
例:
 Dim i
Dim I as integer
 Dim I,j as integer
 Dim I as integer=1,j as integer=12
Dim I,j as integer
 
(3)        vb.net 不區分大小寫
(4)        vb.net 注解 以 單引號 ’   開始
(5)        vb.net 宣告變數時可設定初值
(6)        vb.net宣告變數時未設定初值 若為物件初值為empty若為外部整數為0
若為外部整數為為empty
 
  Option 宣告:
1.      共有三種 option 宣告  
a)      明確宣告: 要求所有的變數使用之前必須宣告
b)  嚴格宣告: 要求所有的變數的宣告必須宣告資料型態
c) 比較宣告: 作字串比較時選用binary 或是text比較
    2. 所有的option 宣告必須在其它敘述及 imports之前
    3. option explicit,  option strict ,option text
    4. option explicit / on|off ,option strict /on|off, option compare / binary|text
    5. option 宣告不可使用於單一檔案中
 
範例:  (code behide) 
Option Explicit On
Option Strict On
Option Compare Text
Imports System
Partial Class _Default
    Inherits System.Web.UI.Page
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
       Dim x as integer
    End Sub
End Class
 
資料型態:  1. 基本資料型態=>數值與非數值     2. 組合資料型態: 陣列,結構,類別, 例舉常數
基本資料型態:  數值:  1. 整數 2. 浮點數 3. 字串 4. 其它
資料型態: .net 型別 說明
Byte(整) System.byte 1 byte(0~255)
sbyte System.sbyte 1 byte(-128~127)
short System.int16 2-byte(-32768~32767
ushort System.uint16 2-byte(0~32767)
Integer System.int32 4-byte
Uinteger System.uint32 4-byte
Long System.int64 8-byte
Ulong System.uint64 8=byte
Single(浮點有號) System.single 4-byte
Double System.double 8-byte
Decimal System.decimal 16-byte
Date System.datetime 8-byte(1/1/1~9999/12/31)#...#
Boolean System.boolean 2-byte(true|false)
Object System.object 4-byte(可為類別或是介面)
String System.string “ ”  , 可放至2的31次方
Char System.char “”c, unicode字元2-byte
 
#  資料型態的預設初始化的值:
    String = nothing
    數值=0
    Boolean=false
     Date=1/1/1 0:0:0
    Object= nothing
#   不指定的資料型態的變數為object(執行效果差)#整數執行效果比較好,decimal 精確度教高
#強制型別的轉換
#自動型別的轉換
 
 
範例:
 
   Dim y As Byte = 12
        Dim y1 As SByte = 110
        Dim x As Integer
        Dim x1 As ULong
        Dim x2 As UShort
        Dim x3 As Single = 1.0E+23
        Dim x4 As Double = 1
        Dim x5 As Double = 1.23
        Dim x6 As Decimal = 12
        Dim x7 As Date = #1/2/0003#
        Dim x8 As String = "ccck"
        Dim x9 As Char = "a"c
        Dim x10 As Boolean = False
        Dim x11 As Object
       Dim xx As Integer = CInt(1.23)
        Dim xx1 As Integer = 1
        Dim xx2 As String = 1 & "xx2"
 
 
Vb.net 的特殊符號
:
1.            冒號 : => 合併敘述,將兩行敘述合併為一行
2.            單引號 ‘  => 注解
3.            雙引號 “ => 字串符號
4.             &     =>字串連接符號
5.            _  =>行接序符號
6.            點運算子 .  => 物件與屬性從屬符號
7.            算數運算子= >  +, - , * , / ,\ ,mod , ^
8.            算術指定運算子 =>  +=,  -=,  *=,  /= ,  \=
9.            比較運算子=> >, <, >= ,<= ,= , <>
 
 
陣列: 
1.      為一相同資料型態所組成的組合資料
2.      可將此組合資料形成多維
3.      asp.net中宣告陣列可設定初值
4.      asp.net中宣告陣列其元素索引值從0 開始至  陣列末值
5.      asp.net 的宣告陣列亦可以以物件的方式宣告
 
 
陣列宣告的格式:
 
一維陣列:
(1)  dim 陣列名稱() as 資料型態 = {初值列,…..}
    Dim陣列名稱(陣列索引末值) as 資料型態
    dim 陣列名稱() as 資料型態 =new資料型態( ){初值列,…..}
     dim 陣列名稱() as 資料型態 =new資料型態(陣列索引末值){初值列,…..}
 
二維陣列:
(1)  dim 陣列名稱(,) as 資料型態 = {{初值列},{….}.}
    Dim陣列名稱(列索引末值, 行索引末值) as 資料型態
    dim 陣列名稱() as 資料型態 =new資料型態( ){{初值列} , {…..},..}
     dim 陣列名稱() as 資料型態 =new資料型態(列索引末值, 行索引末值){{初值列},{….},.}
 
 
三維陣列:
(1)  dim 陣列名稱() as 資料型態 = {{{初值列},{….},{...}}}
    Dim陣列名稱(深度索引末值, 列索引末值, 行索引末值) as 資料型態
    dim 陣列名稱() as 資料型態 =new資料型態( ) {{{初值列},{….},{...}}}
     dim 陣列名稱() as 資料型態 =new資料型態(深度索引末值, 列索引末值, 行索引末值) {{{初值列},{….},{...}}}
 
範例
 
        Dim arr(2) As Integer
        Dim arr1() As Integer = {1, 2, 3}
        Dim arr2(1, 2) As Integer
        Dim arr3(,) As Integer = {{1}, {2}}
        Dim arr4(1, 2, 3) As Integer
        Dim arr5(,) As Integer = {{1, 2}, {3, 4}}
        Dim arr6(,,) As Integer = {{{1}, {2}}, {{3}, {4}}}
        Dim arr7() As Integer = New Integer() {1, 2, 3}
Dim arr77() as integer=new integer(2){1,2,3}
        Dim arr8(,) As Integer = New Integer(,) {{1, 2}, {3, 4}}
        Dim arr9(,,) As Integer = New Integer(,,) {{{1}, {2}}, {{3}, {4}}}
      
 
集合物件:
1.    物件組合形成集合物件
2.    vb中可使用 arraylist 的類別建立一集合物件
3.    建立一集合物件
Dim 物件變數 as new arraylist
4.    集合物件常用的方法及屬性 add,clear,remove,insert,count,item,sort
5.    一般可用for each迴圈處理
 
範例
 
Dim custlist As New ArrayList
        custlist.Add(1)
        custlist.Add(1.23)
        custlist.Add("a")
        Response.Write(custlist(0))
        Response.Write(custlist(1))
        Response.Write(custlist.Item(2).ToString)
 
 
        Dim i As Integer
        For i = 0 To custlist.Count - 1
            Response.Write(custlist(i))
 
        Next
        Dim ele As Object
        For Each ele In custlist
            Response.Write(ele.ToString)
        Next
 
 
陣列及集合物件
1.   陣列亦為一集合物件亦可使用集合物件方式處理
2.   陣列除了使用回圈處理亦可使用for each 的結構
 
範例
 
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim arr() As Integer = {1, 2, 3}
        For Each ele As Integer In arr
            Response.Write(ele)
        Next
        Dim arr2(,) As Integer = New Integer(1, 1) {{1, 2}, {3, 4}}
        For Each ele As Integer In arr2
            Response.Write(ele)
        Next
 
    End Sub
 
 
 
組合資料型態(不同的資料型態):
 
     結構 structure:
a) 一般為靜態的資料組合,建立一結構變數
        b)  資料成員預設為一public 存取層級
        c)   資料成員宣告與一般變數宣告一樣
        d)   存取結構的成員資料使用點運算子
        e)    結構可形成巢狀結構
 
     結構宣告:
=>
 
     Structure  結構名稱
  資料成員1
  資料成員2
  Dim 變數名稱 as 資料型態
   ….
End  structure
 
結構變數的宣告:
=>
Dim 結構變數名稱 as [new] 結構資料型態
 
 
範例1:
Structure man
        Dim age As Integer
        Dim weight As Integer
        Dim height As Integer
        Dim name As String
    End Structure
 
    Protected Sub page_load(ByVal sender As Object, ByVal e As System.EventArgs) Handles mybase.load
        Dim redman As man
        redman.age = 1 : redman.weight = 2 : redman.height = 3 : redman.name = "chiang"
        Response.Write(redman.age & redman.weight & redman.height & redman.name)
  End Sub
 
範例1:
structure person
        Dim blueman As man
    End Structure
  ……
Dim blueperson As person
        blueperson.blueman.show(1)
        Response.Write(blueperson.blueman.age)
    ………
 
  類別(class): 物件的模板,亦為一資料組合型態其類別成員除為靜態的資料組合外亦包括方法
a) 成員一般為靜態的資料物件的方法,建立一物件實體才可參照成員
        b)  資料成員預設為一private 存取層級
        c)   靜態資料成員宣告與一般變數宣告一樣 ,方法為一sub 或是function程序
        d)   存取物件的成員使用點運算子
        e)   類別可形成巢狀結構或複合結構
 
    
 
類別宣告:
=>
 
     class 結構名稱
  資料成員1
  資料成員2
  Dim 變數名稱 as 資料型態
  Public sub 方法名稱(arglist….)
  …
   End sub
   ….
End  class
 
範例
Class man
        Public age As Integer
        Public weight As Integer
        Public height As Integer
        Public name As String
        Public Sub show(ByVal x As Integer)
            age = age + 212100
        End Sub
    End Class
    class person
        Dim blueman As new man
End class
 
 
物件實體的建立與成員的引用:
=>
Dim 結構變數名稱 as  new 結構資料型態
=web form. 無法使用動態新增控制項物件及web form
=> 因web form 是由html描述邏輯程式的物件類別由.net frame compile
=> 書出結果會在檔案的最前面
=>    dim obj as new system.web.ui.button
       Me.controls.add(obj)
       Dim obj1 as new system.web.ui.page
       Obj1.show( 不支援)
 
範例
 
Protected Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        Dim redman As New man
        redman.age = 1 : redman.weight = 2 : redman.height = 3 : redman.name = "chiang"
 
        redman.show(12)
        Response.Write(redman.age & redman.weight & redman.height & redman.name)
 
        Dim blueperson As New person
        blueperson.blueman.show(1)
        Response.Write(blueperson.blueman.age)
           End Sub
 
 
 
Vb.net事件回應程式:(page_load,page_init)
1.         asp.net的事件回應程序必須為一sub 程序
2.         可作為asp.net的sub 程序必須至少包含兩個以上參數
3.         事件程序的呼叫( invoke)可利用handles
4.         事件回應程式名稱可自訂
5.      page_load事件於單檔案編輯中可可不用使用事件屬性
 
web form 的常用的page(網頁)事件
1. page_load
2. page_preload
3. page_loadcomplete
4. page_init
5. page_preinti
6. page_initcomplete
#執行順序 page_preinit=>page_init=>page_initcomplete=>page_preload=>page_load=>page_loadcomplete
#一般網頁少使用網頁結束事件
 
 
Web_form的常用的form(網頁)事件
1.      form1_init
2.      form1_load
#執行順序 form_init會在 page的事件之前 form_load 會在 page的事件之後
 
 
範例:
1.
    Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
        Response.Write("pinit")
    End Sub
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Response.Write("pload")
    End Sub
 
    Protected Sub form1_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles form1.Init
        Response.Write("finit")
    End Sub
 
    Protected Sub form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles form1.Load
        Response.Write("fload")
    End Sub
End Class
 
#  form1_init=>     page_init =>  form1_load  =>page_load
 
 
Vb.net 的顯式程式輸出,
ð       Response.write(輸出字串)
ð       於asp.net中一般使用 literal 代替 response.write
ð       輸出字串置放於最client網頁的最前端 (asp.net程式碼會最先執行)
 
Web form 回貼的動作  及 ispostback 屬性

範例位址介紹:
C:\Program Files (x86)\Microsoft Visual Studio 10.0\Samples\1033\VBSamples.zip


‎星期四 ‎2021年‎十月‎28日    上午 01:28:01


2021年10月21日 星期四

《禪隱者、【如何成功在視窗下載檔案】》


 1 .按視窗右下角四方型那個圖標。

2 .選取「所有設定」圖標。
3 .選取「更新與安全性」。
4 .選取左邊「indows 安全性」。
5 .選取「病毒與威脅防護」。
6 .選取「管理設定」。
7 .把「即時保護」關閉。


Mega 50GB 雲端免費服務。
https://mega.nz/
成功注冊之後以下是上下載快取。
https://mega.io/sync


《禪隱者、【黑洞數 ※ 6174】、檔案下載》
https://mega.nz/file/i44w3QSI#PsAlTtJKwNlAGWCamIJydw4p_c03ZM8o5q0hWV41vo4
《【禪隱者】、【Aspect_Ratio_縱橫比示範軟件】檔案下載》
(Aspect Ratio 縱橫比) That given Y to calculate X
https://mega.nz/file/LxAlWAYZ#-u1srA1i00NojY-nTeyQKM30zM6mmsuWcJHYTgMbucc

‎星期四 ‎2021年‎十月‎21日    下午 06:54:23


2021年10月19日 星期二

《【禪隱者】、【Aspect ratio 縱橫比】》


 【寬高比】(英語:Aspect ratio,也稱為【縱橫比】)是幾何形狀在不同尺寸的比值。 舉個例子,當矩形方向為橫向時的寬高比值,是其長邊與短邊的比率。 都是表示相同寬高比的方式。

視頻縱橫比為Square Pixele(1.0),致於螢幕縱橫比為4:3,這類源視頻素材尺寸為1280:800或1920:1080,HDTV


有關「黃金比例」,許多人都拿來亂用一通,動不動就說他的產品是根據「黃金比例」設計的,其實只要有一點了解的人都知道,真正的黃金比例又稱黃金分割,是一種數學上的比例關係。黃金分割具有嚴格的比例性、藝術性、和諧性,蘊藏著豐富的美學價值。應用時一般取0.618或1.618 ,其奇妙之處,在於其比例與其倒數是一樣的。例如:1.618的倒數是0.618,而1.618:1與1:0.618是一樣的。
數學家法布蘭斯在13世紀寫了一本書,關於一些奇異數字的組合。這些奇異數字的組合是1、1、2、3、5、8、13、21、34、55、89、144、233┅┅任何一個數字都是前面兩數字的總和2=1+1、3=2+1、5=3+2、8=5+3┅┅,如此類推。有人說這些數字是他從研究金字塔所得出。金字塔和上列奇異數字息息相關。金字塔的幾何形狀有五個面,八個邊,總數為十三個層面。由任何一邊看入去,都可以看到三個層面。金字塔的長度為5813寸(5-8-13),而高底和底面百分比率是 0.618,那即是上述神秘數字的任何兩個連續的比率,譬如 55/89 =0.618,89/144=0.618,144/233=0.618。另外,一個金字塔五角塔的任何一邊長度都等於這個五角型對角線(Diagonal)的0.618。還有,底部四個邊的總數是 36524.22 吋,這個數字等於一年天數的一百倍!這組數字十分有趣。0.618 的倒數是 1.618。譬如144/89=1.618、233/144=1.618,而 0.618×1.618 就約等於1。另外有人研究過向日葵,發現向日葵花有89個花辮,55個朝一方,34個朝向另一方。這組數字就叫做神秘數字。而 0.618,1.618 就叫做黃金分割線(Golden Section)。


《【禪隱者】、【Aspect_Ratio_縱橫比示範軟件】檔案下載》
(Aspect Ratio 縱橫比) That given Y to calculate X
https://mega.nz/file/LxAlWAYZ#-u1srA1i00NojY-nTeyQKM30zM6mmsuWcJHYTgMbucc

《【禪隱者】、【網際網路文章介紹】》
如何計算比率
https://zh.wikihow.com/%E8%AE%A1%E7%AE%97%E6%AF%94%E7%8E%87

《【禪隱者】、【影音介紹】》
how to cut a pentagon with paper/ cu't Pentágono papel/如何用纸剪五边形
https://www.youtube.com/watch?v=u02PGRffHUg&t=24s


Aspect ratio
https://www.bilibili.com/video/BV1HL411n7Ey
比例式
https://www.youtube.com/watch?v=75jh9AZFDVo


https://www.youtube.com/watch?v=egVydoZ-YQ8

‎星期二 ‎2021年‎十月‎19日    下午 09:47:49



2021年10月11日 星期一

《禪隱者、【黑洞數答案】》


黑洞數 6174<>4716 ?

答案:「9999 與 1111 之間的【等比中項】」。

別再像學生時代般睏,關燈休息吧!否則世界末日!


 

《【禪隱者】、【影音介紹】》

《End of the world》《世界末日》

https://www.youtube.com/watch?v=oY3vhA5d8iU

‎星期一 ‎2021年‎十月‎11日    下午 08:34:23


2021年10月9日 星期六

《禪隱者、【黑洞數 ※ 6174】》


 一、 甚麼是黑洞數?

黑洞數又稱陷阱數,是類具有奇特轉換特性的整數。 任何一個數字不全相
同整數,經有限〝重排求差〞操作,總是會得某一個或一些數,這些數即為黑洞
數。"重排求差"操作即組成該數得排後的最大數去重排的最小數。
1955 年,卡普耶卡(D.R.Kaprekar)研究了對四位數的一種變換:任給出四位數
k0,用它的四個數字由大到小重新排列成一個四位數m,再減去它的反序數 rev(m),
得出數 k1=m-rev(m),然後,繼續對 k1 重複上述變換,得數k2.如此進行下去,卡普耶
卡發現,無論 k0 是多大的四位數,只要四個數位不全相同,最多進行 7 次上述變換,就會出現四位數 6174.
二、 黑洞數的証明
隨便造一個四位數,如a=1628,先把組成部分1628的四個數字由大到小排列
得到 b=8621,再把 1628 的四個數字由小到大排列得 c=1268,用大的減去小的 
B-C=8621-1268=7353,把 7353 按上面的方法再作一遍,由大到小排列得 7533,
由小到大排列得 3357,相減 7533-3367=4176
把 4176 再重複一遍:7641-1467=6174。
如果再繼續操作下去,神奇的事情就發生了!7641-1467=6174,又回到 6174。
這是偶然的嗎?我們再隨便舉一個數 1331,按上面的方法連續去做:
3311-1133=2178, 8721-1278=7443, 7443-3447=3996, 9963-3699=6264
6624-2466=4158, 8541-1458=7083, 8730 – 378 = 8352, 8532-2358= 6174


我已經十年沒有使用 vb.net 了,弄得一頭煙霧水才完成!
‎2021‎年‎10‎月‎10‎日凌晨 2:50:25


《禪隱者、【黑洞數 ※ 6174】、檔案下載》






2017年4月12日 星期三

《快樂和尚家僧、【電腦病毒維修期間】》



《【TCP】、【IP】 的全稱是》
【 Transmission Control Protocol 】、【 Internet Protocol】


TCP/IP 的起源歷史


早期的電腦﹐並非如我們日常生活中見到的個人 PC 那樣細小﹔它們大都是以一個集中的中央運算系統﹐用一定的線路與終端系統(輸入輸出設備)連接起來。這樣的一個連接系統﹐就是網路的最初出現形式。各個網路都使用自己的一套規則協定﹐可以說是相互獨立的。
在 1969 年﹐為美蘇冷戰期間﹐美國政府機構試圖發展出一套機制﹐用來連接各個離散的網路系統﹐以應付戰爭危機的需求。這個計劃﹐就是由美國國防部委託 Advanced Research Project Agency 發展的 ARPANET 網路系統﹐研究當部份電腦網路遭到工具而癱瘓後﹐是否能夠透過其他未癱瘓的線路來傳送資料。


ARPANET 的構想和原理﹐除了研發出一套可靠的資料通訊技術外﹐還同時要兼顧跨平臺作業。後來﹐ARPANET 的實驗非常成功﹐從而奠定了今日的網際網路模式﹐它包括了一組電腦通訊細節的網路標準﹐以及一組用來連接網路和選擇網路交通路徑的協定﹐就是大名鼎鼎的 TCP/IP 網際網路協定。 時至 1983 年﹐美國國防部下令用於連接長距離的網路的電話都必須適應 TCP/IP﹐同時 Defense Communication Agency (DCA) 將 ARPANET (Advanced Research Projects Agency Net)分成兩個獨立的網路﹕一個用於研究用途﹐依然叫做 ARPANET﹔另一個用於軍事通訊﹐則稱為 MILNET (Military Network)。
ARPA 後來發展出一個便宜版本﹐以鼓勵大學和研究人員來採用它的協定﹐其時正適逢大部份大學電腦學係的 UNIX 系統需要連接它們的區域網路。由於 UNIX 系統上面研究出來的許多抽象概念與 TCP/IP 的特性有非常高度的吻合﹐再加上設計上的公開性﹐而導致其它組織也紛紛使用 TCP/IP 協定。從 1985 年開始﹐TCP/IP 網路迅速擴展至美國﹑歐洲好幾百個大學﹑政府機構﹑研究實驗室。它的發展大大超過了人們的預期﹐而且每年以超過 15% 的速度成長﹐到了 1994 年﹐使用 TCP/IP 協定的電腦已經超過三百萬台之多。及後數年﹐由於 Internet 的爆炸性成長﹐TCP/IP 協定已經成為無人不知﹑無人不用的電腦網路協定了。


DNS 的來由


如果您為您的機器設定過 internet 連線﹐那麼您一定接觸過 DNS 了﹐但 DNS 又是什麼東東呢﹖說穿了﹐DNS 是用來幫助記憶網路位址的﹐完全是為了遷就人類的記憶思維而設的。

DNS 的全稱是 Domain Name System(或 Service) ﹐當您連上一個網址﹐在URL打上﹕www.google.com 的時候﹐可以說就是使用了 DNS 的服務了。但如果您知道這個 www.google.com 的 IP 位址﹐直接輸入 216.239.53.101 也同樣可以到達這個網址。其實﹐電腦使用的只是 IP 位址而已(最終也是 0 和 1 啦)﹐這個 www.google.com 只是讓人們容易記憶而設的。因為我們人類﹐對一些比較有意義的文字記憶(如﹕www.google.com)﹐比記憶那些毫無頭緒的號碼(如﹕216.239.53.101)﹐往往容易得多。DNS 的作用就是為我們在文字和 IP 之間擔當了翻譯﹐而免除了強記號碼的痛苦。

假如您的電話有名字記憶功能﹐您只需知道對方的名字﹐就可以撥號給友人了﹐我們可以說﹐這電話也具備如 DNS 的功能了呢﹗但是﹐我們在網路中使用的 DNS 系統﹐就是這麼簡單嗎﹖非也﹐複雜得很呢﹗下面﹐就讓我們一起去探索一下 DNS 的奧秘﹕
在早期的 IP 網路世界裡面﹐每台電腦都只用 IP 位址來表示﹐不久人們就發現這樣很難記憶﹐於是﹐一些 UNIX 的管理者﹐就建立一個 HOSTS 對應表﹐將 IP 和主機名字對應起來﹐這樣﹐用戶只需輸入電腦名字﹐就可以代替 IP 來進行溝通了。如果你安裝了 Linux 系統﹐在 /etc 下面就可以找到這個 hosts 檔案﹔在 NT 的系統裡﹐你也可以在 \winnt\system32\drivers\etc 下面找到它。不過這個 HOSTS 檔是要由管理者手工維護的﹐最大的問題是無法適用於大型網路﹐而且更新也是件非常頭痛的事情。這就是 DNS 大派用場的時候了。


《【禪話溫馨輕私語】》


《【WIFI–密碼】》


在酒店吃飯,問老闆 WIFI 密碼,老闆說:「 L e P 8 2 N x o」
我說:「這好難記。」
老闆笑答:「來一瓶 8 2 年 XO,好記!」
我一邊念「來一瓶 8 2 年 XO」,一邊輸密碼,剛輸完,服務員問能打開了嗎?
我說:「能打開了」
只聽「嘭」 的一聲,服務員笑著說:「您的 8 2 年XO,三萬二千元,已替您打開了,謝謝!」
瞬間千萬頭草泥馬奔騰而過!「泥馬的也是喜歡丫丫烏鴉!」
這個故事告訴我們:
〔吃飯的時候就好好吃飯,沒事滑什麽手機〕


【走狗有五德】


別人都說你是朕的狗!?
  乾隆:「別人都說你是朕的狗,你怎麼看?」
  和珅笑道:「那臣可要多感謝他們的讚美了!」
  乾隆奇怪道:「怎麼說?」
        和珅道:「好叫陛下知曉!」
  狗有五德:「見主而搖尾,禮也;
        見賊而撲咬,勇也;
        見險而護主,忠也;
        獵物以報主,義也!
  嗅味而尋蹤,智也!
        說臣是陛下的狗,
  那可是無上的讚美!」
        乾隆大笑,更喜歡和珅了!

網際網路協定( IP )
http://www.pcnet.idv.tw/pcnet/network/network_ip_addr.htm

《快樂和尚家僧、【影音視訊介紹】》
電腦中毒曲
https://www.youtube.com/watch?v=dgKzWwdvb_U


《快樂和尚家僧、【同類笑話介紹】》
《【我月薪八百萬美元】》
http://cheerfulhomemonk-caricature.blogspot.hk/2016/05/blog-post_19.html
‎2016‎年‎05‎月‎19‎日    下午 09:14:47

本文上載於

‎星期三 ‎2017年‎四月‎12日    下午 06:38:27




2015年8月20日 星期四

Windows 10 Edge Toolbar is missing 工具列不見了?

Windows 10 已經在7月29日全球同步推出,Internet Explorer 11 退下且由Microsoft Edge取而代之,許多網友在問 :Windows 10 Edge Toolbar is missing 工具列不見了?原來在右上角 . . . 符號按下,


 下圖是舊板 Internet Explorer 11。

 
 

原來新板 Microsoft Edge 沒有另存新檔功能,舊板 Internet Explorer 11才有!倘若以後需要存新檔功能去把網頁原整保存檔案下來怎麼辦?Windows 10 在附屬應用程式下拉中,還有舊板 Internet Explorer 11可選用的。

 
 

‎2015‎年‎08‎月‎21‎日    上午 06:56:22

 電腦知識網介紹:

http://blog.xuite.net/cheerful_monk.1950hk/2

 【Visual Basic 編程語言】

Microsoft corporation Visual Studio suite of the Visual Basic Programming Language

Content: Stories and Tutorial

微軟公司的 Visual Studio 套件中的 Visual Basic 編程語言

内容:故事和教程

 ※增加 VirtualBox下載    ‎2015‎年‎08‎月‎21‎日    下午 02:19:59

 VirtualBox小資訊

⦁ 軟體名稱 : VirtualBox

⦁ 軟體版本 : 5.0.0-101573

⦁ 軟體語言 : 繁體中文、英文等

⦁ 官方網站 : https://www.virtualbox.org/

⦁ 支援系統 : Windows / Linux / Mac OS X

⦁ 免費下載 : https://www.virtualbox.org/wiki/Downloads

VirtualBox下載

 

 
 

VirtualBox安裝教學

▼ 執行剛剛下載的VirtualBox安裝程式,小編以Windows版做安裝示範。

 


 

有些教學網站可指導你如何製作 Windows 10 虛擬平台,如下網址:

http://blog.xuite.net/yh96301/blog/332723241-VirtualBox+5.0%E5%AE%89%E8%A3%9DWindows+10

 

 

但注意!且看下拉選項有 Windows 10 (32-bit) 和 Windows 10(64-bit) 兩種,倘若你當前平台是 x64 而下拉選項只有惟一全是 (32-bit) 的話,表示你這部電腦母板設定並未打開虛擬記憶體,請從新 Boot 機再按 Delete 鏈去設定 Virtualization ,先選 BIOS這項,如下圖:

 
 
 

再選 Virtualization 勾選 Enabled 這項,如下圖:

 
 

這才可以建立 x64 Windows 10 平台的。

有些教學網站可指導你如何製作在VirtualBox的「虛擬機器(Virtual Machine) 」安裝作業系統以後,如果主(Host)電腦和虛擬機器的客體(Guest)作業系統之間要共用資料,必須設定「共用資料夾」。要使用「共用資料夾」,必須在虛擬機器安裝「Guest Additions」,詳細的操作說明如下網址:

http://blog.xuite.net/yh96301/blog/30284353-VirtualBox+%E8%A8%AD%E5%AE%9A%E5%85%B1%E7%94%A8%E8%B3%87%E6%96%99%E5%A4%BE+

 

 

《快樂和尚家僧、【禪話溫馨輕私語】》

人生於世似夢景,光陰如箭不停留,昔日年輕今日老,瞬息之間換白頭。

 

《宋‧蘇東坡 、【蘇軾:和子由澠池懷舊】》

人生到處知何似,恰似飛鴻踏雪泥;

 泥上偶然留指爪,鴻飛那復計東西。

 老僧已死成新塔,壞壁無由見舊題;

 往日崎嶇還記否,路長人困蹇驢嘶。

 

一.題解要點: 

1出處:東坡全集

2體裁:七言律詩 

3釋題:和,音ㄏㄜˋ,和詩也,作詩術語,依照所和詩詞韻腳所屬的韻部,選擇同步韻字來作詩詞,稱之為「和」。 

4背景:1宋仁宗嘉祐元年(西元一零五六年)蘇洵帶領蘇軾、蘇轍至京應考,途中路過澠池縣寄宿奉閒和尚居室,並在壁上題詩。 

              2嘉祐六年蘇軾往赴鳳翔任官,途中再經澠池,獲弟蘇轍懷澠池寄子瞻兄詩,即和其詩韻寫了此詩。 

5主旨:本詩以懷舊為題材,抒寫人生無常的慨歎,並以昔日的坎坷艱難與弟共勉。 

6內容:前四句是議論,譬喻人生無常的慨歎;後四句是敘述,追憶往日艱難的情境。 

7文評:1本詩不作抽象的思辨與推理,而借生動的形象,表達對人生際遇的感受,這種手法正是宋代哲理詩的特色。 

2頷聯「泥上偶然留指爪,鴻飛那復計東西。」採「單行入律」,對仗未工整,然意境自然靈動,正是東坡詩的本色。 

8音韻:平起首句不入韻。韻腳:泥、西、題、嘶(平聲齊韻)。 

 

二.作者精要: 

1名籍:蘇軾,字子瞻,號東坡居士。北宋眉州眉山(今四川省眉山縣)人。

2生平:1稟性聰慧,由母親程氏親自授教。仁宗嘉祐二年,登進士第。

                2神宗熙寧四年,上書議論新法,與王安石不合,自請外放,歷遷各州。後貶至海南儋州(今海南島儋縣)。

                3出知杭州,建西湖長堤(世稱蘇堤,「蘇堤春曉」為西湖十景之一)。後卒於常州。

3學術:1思想恢弘,才氣縱橫,文筆雄深雅健。

                2其文汪洋宏肆,尤長於說理,策議論辯均所擅長,詩、詞、書、畫造詣亦高。

3蘇軾與父洵、弟轍並稱「三蘇」,亦同列名為「唐宋古文八大家」。

4著作:著有東坡全集、東坡樂府等書。

 

三.要句解析: 

1.要句:人生到處知何似?應似飛鴻踏雪泥。 

  語譯:人生所到之處像什麼呢?應該像是飛鴻踏在雪地上。 

句旨:謂人生無常,世事易泯。 

2.要句:泥上偶然留指爪,鴻飛那復計東西! 

  語譯:雪地上偶然留下指爪的痕跡,鴻雁飛走了,那裡還計較腳印留在何處呢? 

句旨:謂人生在世,漂泊不定。 

3.要句:老僧已死成新塔,壞壁無由見舊題。 

語譯:老和尚已經過世了,變成一座新建的葬骨塔,牆壁毀壞,再也看不見舊日壁上的題詩。 

句旨:謂奉閒和尚剛過世不久,而寺壁毀壞,往日題壁詩 

4.要句:往日崎嶇還記否?路長人困蹇驢嘶。 

語譯:你還記得當年坎坷艱辛的旅途嗎?路途遙遠、人已疲累,所乘的跛腳驢啼聲悲鳴。 

句旨:以往日赴京應考旅途艱困的情景與弟共勉。 

 

四、修辭重點: 

1.譬喻 

人生到處知何似?應似飛鴻踏雪泥。 

2.示現 

路長人困蹇驢嘶。 

3.頂針 

應似飛鴻踏雪「泥」。「泥」上偶然留指爪。 

4.對偶 

 (1)泥上偶然留指爪,鴻飛那復計東西! 

    (2)老僧已死成新塔,壞壁無由見舊題。 

 

五、形音義辨: 

1.雪泥鴻爪-雪地上偶然留下的指爪痕。後比喻人生境遇變化無常。 

2.無由-無法、無從。 

3.崎嶇-山路高低難行的樣子。此喻世路坎坷艱辛。 

4.蹇驢-跛足的驢子。蹇,音ㄐㄧㄢˇ。 

5.嘶-驢子悲鳴聲。

 

六、成語運用: 

1雪泥鴻爪:比喻往事遺留的痕跡,或以喻人生聚散無常,有如鴻雁留於雪上的爪印。

 

 

快樂和尚家僧、祝學習進步,工作順利,生活愉快。

‎2015‎年‎08‎月‎21‎日    下午 02:41:33