InStr函數實現代碼減肥
檢測字符串中是否包含一個元音字母：
1、普通的方法：
If UCase$(char) = "A" Or UCase$(char) = "E" Or UCase$(char) = "I" Or UCase$(char) = "O" Or UCase$(char) = "U" Then
’ it is a vowel
End If
2、更加簡練的方法：
InStr("AaEeIiOoUu", char)
同樣，通過單詞中沒有的字符作爲分界符，使用InStr來檢查變量的內容。下面的例子檢查Word中是否包含一個季節的名字： 1、普通的方法：
ILCase$(word) = "winter" Or LCase$(word) = "spring" Or LCase$(word) = _ "summer" Or LCase$(word) = "fall"
2、更加簡練的方法：
If Instr(";winter;spring;summer;fall;", ";" & word & ";") Then
’ it is a season’s name
End If
有時候，甚至可以使用InStr來替代Select
Case代碼段，但一定要注意參數中的字符數目。下面的例子中，轉換數字0到9的相應英文名稱爲阿拉伯數字： 1、普通的方法：
Select Case LCase$(word)
Case "zero"
result = 0
Case "one"
result = 1
Case "two"
result = 2
Case "three"
result = 3
Case "four"
result = 4
Case "five"
result = 5
Case "six"
result = 6
Case "seven"
result = 7
Case "eight"
result = 8
Case "nine"
result = 9
End Select
2、更加簡練的方法：
result = InStr(";zero;;one;;;two;;;three;four;;five;;six;;;seven;eight;nine;", ";" & LCase$(word) & ";") / 6
decode 函數的用法
decode(條件,值1,翻譯值1,值2,翻譯值2,...值n,翻譯值n,缺省值)
該函數的含義如下：
IF 條件=值1 THEN
RETURN(翻譯值1)
ELSIF 條件=值2 THEN
RETURN(翻譯值2)
......
ELSIF 條件=值n THEN
RETURN(翻譯值n)
ELSE
RETURN(缺省值)
END IF
1、比較大小
2、表、視圖結構轉化
多時候需要將行轉換成列或者將列轉換成行來顯示數據，而往往我們在建立表結構時不能根據顯示的要求來保存數據，於是乎只能在保存數據之後做一些必要的操作（比方說：建立視圖等）來達到顯示的目的。
現有一個商品銷售表sale，表結構爲：
month char(6) --月份
sell number(10,2) --月銷售金額
現有數據爲：
200001 1000
200002 1100
200003 1200
200004 1300
200005 1400
200006 1500
200007 1600
200101 1100
200202 1200
200301 1300
想要轉化爲以下結構的數據：
year char(4) --年份
month1 number(10,2) --1月銷售金額
month2 number(10,2) --2月銷售金額
month3 number(10,2) --3月銷售金額
month4 number(10,2) --4月銷售金額
month5 number(10,2) --5月銷售金額
month6 number(10,2) --6月銷售金額
month7 number(10,2) --7月銷售金額
month8 number(10,2) --8月銷售金額
month9 number(10,2) --9月銷售金額
month10 number(10,2) --10月銷售金額
month11 number(10,2) --11月銷售金額
month12 number(10,2) --12月銷售金額
結構轉化的SQL語句爲：
create or replace view
v_sale(year,month1,month2,month3,month4,month5,month6,month7,month8,month9,month10,month11,month12)
as
select
substrb(month,1,4),
sum(decode(substrb(month,5,2),'01',sell,0)),
sum(decode(substrb(month,5,2),'02',sell,0)),
sum(decode(substrb(month,5,2),'03',sell,0)),
sum(decode(substrb(month,5,2),'04',sell,0)),
sum(decode(substrb(month,5,2),'05',sell,0)),
sum(decode(substrb(month,5,2),'06',sell,0)),
sum(decode(substrb(month,5,2),'07',sell,0)),
sum(decode(substrb(month,5,2),'08',sell,0)),
sum(decode(substrb(month,5,2),'09',sell,0)),
sum(decode(substrb(month,5,2),'10',sell,0)),
sum(decode(substrb(month,5,2),'11',sell,0)),
sum(decode(substrb(month,5,2),'12',sell,0))
from sale
group by substrb(month,1,4);
a(字段)
01，02
01，03
01，04，02
02
01，02，03，04
02，04
就這麼一個字段 求如何通過sql統計出
01出現的次數
02出現的次數
03 出現的次數
04出現的次數
一個sql語句實現
select sum(case InStr(a,'01') when 0 then 0 else 1 end) as num01 ,
sum(case InStr(a,'02') when 0 then 0 else 1 end) as num02,
sum(case InStr(a,'03') when 0 then 0 else 1 end) as num03,
sum(case InStr(a,'04') when 0 then 0 else 1 end) as num04,
sum(case InStr(a,'05') when 0 then 0 else 1 end) as num from test
select sum(decode(InStr(a,'01'),0,0,1)) as num01 ,
sum(decode(InStr(a,'02'),0,0,1)) as num02,
sum(decode(InStr(a,'03'),0,0,1)) as num03,
sum(decode(InStr(a,'04'),0,0,1)) as num04,
sum(decode(InStr(a,'05'),0,0,1)) as num from test