十年網(wǎng)站開發(fā)經(jīng)驗(yàn) + 多家企業(yè)客戶 + 靠譜的建站團(tuán)隊(duì)
量身定制 + 運(yùn)營(yíng)維護(hù)+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
使用菜單【工程】--【部件】,勾選Microsoft
創(chuàng)新互聯(lián)公司專注于企業(yè)成都全網(wǎng)營(yíng)銷推廣、網(wǎng)站重做改版、沭陽網(wǎng)站定制設(shè)計(jì)、自適應(yīng)品牌網(wǎng)站建設(shè)、HTML5建站、成都做商城網(wǎng)站、集團(tuán)公司官網(wǎng)建設(shè)、外貿(mào)營(yíng)銷網(wǎng)站建設(shè)、高端網(wǎng)站制作、響應(yīng)式網(wǎng)頁設(shè)計(jì)等建站業(yè)務(wù),價(jià)格優(yōu)惠性價(jià)比高,為沭陽等各大城市提供網(wǎng)站開發(fā)制作服務(wù)。
Windows
Common
Controls
6.0
(SP6),【確定】
在工具箱上,將新增一組控件,其中就有。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TabControl1.TabPages.Add("aa") /添加一個(gè)選項(xiàng)卡
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TabControl1.TabPages.RemoveAt(2) /刪除第二個(gè)的選項(xiàng)卡
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer
Dim mytabpage As New TabPage
Dim bln As Boolean
For i = 0 To TabControl1.TabPages.Count - 1
If (TabControl1.TabPages(i).Text) = "選項(xiàng)卡名字" Then
bln = True
Exit For
Else
bln = False
End If
Next
If bln = False Then
mytabpage.Name = "tabpages" i
mytabpage.Text = "選項(xiàng)卡名字"
mytabpage.BackColor = Color.White
TabControl1.TabPages.Add(mytabpage)
End If
End Sub
點(diǎn)擊“開始”-“Excel選項(xiàng)”,在“基本設(shè)置”選項(xiàng)卡中勾選右側(cè)的“在功能區(qū)上顯示‘開發(fā)工具’”,使其顯示出來。
切換到“開發(fā)工具”功能區(qū),點(diǎn)擊插入”下拉列表框,在彈出的列表中選擇“復(fù)選框(ActiveX控件)”。
然后在文檔區(qū)域拖動(dòng)以繪制一個(gè)復(fù)選框。 并在該復(fù)選框上右鍵單擊,在彈出的菜單中選擇“屬性”以打開“屬性對(duì)話框”。
在打開的“屬性對(duì)話框”中將“Caption”設(shè)置為空,”BackStyle“設(shè)置為透明,邊框效果設(shè)置為0類型,完成后關(guān)閉”屬性對(duì)話框“。