实例VB.NET常用代码归纳总结

学习中就在善于总结，在VB.NET中有很多常用的代码，在这里给大家总结了一点关于VB.NET常用代码的实例，如果对大家有用的话，希望大家记下来，方便以后使用。

创新互联专注于丰润网站建设服务及定制，我们拥有丰富的企业做网站经验。 热诚为您提供丰润营销型网站建设，丰润网站制作、丰润网页设计、丰润网站官网定制、微信小程序定制开发服务，打造丰润网络公司原创品牌,更为您提供丰润网站排名全网营销落地服务。

1. 打开新的窗口并传送参数：

传送参数：

 
 
 
      
  
  
  1. response.write("＜script＞window.open(’*.aspx?id="+this.DropDownList1.SelectIndex+"&id1="+...+"’)＜/script＞") 
    2.

接收参数：

 
 
 
      
  
  
  1. string a = Request.QueryString("id");  
    2.   
  
  
  2. string b = Request.QueryString("id1"); 
    3.

2.为按钮添加对话框

 
 
 
      
  
  
  1. Button1.Attributes.Add("onclick","return confirm(’确认?’)");  
    2.   
  
  
  2. button.attributes.add("onclick","if(confirm(’are you sure...?’)){return true;}else{return false;}")  
    3.

3.删除表格选定记录

 
 
 
      
  
  
  1. int intEmpID = (int)MyDataGrid.DataKeys[e.Item.ItemIndex];  
    2.   
  
  
  2. string deleteCmd = "DELETE from Employee where emp_id = " + intEmpID.ToString() 
    3.

4.删除表格记录警告

 
 
 
      
  
  
  1. private void DataGrid_ItemCreated(Object sender,DataGridItemEventArgs e)  
    2.   
  
  
  2. {  
    3.   
  
  
  3. switch(e.Item.ItemType)  
    4.   
  
  
  4. {  
    5.   
  
  
  5. case ListItemType.Item :  
    6.   
  
  
  6. case ListItemType.AlternatingItem :  
    7.   
  
  
  7. case ListItemType.EditItem:  
    8.   
  
  
  8. TableCell myTableCell;  
    9.   
  
  
  9. myTableCell = e.Item.Cells[14];  
    10.   
  
  
  10. LinkButton myDeleteButton ;  
    11.   
  
  
  11. myDeleteButton = (LinkButton)myTableCell.Controls[0];  
    12.   
  
  
  12. myDeleteButton.Attributes.Add("onclick","return confirm(’您是否确定要删除这条信息’);");  
    13.   
  
  
  13. break;  
    14.   
  
  
  14. default:  
    15.   
  
  
  15. break;  
    16.   
  
  
  16. }  
    17.   
  
  
  17. } 
    18.

5.点击表格行链接另一页

 
 
 
      
  
  
  1. private void grdCustomer_ItemDataBound(object sender, System.Web.UI.WebControls.DataGridItemEventArgs e)  
    2.   
  
  
  2. {  
    3.   
  
  
  3. //点击表格打开  
    4.   
  
  
  4. if (e.Item.ItemType == ListItemType.Item || e.Item.ItemType == ListItemType.AlternatingItem)  
    5.   
  
  
  5. e.Item.Attributes.Add("onclick","window.open(’Default.aspx?id=" + e.Item.Cells[0].Text + "’);");  
    6.   
  
  
  6. }  
    7.   
  
  
  7. //双击表格连接到另一页  
    8.   
  
  
  8. //在itemDataBind事件中  
    9.   
  
  
  9. if(e.Item.ItemType == ListItemType.Item || e.Item.ItemType == ListItemType.AlternatingItem)  
    10.   
  
  
  10. {  
    11.   
  
  
  11. string OrderItemID =e.item.cells[1].Text;  
    12.   
  
  
  12. ...  
    13.   
  
  
  13. e.item.Attributes.Add("ondblclick", "location.href=’../ShippedGrid.aspx?id=" + OrderItemID + "’");  
    14.   
  
  
  14. }  
    15.   
  
  
  15. //双击表格打开新一页  
    16.   
  
  
  16. if(e.Item.ItemType == ListItemType.Item || e.Item.ItemType == ListItemType.AlternatingItem)  
    17.   
  
  
  17. {  
    18.   
  
  
  18. string OrderItemID =e.item.cells[1].Text;  
    19.   
  
  
  19. ...  
    20.   
  
  
  20. e.item.Attributes.Add("ondblclick", "open(’../ShippedGrid.aspx?id=" + OrderItemID + "’)");  
    21.   
  
  
  21. } 
    22.

