關于VB2010怎么樣 textbox或者richtextbox背景設定為透明（或者插入圖片）的問題
uj5u.com熱心網友回復：
控制元件本身不支持透明，哪怎樣才可以變成透明呢？請教各位高人uj5u.com熱心網友回復：
最省事的做法：將 TextBox 疊放在 Label 上Option Explicit
Private Sub Form_Load()
Label1.BackStyle = 0
Label1.BorderStyle = 1
Label1.Caption = ""
Text1.Visible = False
Text1.Text = ""
End Sub
Private Sub Label1_Click()
Text1.Visible = True
Text1.SetFocus
End Sub
Private Sub Text1_LostFocus()
Label1.Caption = Text1.Text
Text1.Visible = False
End Sub
uj5u.com熱心網友回復：
我用的是VB2010，你說這種方法我在網上見到過。
不過現在已經找到透明的方法了，出現了另外一個問題
文本出現滾動條之后只要滾動資訊就會模糊
uj5u.com熱心網友回復：
2L：下面是照你的方式寫出來的，在點擊label的時候出現的效果還是出現文本的顏色，還有一點就是label只能顯示本頁面不能拉伸（滾動條動能）所以顯示的效果不是很好，請問有沒有其他不省事的方法，WPF我還沒接觸
Public Class Form3
Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.BackColor = Color.Transparent
Label1.BorderStyle = 1
Label1.Text = ""
TextBox1.Visible = False
TextBox1.Text = ""
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Close()
End Sub
Private Sub Label1_Click1(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.Click
TextBox1.Visible = True
TextBox1.Focus()
End Sub
Private Sub TextBox1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.LostFocus
Label1.Text = TextBox1.Text
TextBox1.Visible = False
End Sub
End Class
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/120573.html
標籤：控件
上一篇：十萬火急！求高手指點！！！！想做一個用戶登錄的界面，可是會彈出錯誤，用的是access資料庫
下一篇：求助：為什么機器碼會自己變？