實現效果：
selectvalueinmulpage.aspx
<%@ page language="vb" autoeventwireup="false" codebehind="selectvalueinmulpage.aspx.vb" inherits="vbproject.selectvalueinmulpage"%>
selectvalueinmulpage.aspx.vb
public class selectvalueinmulpage
inherits system.web.ui.page
#region " web 窗體設計器生成的** "
'該呼叫是 web 窗體設計器所必需的。
private sub initializecomponent()
end sub
protected withevents label1 as system.web.ui.webcontrols.label
protected withevents datagrid1 as system.web.ui.webcontrols.datagrid
protected withevents button1 as system.web.ui.webcontrols.button
protected withevents txttempvalue as system.web.ui.htmlcontrols.htmlinputtext
'注意: 以下佔位符宣告是 web 窗體設計器所必需的。
'不要刪除或移動它。
private designerplaceholderdeclaration as system.object
private sub page_init(byval sender as system.object, byval e as system.eventargs) handles mybase.init
'codegen: 此方法呼叫是 web 窗體設計器所必需的
'不要使用**編輯器修改它。
initializecomponent()
end sub
#end region
private vbp as new vbproject
private sub page_load(byval sender as object, byval e as system.eventargs) handles mybase.load
if not page.ispostback then
binddata()
end if
end sub
private sub datagrid1_pageindexchanged(byval [source] as object, byval e as datagridpagechangedeventargs) handles datagrid1.pageindexchanged
datagrid1.currentpageindex = e.newpageindex
binddata()
end sub
sub binddata() '繫結資料
dim dt as datatable = vbp.getemployees("")
datagrid1.datasource = dt
datagrid1.databind()
end sub
private sub datagrid1_itemdatabound(byval sender as object, byval e as system.web.ui.webcontrols.datagriditemeventargs)
if e.item.itemtype = listitemtype.item or e.item.itemtype = listitemtype.alternatingitem then
'如果臨時文字中包含改行的資料，則把該行資料中的checkbox選上
if txttempvalue.value.indexof(ctype(e.item.cells(1).findcontrol("titleshow"), literal).text) >= 0 then
dim chkselected as htmlinputcheckbox = ctype(e.item.cells(0).findcontrol("chkselect"), htmlinputcheckbox)
chkselected.checked = true
end if
end if
end sub
private sub button1_click(byval sender as object, byval e as system.eventargs) handles button1.click
'為了顯示的方便進行替換的
label1.text = txttempvalue.value.replace(",", "")
end sub
end class
在easyui中實現datagrid滾動條聯動
豎向滾動條聯動 var contents importform div.datagrid body contents.scroll function 橫向滾動條聯動 var contents2 importform div.datagrid view2 div.datagrid header con...
在QML應用中實現threading多工
在這個例子中，我們將介紹如何在qml應用中使用qml語言提供的threading功能，實現多工。更多的閱讀在 我們使用ubuntu sdk來建立以個最基本的qml專案 import qtquick 2.0 import ubuntu.components 1.1 brief mainview wit...
在區域網中實現多播功能
最近一直在看 unix網路程式設計 這本書，覺得這本書很適合初學socket程式設計的人 比如說我自己 我一直對於多播的實現比較模糊，在看了書上的多播部分的介紹，才發現在程式中實現一個基本的多播功能是如此簡單。在這裡我不想照本宣科的大說什麼理論，概念的東東，我的目的是說明在我們的 中如何實現多播功能...
在區域網中實現多播功能
最近一直在看 unix網路程式設計 這本書，覺得這本書很適合初學socket程式設計的人 比如說我自己 我一直對於多播的實現比較模糊，在看了書上的多播部分的介紹，才發現在程式中實現一個基本的多播功能是如此簡單。在這裡我不想照本宣科的大說什麼理論，概念的東東，我的目的是說明在我們的 中如何實現多播功能...
在jsp頁面中實現跳轉的方式分享
1.每秒遞減跳轉 複製 如下 2.使用response.setheader函式 複製 如下 ofxdbresponse.setheader refresh 5 url 程式設計客棧 3.使用meta標籤 複製 如下 jsp頁面實現自動跳轉！一 頁面自動重新整理 把www.cppcns.com如下 加...