13518219792
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”，再“创建”，就行了。之后在里面添加相应的用户控件。
