7493
社区成员
请教：VB文本框中检查全角字符如何实现
检查VB的文本框中是否含有全角字符，如果有提示用户改为半角字符，
这在VB中应该怎样实现？？（解答最好稍微详细一点，新手=_=）
这在VB中应该怎样实现？？（解答最好稍微详细一点，新手=_=）
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
智能卡_Snooper 2008-02-27
dim dic as string
dic = "，。：？"
for i = 1 to len( dic )
if instr( 1, text1.txt, mid( dic, i, 1 ) ) then
msgbox "有全角字符"
endif
next i 智能卡_Snooper 2008-02-27
dim dic as string
dic = "，。：？"
for i = 1 to len( dic )
if instr( 1, text1.txt, mid( dic, i, 1 ) ) then
msgbox "有全角字符"
endif
next i
稍经改动还可以知道全角字符的具体位置。
