水仙花数python代码 vb编程，输入一串字符，统计各个英文字母出现的次数，并统计出现字母的个数。求代码？
vb编程，输入一串字符，统计各个英文字母出现的次数，并统计出现字母的个数。求代码？是这样的：dimtmp$，I&，lenstr&TMP=lcase（text1）lenstr=len（TMP
vb编程，输入一串字符，统计各个英文字母出现的次数，并统计出现字母的个数。求代码？
是这样的：
dimtmp$，I&，lenstr&
TMP=lcase（text1）
lenstr=len（TMP）
forI=97to122
printchr（I）&“时间如下：”&lenstr len（replace（TMP，Chr（I），”）