public class form1
dim total as integer
private sub combobox1_selectedindexchanged(byval sender as byval e as handles
select case
case is = "服裝"
"幸福羊毛衫")
"幸福男褲")
"公尺奇t恤")
"真維斯襯衫")
case is = "鞋"
"紅蜻蜓女鞋")
"星期六女鞋")
"蘋果男鞋")
"袋鼠男鞋")
"幸福童鞋")
case is = "箱包"
"鱷魚皮包")
"polo女包")
"公尺奇休閒包")
case is = "化妝品"
"小**大禮包")
"歐萊雅保濕霜")
"蘭蔻眼霜")
case else
"睡得香雙人被")
"幸福4件套")
"舒服服按摩枕")
end select
end sub
private sub listbox1_selectedindexchanged(byval sender as object, byval e as handles
== "1"
= "30%"
select case
case is = "幸福羊毛衫"
= "400"
"幸福羊毛衫 1 400 30% 120 ")
total = total + 120
case is = "幸福男褲"
= "350"
"幸福男褲 1 350 30105")
total = total + 105
case is = "公尺奇t恤"
= "200"
"公尺奇t恤 1 200 3060")
total = total + 60
case is = "真維斯襯衫"
= "180"
"真維斯襯衫 1 180 3054")
total = total + 54
case is = "紅蜻蜓女鞋"
= "500"
"紅蜻蜓女鞋 1 50030% 150")
total = total + 150
case is = "星期六女鞋"
= "600"
"星期六女鞋 1 60030% 180")
total = total + 180
case is = "蘋果男鞋"
= "550"
"蘋果男鞋 1 55030% 165")
total = total + 165
case is = "袋鼠男鞋"
= "400"
"袋鼠男鞋 1 40030120")
total = total + 120
case is = "鱷魚皮包"
= "260"
"幸福童鞋 1 26030% 78")
total = total + 78
case is = "polo女包"
= "500"
"polo女包 1 50030150")
total = total + 150
case is = "公尺奇休閒包"
= "300"
"公尺奇休閒包 1 3003090")
total = total + 90
case is = "小**大禮包"
= "100"
"小**大禮包 1 1003030")
total = total + 30
case is = "歐萊雅保濕霜"
= "300"
"歐萊雅保濕霜 1 3003090")
total = total + 90
case is = "蘭蔻眼霜"
= "350 "
"蘭蔻眼霜 1 35030105")
total = total + 105
case is = "睡得香雙人被"
購物車廣告介紹
廣告已經成為企業競爭 產品銷售 提公升企業形象的乙個重要手段。而現在廣告形式眾多，何種廣告形式才是最有效的？企業往往無從選擇。如何選擇乙個合適的 作為企業和產品宣傳的陣地無疑成為企業面臨的乙個重要問題。現在超市購物車廣告可以說是廣告界的一種新的至高點，誰把握住了這個商機誰就佔的先機，就能把握市場。一...
購物車廣告策劃案
超市手推車 廣告策劃案 廣告已經成為企業競爭 產品銷售 提公升企業形象的乙個重要手段。而現在廣告形式眾多，何種廣告形式才是最有效的？企業往往無從選擇。如何選擇乙個的 作為企業和產品宣傳的媒介，無疑成為企業面臨的乙個重要問題。一 購物車 介紹 購物車廣告最大的突破就是真正實現了產品和消費者之間的零距離...
會員購物購物車的實現實訓指導
目錄一 準備工作 3 1.在d盤建立乙個資料夾 3 2.收集素材檔案，並把其放在image 3 3.建立資料庫檔案 4 4.各資料表檔案的作用及結構 4 二 包含購物車的商品展示網頁的實現 6 1.建立 檔案 6 2.建立檔案 7 三 購物車的實現 9 1.建立檔案 9 四 付款生產訂購單 23 1...