大侠oo0屁屁
大侠oo0屁屁
关注数: 1
粉丝数: 5
发帖数: 1,421
关注贴吧数: 19
抄写半天的代码(出错),大佬帮忙看一下 因为Excel办公需要VBA自己又不会,只能抄一些别人写好的,自己也看不懂哪里错了。 Function pinyin(p As String) As String i = Asc(p) ←这里就过不去了显示错误 Select Case i Case -20319 To -20284: pinyin = "A " Case -20283 To -19776: pinyin = "B" Case -19775 To -19219: pinyin = "C" Case -19218 To -18711: pinyin = "D" Case -18710 To -18527: pinyin = "E " Case -18526 To -18240: pinyin = "F" Case -18239 To -17923: pinyin = "G" Case -17922 To -17418: pinyin = "H" Case -17417 To -16475: pinyin = "]" Case -16474 To -16213: pinyin = "K" Case -16212 To -15641: pinyin = "L" Case -15640 To -15166: pinyin = "M" Case -15165 To -14923: pinyin = "N" Case -14922 To -14915: pinyin = "o" Case -14914 To -14631: pinyin = "p" Case -14630 To -14150: pinyin = "Q" Case -14149 To -14091: pinyin = "r" Case -14090 To -13319: pinyin = "s" Case -13318 To -12839: pinyin = "T" Case -12838 To -12557: pinyin = "w" Case -12556 To -11848: pinyin = "X" Case -11847 To -11056: pinyin = "y" Case -11055 To -2050: pinyin = "Z" Case Else: pinyin = p End Select End Function Function getpy(str) For i = 1 To Len(str) getpy = getpy & pinyin(Mid(str, i, 1)) Next i End Function
求帮忙写一个公式 超时多少分钟这个公式怎么写?谢谢了
有没有电工老师傅,急。。 家里接两个灯,如图
请教一下老师傅~! 家里接两个灯。图下
物爆弓冲级求教。 刷图时,偶尔遇到个别元反怪,不可避免。闪电箭第二发出去必死。求怎么解决?
求个旧版链接 如题:拜谢
lol 1400的排位就这样?用现在流行的话可是求破?
贴吧是不是到3级回复别人就不要验证码了? 我刚3级,有时候回复需要验证码,有时候不要,哪位解答,谢了!
1
下一页