★★★★★★怎样用文本框实现货币数据输入★★★★★★

把文本框放入带图片的PictureBox吧!限制文本框的长度为1如下:
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongConst EM_LIMITTEXT = &HC5rc = SendMessage(Text1.hwnd, EM_LIMITTEXT, 5, 0)

解决方案 »

  1.   

    错了,是
    rc = SendMessage(Text1.hwnd, EM_LIMITTEXT, 1, 0)
      

  2.   

    你可以将几个文本框合并成你要的样子，中间用Label框连接，文本框的ForeColor改成与文本框同样的颜色，Label框中输入你要的样式
      

  3.   

    把一个文本框&一个label放入PictureBox,label.caption=￥.底色都设为白，无边框。
      

  4.   

    谢谢大家！！
    现在我在想用几个文本框开发一个activex
      

  5.   

    看来必须要用几个maskedbox合并做了，因为我实在是没有想到从又到左显示的方法
      

  6.   

    to :乱马那样不行，文本框挡住了图片背景to :泰山
    能详细说说吗？