久久亚洲精品国产精品_羞羞漫画在线版免费阅读网页漫画_国产精品久久久久久久久久久久_午夜dj免费观看在线视频_希崎杰西卡番号

文本框(文本框是什么)

前沿拓展:

文本框

文本框設(shè)置透明步驟如下: 

工具:APPLEM味護(hù)著布acBook Air、IOS10.14.6、WPS Office13.18.0。

1、打開要編輯的Word文檔,如圖所示,該文檔設(shè)置了背的效果。


VBA編程中的一些對象,有一個(gè)功能需要我們進(jìn)行設(shè)置,比如,不想讓某個(gè)控件選擇或者讓這個(gè)控件失效。

這個(gè)功能還是很實(shí)用的,本文介紹兩個(gè)屬性,可以實(shí)現(xiàn)這樣的功能。

文本框(文本框是什么)

一個(gè)是Enabled屬性,另一個(gè)是Locked屬性。

英文翻譯,Enabled為"使能",也是大多工業(yè)設(shè)備中經(jīng)常用到的一個(gè)英文單詞。

Locked為"鎖定"。

理解其含義之后,使用就簡單多了。

如下圖示例:

文本框(文本框是什么)

我們利用兩個(gè)選擇框來控制第一個(gè)文本框的Enabled,和Locked狀態(tài)。第二個(gè)文本框?yàn)檎f明文本。

也就是當(dāng)要選擇Enabled"使能"的時(shí)候,就可以編輯文本,當(dāng)不選擇的時(shí)候文本框失去編輯功能。

文本框(文本框是什么)

失去編輯功能字體顏色會變成灰色,文本框內(nèi)容也不能選擇。

當(dāng)我們選擇Locked的時(shí)候,實(shí)現(xiàn)鎖定文本,文本框顏色不變,可以選擇也可以通過鍵盤**作**(Ctrl+C),但不能進(jìn)行刪除、修改、添加、插入等編輯**作。

文本框(文本框是什么)

具體我們看代碼來時(shí)行理解。

第一在VBE中新建一個(gè)窗體,并添加2個(gè)CheckBox控件,2個(gè)TextBox控件。

窗體代碼:
Private Sub UserForm_Initialize()
TextBox1.Text = "可變屬性"
TextBox1.Enabled = True
TextBox1.Locked = False
CheckBox1.Caption = "Enabled 屬性"
CheckBox1.Value = False
CheckBox2.Caption = "Locked 屬性"
CheckBox2.Value = False
TextBox2.Text = "TextBox2"
End Sub文本框(文本框是什么)

CheckBox1代碼

Private Sub CheckBox1_Change()
If Me.CheckBox1.Value Then
TextBox2.Text = "有效:可以修改"
TextBox1.Enabled = CheckBox1.Value
Else
TextBox2.Text = "無效:不能修改"
TextBox1.Enabled = CheckBox1.Value
End If
End Sub

CheckBox2代碼

Private Sub CheckBox2_Change()
If Me.CheckBox2 Then
TextBox2.Text = "鎖定:不可修改內(nèi)容"
TextBox1.Locked = CheckBox2.Value
Else
TextBox2.Text = "解鎖:可修改內(nèi)容"
TextBox1.Locked = CheckBox2.Value
End If
End Sub

Enabled和Locked屬性在很多控件中可以使用,并不一定是這兩種控件,所以在編程過程有條件地使用還是可以達(dá)到想的結(jié)果的。

END

拓展知識:

前沿拓展:

文本框

文本框設(shè)置透明步驟如下: 

工具:APPLEM味護(hù)著布acBook Air、IOS10.14.6、WPS Office13.18.0。

1、打開要編輯的Word文檔,如圖所示,該文檔設(shè)置了背的效果。


VBA編程中的一些對象,有一個(gè)功能需要我們進(jìn)行設(shè)置,比如,不想讓某個(gè)控件選擇或者讓這個(gè)控件失效。

這個(gè)功能還是很實(shí)用的,本文介紹兩個(gè)屬性,可以實(shí)現(xiàn)這樣的功能。

文本框(文本框是什么)

一個(gè)是Enabled屬性,另一個(gè)是Locked屬性。

英文翻譯,Enabled為"使能",也是大多工業(yè)設(shè)備中經(jīng)常用到的一個(gè)英文單詞。

Locked為"鎖定"。

理解其含義之后,使用就簡單多了。

如下圖示例:

文本框(文本框是什么)

我們利用兩個(gè)選擇框來控制第一個(gè)文本框的Enabled,和Locked狀態(tài)。第二個(gè)文本框?yàn)檎f明文本。

也就是當(dāng)要選擇Enabled"使能"的時(shí)候,就可以編輯文本,當(dāng)不選擇的時(shí)候文本框失去編輯功能。

文本框(文本框是什么)

失去編輯功能字體顏色會變成灰色,文本框內(nèi)容也不能選擇。

當(dāng)我們選擇Locked的時(shí)候,實(shí)現(xiàn)鎖定文本,文本框顏色不變,可以選擇也可以通過鍵盤**作**(Ctrl+C),但不能進(jìn)行刪除、修改、添加、插入等編輯**作。

文本框(文本框是什么)

具體我們看代碼來時(shí)行理解。

第一在VBE中新建一個(gè)窗體,并添加2個(gè)CheckBox控件,2個(gè)TextBox控件。

窗體代碼:
Private Sub UserForm_Initialize()
TextBox1.Text = "可變屬性"
TextBox1.Enabled = True
TextBox1.Locked = False
CheckBox1.Caption = "Enabled 屬性"
CheckBox1.Value = False
CheckBox2.Caption = "Locked 屬性"
CheckBox2.Value = False
TextBox2.Text = "TextBox2"
End Sub文本框(文本框是什么)

CheckBox1代碼

Private Sub CheckBox1_Change()
If Me.CheckBox1.Value Then
TextBox2.Text = "有效:可以修改"
TextBox1.Enabled = CheckBox1.Value
Else
TextBox2.Text = "無效:不能修改"
TextBox1.Enabled = CheckBox1.Value
End If
End Sub

CheckBox2代碼

Private Sub CheckBox2_Change()
If Me.CheckBox2 Then
TextBox2.Text = "鎖定:不可修改內(nèi)容"
TextBox1.Locked = CheckBox2.Value
Else
TextBox2.Text = "解鎖:可修改內(nèi)容"
TextBox1.Locked = CheckBox2.Value
End If
End Sub

Enabled和Locked屬性在很多控件中可以使用,并不一定是這兩種控件,所以在編程過程有條件地使用還是可以達(dá)到想的結(jié)果的。

END

拓展知識:

原創(chuàng)文章,作者:九賢生活小編,如若轉(zhuǎn)載,請注明出處:http://www.cddhlm.com/31367.html