VB.net中點擊標簽頁面觸發的Selected事件,代碼如下。
創新互聯公司是一家專注于成都網站建設、網站設計與策劃設計,安達網站建設哪家好?創新互聯公司做網站,專注于網站建設十多年,網設計領域的專業建站公司;建站業務涵蓋:安達等地區。安達做網站價格咨詢:18982081108
Private Sub TabControl_Selected(sender As Object, e As TabControlEventArgs) Handles TabControl.Selected
If e.TabPage.TabIndex = TabPage1.TabIndex Then
MsgBox("你點擊了第一個標簽控件")
End If
End Sub
VB6.0中換頁:
Printer 對象,用 NewPage 和 EndDoc 方法打印 Printer 對象的內容。
一旦將文本和圖形放到 Printer 對象中,就可用 EndDoc 方法打印該內容。EndDoc 方法要換頁,并將懸置的所有輸出都送給假脫機系統。
創建多頁文檔
打印較長的文檔時,可用 NewPage 方法,在代碼中指定新的一頁。例如:
Printer.Print "This is page 1."
Printer.NewPage
Printer.Print "This is page 2."
Printer.EndDoc
在字符串中使用換頁符(Chr$(12))。
方法/步驟
打開word軟件,如圖所示
輸入
=rand()
隨機產生一些文字做示范
接著,我們設置文檔超鏈接。選擇某部分文字后,單擊菜單欄插入——書簽
單擊書簽后,便會彈出如圖所示對話框,輸入書簽名,單擊添加,便可以添加書簽
把文檔翻頁至第二頁,接著選擇菜單欄中的插入——超鏈接
單擊超鏈接后,先選擇本文檔中的位置,選擇剛才添加的書簽,選擇后,單擊確定
單擊確定后,便會在文字下方顯示橫線,說明超鏈接已經添加完成,當單擊時,便會自動跳轉到書簽1的位置。
1、如果不用用戶控件,那就用Panel,單擊按鈕時顯示相應的Panel,隱藏不相關的Panel。
2、E死了:
ADD按鈕的Click事件:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'要先新建一個Form2窗口,里面有一個文本輸入框TextBox1和一個按鈕Button1。
Form2.Show() '打開編輯窗口。
End Sub
Form2窗口的Button1按鈕事件Click:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text "" Then '當TextBox1的類容不為空時。
Form1.ListView1.Items.Add(TextBox1.Text)'把TextBox1的類容添加到ListView中。
Me.Close()'添加完后關閉窗口。
Else ’Else,如果為空。
Dim k = MsgBox("類容為空!" Chr(10) "是否取消添加?", vbYesNo)'提醒用戶是否取消向ListView添加類容。
If k = vbYes Then '用戶點擊確認時。
Me.Close() '取消操作。
End If
End If
End Sub
新建Form2只要點“項目”“添加Windows窗體”,在彈出的對話框中的“名稱”寫為“Form2.vb”,再“創建”,就行了。之后在里面添加相應的用戶控件。
網頁標題:vb.net控件換頁 vbnet tabcontrol控件用法
文章源于:http://vcdvsql.cn/article36/doieesg.html
成都網站建設公司_創新互聯,為您提供網站設計、外貿網站建設、手機網站建設、ChatGPT、App設計、企業網站制作
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