英文数字翻译汉字_数字密码翻译成汉字-世界报道

来源:互联网 时间:2023-04-25 15:00:54


(资料图片仅供参考)

1、Private Sub Command1_Click()Dim d, i%, mArr, Temp$Set d = CreateObject("scripting.dictionary")d.Add "1234", "我"d.Add "1345", "爱"d.Add "5200", "你"mArr = Split(Text1.Text, " ")For i = 0 To UBound(mArr)Temp = Temp & d.Item(mArr(i))NextText2.Text = TempEnd Sub。

本文到此分享完毕,希望对大家有所帮助。

X 关闭

Copyright ©  2015-2022 华东家居网版权所有  备案号:京ICP备2022016840号-41   联系邮箱:2 913 236 @qq.com