2013年5月7日 星期二

毛利與毛利率 計算


毛利=售價-成本
毛利率=(總售價-總成本)/總售價

進貨1粒西瓜成本:10元
銷售1粒西瓜金額:15元

毛利 :
15-10 = 5 元

毛利率: 共賣出 1000 粒
(15*1000)-(10*1000)=5000
5000/15000=0.33

工商時報

工商時報

2013年5月5日 星期日

mscorlib.tlb framework 登錄路徑問題

當在安裝 ms-sql 2008 r2 時,常常會因會遇到 mscorlib.tlb 註冊登錄路徑版本的問題
而造成無法安裝




這種問題須修改 mscorlib.tlb 的版本
regedit
找到 mscorlib.tlb 的版本後,修正 xx 版本到 v2.0.50727






2013年5月2日 星期四

backcolor system control vb.net

參考引用
--
當  backcolor 要採用系統預設的顏色
使用方法:
textbox1.BackColor = System.Drawing.SystemColors.HighlightText

vb.net listview 選取

參考引用
--
在表單上放一個按鈕及一個ListView,以下程式是產生各個項目
及選取反白第三筆:
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
     With ListView1
     .Focus()
     .Columns.Add("欄位1", 50, HorizontalAlignment.Left)
     .Columns.Add("欄位2", 150, HorizontalAlignment.Left)
     .Columns.Add("欄位3", 150, HorizontalAlignment.Left)
     .Items.Add("第一筆")
     .Items.Add("第二筆")
     .Items.Add("第三筆")
     .Items(0).SubItems.Add("第一筆欄位2")
     .Items(0).SubItems.Add("第一筆欄位3")
     .Items(1).SubItems.Add("第二筆欄位2")
     .Items(1).SubItems.Add("第二筆欄位3")
     .Items(2).SubItems.Add("第三筆欄位2")
     .Items(2).SubItems.Add("第三筆欄位3")
     .Items(2).Selected = True
     End With
    End Sub

--
若是分開,  ListView1 已先 item add 
則可寫固定要取第一筆
ListView1.Focus()
ListView1.item(0).Selected = True