一段vb代码转换成c#代码
在线等
String ls_c[10] = {"○","一","二","三","四","五","六","七","八","九"}
String ls_date, ls_returnStr = "",ls_ch
Int mm, dd, i
ls_date = String(adt_date, "yyyy年mm月dd日")
int a
a= len(ls_date)
For i = 1 to Len(ls_date) //依次处理ls_date中每个字符
ls_ch = Mid(ls_date , i , 1)
If Asc(ls_ch) < 128 then //非汉字
ls_returnStr = ls_returnStr + ls_c[integer(ls_ch)+ 1] //得到对应的中文数字
else
ls_ch = Mid(ls_date , i , 2)
ls_returnStr = ls_returnStr + ls_ch //取出此汉字
i = i + 1
end if
next
//处理'月'
mm = Month(date(adt_date))
choose case mm
case 11, 12
ls_returnStr = replace(ls_returnStr, 11, 2, "十")
case 10
ls_returnStr = replace(ls_returnStr, 11, 4, "十")
case else
ls_returnStr = replace(ls_returnStr, 11, 2, "")
end choose
//处理'日'
dd = Day(date(adt_date))
i = Pos(ls_returnStr, "月") + 2
choose case dd
case 31, 21 to 29
ls_returnStr = replace(ls_returnStr, i + 2, 0, "十")
case 30, 20
ls_returnStr = replace(ls_returnStr, i + 2, 2, "十")
case 11 to 19
ls_returnStr = replace(ls_returnStr, i, 2, "十")
case 10
ls_returnStr = replace(ls_returnStr, i, 4, "十")
case 1 to 9
ls_returnStr = replace(ls_returnStr, i, 2, "")
case else
end choose
return ls_returnStr