如何制作背景透明的textbox
编号：QA004648
建立日期: 2002年11月27日 最后修改日期：2002年11月27日
所属类别：
lit:
操作系统：win
编程工具：vb6
问题：如何制作背景透明的textbox？就是背景可以显示出下面控件的图案。问题虽简单，可能实现却不容易。望帮助，最好有实例说明。
水平：中级
回答:
这是一个关于透明文本框的例子
TranText.zip，但是由于是透明的故无法做到输入的内容被直接显示出来，但是可以读出来!
Zheng Xiaohui的意见：
我有一个笨办法，用一个透明的label来显示文本，在它上面叠加一个文本框，平时设为隐藏，当鼠标点到label时，显示文本框，设置焦点，编辑完成后（即失去焦点后）再隐藏文本框，并把内容复制到label。这个方法有很多问题，比如说文本框编辑时就不透明，label不响应tab移动等，只能凑合。
Private Sub Form_Load()
Label1.BackStyle = 0
text1.visible=false
text1.text=label1.caption
text1.left=label1.left
text1.top=label1.top
text1.width=label1.width
text1.height=label1.height
End Sub
Private Sub Label1_Click
Text1.Text = Label1.Caption
Text1.Visible = True
Text1.SetFocus
End Sub
Private Sub Text1_LostFocus()
Label1.Caption = Text1.Text
Text1.Visible = False
End Sub
此问题由浪侠回答。
| |
|
|
| |
|
|
