將半形"轉換為中文"的函數

function new_str(str)
if instr(str,chr(34))<>0 and str<>"" then
  str_split=split(str,chr(34))
  i=1
  str_s=""
  for j=0 to ubound(str_split)-1
   if i mod 2 then
    str_s=str_s&str_split(j)&"“"&str_split(j+1)
   else
    str_s=str_s&str_split(j)&"”"&str_split(j+1)
   end if
   i=i+1
  next
end function

文章來自: Tank部落格
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相關日誌: