日本行的前一晚 和C老大的共進晚餐

晚上8點時分,公司附近的麥當勞,
沒想到這麼一談就到了10點,
工作上,C老大談了蠻多的,
不管是在主管方面,B老大和A老大在專案的處理方式;
同事方面,W先生在上個專案遇到的問題,顧著幫RITA,程式及進度都出問題,
及這個專案中他的成長,SA、PM、PG間的改變.

至於私事上,我說的還是有關VIVI,
“上班開門後的第一件事,妳猜是什麼?是看VIVI在不在位置上,這樣是不是很蠢”
“為什麼中午吃飯時,老VIVI在的時候問我為什麼悶悶不樂”
“我知道,我和VIVI真的不適合”
…………….

討厭的人

她,又來了,就在知道我會參加同學婚禮,而且會和她男友(以下稱A男)同桌之後,
MSN,MAIL都來了,
寫的事,不外乎是要請我和A男合好,
說法呢?不外乎之前的那套,聽都聽煩了,
“要放下才會過的好”
並要求我“下次見面能放下身段嗎?”

“很自私,真的是很自私的想法”我這樣認為

問我什麼是誠意?而且她沒有想要騷擾我的意思!!
“誠意,很簡單,就是要道歉請本人來”
“最沒誠意的就是代A男道歉,但或許A男跟本就沒這個意思…”

談到後來,她說“你並不是沒有錯”
對,我是有錯,但我認為沒有道歉的必要,
“妳只單純的想為因自己造成我和A男吵架的事贖罪而已”
“各有各的立場,而且我沒必要配合妳”

到最後,她叫我不要跟A男說這件事,更証明了這只是她單方面的想法,
“我根本沒有和A男說話的意願”
這點不必我再多說了,不會因為僅隔了幾個月而有所改變

不幹了

這句話不是我說的,雖然我老是把這句話掛在嘴上,
“一年,我只待到一年”
但最近放出此話的是VIVI,說她受不了SALSE的風氣了,
要離職,也找好工作了,但就是捨不得公司的一些人,
問我的意見如何?
這…你又不是捨不得我??問我幹什麼!!
我很制式的回答:「如果下個工作有相關的話,最好待滿一年啦!!」
不帶感情的這樣回答.(鬼才相信)

Property的寫法

ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.VisualStudio.v80.cht/dv_vbalr/html/3155edaf-8ebd-45c6-9cef-11d5d2dc8d38.htm

Class Class1
	'Define a local variable to store the property value.
	Private propertyValue As String
	'Define the property.
	Public Property prop1() As String
		Get
		'The Get property procedure is called when the value
		'of a property is retrieved.
		Return propertyValue
		End Get
		Set(ByVal value As String)
		'The Set property procedure is called when the value
		'of a property is modified. The value to be assigned
		'is passed in the argument to Set.
		propertyValue = value
		End Set
	End Property
End Class

Structure的寫法

ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.VisualStudio.v80.cht/dv_vbalr/html/9bd1deea-2a89-4cdc-812c-6dcbb947c391.htm

Public Structure employee
    'Public members, accessible from throughout declaration region.
    Public firstName As String
    Public middleName As String
    Public lastName As String
    'Friend members, accessible from anywhere within the same assembly.
    Friend employeeNumber As Integer
    Friend workPhone As Long
    'Private members, accessible only from within the structure itself.
    Private homePhone As Long
    Private level As Integer
    Private salary As Double
    Private bonus As Double
    'Procedure member, which can access structure’s private members.
    Friend Sub calculateBonus(ByVal rate As Single)
        bonus = salary * CDbl(rate)
    End Sub
    'Property member to return employee’s eligibility.
    Friend ReadOnly Property eligible() As Boolean
        Get
            Return level >= 25
        End Get
    End Property
    'Event member, raised when business phone number has changed.
    Public Event changedWorkPhone(ByVal newPhone As Long)
End Structure