VB多頁控件問題

正確的：

我們提供的服務(wù)有：成都網(wǎng)站制作、網(wǎng)站設(shè)計、微信公眾號開發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、婺城ssl等。為超過千家企事業(yè)單位解決了網(wǎng)站和推廣的問題。提供周到的售前咨詢和貼心的售后服務(wù)，是有科學(xué)管理、有技術(shù)的婺城網(wǎng)站制作公司

Dim i As Integer

Dim j As Integer

Private Sub CommandButton2_Click()

For i = 0 To MultiPage1.Count - 1 '遍及數(shù)組

MsgBox "MultiPage1.Pages(i).Caption = " MyTextBox1.Text

Next i

End Sub

Private Sub UserForm_Initialize()

j = 1

Me.MultiPage1.Pages.Add.Caption = 1

Call tianjia

End Sub

Private Sub CommandButton1_Click()

i = i + 1

j = j + 1

Me.MultiPage1.Pages.Add.Caption = j

Call tianjia

End Sub

Public Sub tianjia()

Set MyTextBox1 = MultiPage1.Pag44(i).Controls.Add("Forms.TextBox.1", "TextBox1")

MyTertBox1.Left = 40

MyTextBox1.Top = 17

MyTextBox1.Width = 148

MyTextBox1.Height = 18

End Sub

VB怎樣調(diào)出"多頁控件"？

在控件欄點右鍵,點"添加選項卡",輸入個名稱,確定,然后就增加了一個頁,將你要用的控件按住不放,拖動到新建的選項卡里就OK了.

vb.net 動態(tài)添加多個控件只能顯示第一個？

你只有一個catcon，所以不行，你必須定義數(shù)組catcon()才可以顯示多個

VB.NET中使用AspNetPager控件的詳細(xì)用法

AspNetPager簡單使用方法 AspNetPager作為分頁工具,常常用于綁定數(shù)據(jù)控件,如DataGrid , Repeater等

在這里,簡單講解下 綁定 Repeater 控件的方法,其余控件綁定方法類似:

'全局變量 i 用于 讀取 數(shù)據(jù)集記錄的條數(shù)(注意:讀取一次就夠了)

Dim i As New Integer

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

If i = 0 Then

con = New SqlConnection(ConfigurationManager.ConnectionStrings("NEWS_ConnectionString").ConnectionString)

con.Open()

cmd = New SqlCommand()

cmd.Connection = con

cmd.CommandText = "select count(*) from XWNRB "

'AspNetPager控件 可見

Me.AspNetPager1.Visible = True

'AspNetPager控件 每頁顯示大小為10條記錄

Me.AspNetPager1.PageSize = 10

'AspNetPager控件 記錄總的記錄條數(shù)

Me.AspNetPager1.RecordCount = Convert.ToInt32(cmd.ExecuteScalar())

'AspNetPager控件 數(shù)據(jù)綁定

Me.SHOW_DATA_LIST()

i = i + 1

con.Close()

End If

End Sub

Protected Sub SHOW_DATA_LIST()

con = New SqlConnection(ConfigurationManager.ConnectionStrings("NEWS_ConnectionString").ConnectionString)

sql_Text = "select * from XWNRB where "

da = New SqlDataAdapter(sql_Text, con)

Dim ds As New Data.DataSet

'第一個參數(shù)為存儲入的數(shù)據(jù)集為ds

'第二個參數(shù)為存儲的起始記錄序號

'第三個參數(shù)為存儲的記錄每頁條數(shù)

'第四個參數(shù)為存儲入的數(shù)據(jù)集ds中的具體某個表

da.Fill(ds, Me.AspNetPager1.PageSize * (Me.AspNetPager1.CurrentPageIndex - 1), Me.AspNetPager1.PageSize, "NEWS_LIST")

'真正綁定

Me.Repeater2.DataSource = ds.Tables("NEWS_LIST").DefaultView

Me.Repeater2.DataBind()

End Sub

'即每次點擊新的頁面,或者點擊 Pre,Next,Last.....時候都會觸發(fā)這個事件

Protected Sub AspNetPager1_PageChanged(ByVal src As Object, ByVal e As Wuqi.Webdiyer.PageChangedEventArgs) Handles AspNetPager1.PageChanged

'更新當(dāng)前所在的頁數(shù)序列

Me.AspNetPager1.CurrentPageIndex = e.NewPageIndex

'更新完后綁定

Me.SHOW_DATA_LIST()

End Sub

VB.net中窗體上控件太多，運行時在桌面上顯示不全，怎樣用滾動條來解決？請詳細(xì)說明，最好給個小例子。

思路：

利用幾個可以作為容器的控件，添加滾動條就可以了：

我舉個例子：（這個問題我記得回答過的！）

添加1個PicTureBox1，作為容器

在PicTureBox1里添加PicTureBox2，在窗體上添加一個垂直滾動條。

把你所謂的許多控件放到PicTureBox2里，滾動條改變的是PicTureBox2在PicTureBox1里的Top屬性，我想你通過一定的空間想象力，可以想到效果了吧？

注意：默認(rèn)狀態(tài)設(shè)置PicTureBox2的Top屬性為0，當(dāng)該屬性為負(fù)值的時候，PicTureBox2顯示的效果是向上移動，即下面原來隱藏的內(nèi)容為可見了。

要設(shè)置PicTureBox2的AutoRedraw 屬性為True。

若要左右移動效果，那么改變其 Left 屬性，原理不再贅述了。

新聞標(biāo)題：php數(shù)據(jù)庫復(fù)習(xí)方法,php數(shù)據(jù)庫教程
文章分享：http://chinadenli.net/article25/dsgpcci.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供虛擬主機、自適應(yīng)網(wǎng)站、用戶體驗、營銷型網(wǎng)站建設(shè)、響應(yīng)式網(wǎng)站、品牌網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)