6.表格超连接列传递参数

 
 
 
      
  
  
  1. ＜asp:HyperLinkColumn Target="_blank" headertext="ID号" DataTextField="id" NavigateUrl="aaa.aspx?id=’  
    2.   
  
  
  2. ＜%# DataBinder.Eval(Container.DataItem, "数据字段1")%＞’ & name=’＜%# DataBinder.Eval(Container.DataItem, "数据字段2")%＞’ /＞ 
    3.

7.表格点击改变颜色

 
 
 
      
  
  
  1. if (e.Item.ItemType == ListItemType.Item ||e.Item.ItemType == ListItemType.AlternatingItem)  
    2.   
  
  
  2. {  
    3.   
  
  
  3. e.Item.Attributes.Add("onclick","this.style.backgroundColor=’#99cc00’;  
    4.   
  
  
  4. this.style.color=’buttontext’;this.style.cursor=’default’;");  
    5.   
  
  
  5. }   
    6.   
  
  
  6. //写在DataGrid的_ItemDataBound里  
    7.   
  
  
  7. if (e.Item.ItemType == ListItemType.Item ||e.Item.ItemType == ListItemType.AlternatingItem)  
    8.   
  
  
  8. {  
    9.   
  
  
  9. e.Item.Attributes.Add("onmouseover","this.style.backgroundColor=’#99cc00’;  
    10.   
  
  
  10. this.style.color=’buttontext’;this.style.cursor=’default’;");  
    11.   
  
  
  11. e.Item.Attributes.Add("onmouseout","this.style.backgroundColor=’’;this.style.color=’’;");  
    12.   
  
  
  12. } 
    13.

8.VB.NET常用代码关于日期格式

日期格式设定

 
 
 
      
  
  
  1. DataFormatString="{0:yyyy-MM-dd}" 
    2.

我觉得应该在itembound事件中

 
 
 
      
  
  
  1. e.items.cell["你的列"].text=DateTime.Parse(e.items.cell["你的列"].text.ToString("yyyy-MM-dd"))  
    2.

9.获取错误信息并到指定页面

不要使用Response.Redirect,而应该使用Server.Transfer

 
 
 
      
  
  
  1. e.g  
    2.   
  
  
  2. // in global.asax  
    3.   
  
  
  3. protected void Application_Error(Object sender, EventArgs e) {  
    4.   
  
  
  4. if (Server.GetLastError() is HttpUnhandledException)  
    5.   
  
  
  5. Server.Transfer("MyErrorPage.aspx");  
    6.   
  
  
  6. //其余的非HttpUnhandledException异常交给ASP.NET自己处理就okay了 :)  
    7.   
  
  
  7. } 
    8.

Redirect会导致post－back的产生从而丢失了错误信息，所以页面导向应该直接在服务器端执行，这样就可以在错误处理页面得到出错信息并进行相应的处理

10.VB.NET常用代码清空Cookie

 
 
 
      
  
  
  1. Cookie.Expires=[DateTime];  
    2.   
  
  
  2. Response.Cookies("UserName").Expires = 0 
    3.

【编辑推荐】

  1. 剖析VB.NET平台调用是如何执行操作
  2. 分享个人总结VB.NET多线程
  3. 详细说明VB.NET变量中四点
  4. 三类十二种VB.NET数据类型全面介绍
  5. VB.NET初步知识，初学者必看

当前名称：实例VB.NET常用代码归纳总结
转载来于：http://www.mswzjz.cn/qtweb/news23/112423.html

攀枝花网站建设、攀枝花网站运维推广公司-贝锐智能，是专注品牌与效果的网络营销公司；服务项目有等

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 贝锐智能

贝锐智能技术为您推荐以下文章

虚拟主机知识

同城分类信息

不锈钢防护栏　　 　LED亮化工程　　 　成都商城网站开发　　 　绵阳主机托管　　 　手机网站建设　　 　网络推广公司　　 　眉山电信机房　　 　混凝土搅拌车　　 　网站设计　　 　凯亚自动化控制　　 　成都申请ssl证书　　 　成都食品包装设计　　 　营销型网站建设　　 　成都多线服务器托管　　 　合江网站建设　　 　成都网站建设　　 　成都网站建设哪家好　　 　成都圣月制冷　　 　成都免费自助建站　　 　成都网站制作公司