Question

VB6.0Text1自动转换谢谢了，大神帮忙啊

当Text1里输入的内容是+号时怎么让他自动变成｛+｝ 其他内容都是一样的，就只有他+号变成｛+｝ 小弟对VB不怎么懂啊，求那位大哥大姐帮帮忙！

Answer 1

代码如下.....当text1失去焦点的时候替换..当然,你可以在任何需要的地方调用 ReplaceJia Text1 来替换+号 Private Sub Text1_Validate(Cancel As Boolean) ReplaceJia Text1 End Sub Private Sub ReplaceJia(txtBox As TextBox) '把原来的{+}替换成+ txtBox = Replace(txtBox, "{+}", "+") '把所有的+ 替换成 {+} txtBox = Replace(txtBox, "+", "{+}") End Sub