Visual Basic .NET处理Excel表格全接触(4)_.Net教程

教程Tag：暂无Tag,欢迎添加,赚取U币!

缂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌熼梻瀵割槮缁惧墽鎳撻—鍐偓锝庝簼閹癸綁鏌ｉ鐐搭棞闂囧鏌ㄥ┑鍡欏⒈闁搞倕顦扮换娑橆啅椤旇崵鍑归梺鍝勬噺缁诲牓寮诲☉姘勃闁绘劦鍓涘▓銈夋⒑閸涘﹥鈷掗柡浣告憸濡叉劙骞樼€涙ê顎撻梺鍦帛鐢﹥绔熼弴銏♀拻濞达絼璀﹂弨鏉棵瑰⿰搴″⒋妞ゃ垺顨婅矾闁绘稓顧€S闂傚倸鍊搁崐鎼佸磹瀹勬噴褰掑炊瑜忛弳锕傛煟閵忊懚鍦玻濡ゅ懏鐓欓柟娈垮枛椤ｅジ鏌涚€ｅ墎绡€闁哄本娲樺鍕醇濠靛棗顥欐繝鐢靛仦閸ㄦ儼褰滈梺琛″亾濞寸姴顑嗛崐鐢告煥濠靛棗鏆欏┑锛勫厴閺屾稓鈧綆鍋呭畷宀€鈧娲樼敮锟犲箖濞嗘挸钃熼柕澶堝劜閺嗩亪姊婚崒娆戭槮闁圭⒈鍋勭叅闁靛ň鏅涚壕濠氭煟閹邦喖鍔嬮柛濠傜仛閵囧嫰骞掗崱妞惧闂備礁鐤囬～澶愬垂閸ф绠栨繛鍡樻尭閻顭块懜鐬垿鏁嶆笟鈧缁樻媴鐟欏嫬浠╅梺鍛婃煥闁帮絽鐣锋导鏉戝唨鐟滄粓宕甸弴鐐╂斀闁绘ê纾。鏌ユ煛閸涱喗鍊愰柡灞诲姂閹倝宕掑☉姗嗕紦婵犵數濮烽弫鍛婃叏閻戣棄鏋侀柟闂寸绾惧鏌ｉ幇顒佹儓闁搞劌鍊块幃瑙勬姜閹峰矈鍔呭┑鐐插悑閻楃娀骞冨畡鎵虫瀻闊洦鎼╂导鈧梻浣虹帛缁诲倿鎮ユ總绋胯摕婵炴垯鍨归悞娲煕閹板吀绨存俊鎻掔墦濮婅櫣绱掑Ο璇查瀺闂佹寧娲忛崹钘夘嚕婵犳艾鐏抽柟棰佺閹垿鏌熼懖鈺勊夐柍褜鍓欑壕顓㈩敊閹达附鈷掑ù锝囨嚀閳绘洟鏌￠埀顒佹綇閳哄倹娈伴梺璺ㄥ枔婵挳鎷戦悢鍏肩厪濠电偟鍋撳▍鍡涙煕鐎ｎ亝顥㈤柡灞剧〒娴狅箓宕滆濡插牆顪冮妶鍛寸崪闁瑰嚖鎷� 缂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾剧懓顪冪€ｎ亝鎹ｉ柣顓炴閵嗘帒顫濋敐鍛闂佽姤蓱缁诲牆顫忓ú顏嶆晢闁逞屽墰缁梻鈧潧鎽滈悳缁樹繆閵堝懏鍣洪柣鎾寸懇濮婃椽顢橀妸褏鏆犳繝鈷€鍥╃暫闁哄被鍊濆鍫曞箰鎼粹€叉樊闂備礁鎼張顒勬儎椤栨稐绻嗛柣鎴犵摂閺佸﹪鏌ｉ幘鍐茬槰婵炶壈宕电槐鎾诲磼濞嗘帩鍞归梺绋款儐閹告悂鈥﹂崸妤佸殝闂傚牊绋戦～宥夋⒑缂佹ɑ灏柛鐔告尦瀵寮撮悢椋庣獮闂佸壊鍋呯换鍌炩€栨径鎰拺缂備焦岣跨粻銉ッ瑰⿰搴濋偗鐎殿喖顭烽弫鎰板川椤忓懏鏉搁梻浣告贡閸嬫挸岣垮▎鎿冩晜闁跨噦鎷� 闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾剧懓顪冪€ｎ亜顒㈡い鎰矙閺屻劑鎮㈤崫鍕戙垻鐥幆褜鐓奸柡灞剧洴瀵挳濡搁妷褉鍋撻鍕厱闁靛绲芥俊鐣岀磽瀹ュ懏鍠橀柡灞界Ч瀹曨偊宕熼锝嗩啀婵＄偑鍊х€靛矂宕规潏鈺傚床婵犻潧顑呴～鍛存煥濠靛棙顥犻柕鍡樺姍濮婃椽宕崟顓炩拡闂佸憡鎸鹃崰搴ㄦ偩瀹勬嫈鏃堝焵椤掑嫨鍋戝ù鍏兼綑闁卞洭鏌ｉ弬鎸庢儓妤犵偞鍔欏缁樻媴鐟欏嫬浠╅梺绋垮瘨閸ㄨ泛鐣峰┑鍡╁悑濠㈣泛顑呴崜顓㈡⒑绾懏褰ч梻鍕閸╂盯骞掗幋顓犲數闁荤姾娅ｇ亸銊╁礉閻旂厧鏋侀柛顐犲劜閳锋垿鏌涘┑鍡楊伂妞ゎ偓绠撻弻娑欑節閸愵亜鈪圭€光偓閿濆牆鍔电紒鐘崇☉閳藉螣濠х偓娅婇柡灞诲姂瀵噣宕掑⿰鍐偧婵＄偑鍊戦崕鑼矙閹捐埖顫曢柟鎹愵嚙绾惧吋绻涢崱妯虹仴濠碘€茬矙濮婃椽宕妷銉ょ捕濡炪値鍘鹃崗姗€鎮伴璺ㄧ杸婵炴垶鐟﹀▍銏ゆ⒑鐠恒劌娅愰柟鍑ゆ嫹闂傚倸鍊搁崐鎼佸磹閹间礁纾瑰瀣捣閻棗銆掑锝呬壕濡ょ姷鍋為悧鐘汇€侀弴銏℃櫇闁逞屽墴閹潡顢氶埀顒勫蓟閿濆憘鏃堝焵椤掑嫭鍋嬪┑鐘叉搐閻鐓崶銊р姇闁绘挻鐟х槐鎾存媴闂堟稓浠奸梺鍝勵儐缁嬫帗绌辨繝鍥ㄥ€烽柟娈垮枤閻撴捇姊洪崫鍕槵闁逞屽墯閸撴岸宕ョ€ｎ喖绠圭紒顔煎帨閸嬫捇鎳犻浣规闂傚倸鍊风粈渚€骞夐敓鐘偓鍐幢濞嗗繑鐎抽悗骞垮劚濞诧箑鐣烽崣澶岀闁瑰瓨鐟ラ悘鈺傤殽閻愵亜鐏ǎ鍥э躬椤㈡稑鈹戦幇顒侇唲闂傚倸鍊搁ˇ顖滅矓閹绢喖鐓橀柟杈惧瘜閺佸鏌涢埄鍐噮閽冮亶姊绘担鍛婂暈婵﹤缍婇妴鍐╃節閸パ勬К闂侀€炲苯澧柕鍥у楠炴帡骞嬪┑鍥╀壕婵犵數鍋涢崥瀣礉濞嗘挸钃熼柣鏃傗拡閺佸﹪鏌ゅù瀣珔闁绘挾鍠栭幃妤冩喆閸曨剛顦ㄥ┑鐐跺皺閸犳牕顕ｆ繝姘耿婵°倕锕ら幃鎴︽⒑閸涘﹣绶遍柛銊﹀▕瀹曘垽顢楅崟顑芥嫽婵炶揪缍€婵倗娑甸崼鏇熺厱闁挎繂绻掗悾鍨殽閻愯尙绠婚柡浣规崌閺佹捇鏁撻敓锟�,闂傚倸鍊搁崐鎼佸磹閹间礁纾圭€瑰嫭鍣磋ぐ鎺戠倞妞ゆ帊绀侀崜顓烆渻閵堝棗濮х紒鐘冲灩缁牏鈧綆鍋佹禍婊堟煙閹佃櫕娅呴柣蹇婃櫇閹喖顫滈埀顒€顫忕紒妯诲缂佹稑顑呭▓顓炩攽椤旀枻鍏紒鐘虫崌閺佹劙鎮欓弶鎴犵獮闁诲函缍嗛崜娑㈩敊閺囩喓绡€闁汇垽娼у瓭闂佺ǹ顑呭Λ婵嗙暦閻㈢ǹ鍗抽柕蹇ョ磿閸樺崬顪冮妶鍡楀Ё缂佹彃澧界划鍫ュ焵椤掑倻纾藉ù锝嗗絻娴滈箖姊洪崨濠傚闁哄倸鍊圭粋宥呪堪閸喓鍘搁梺绋挎湰濮樸劍绂掗姀銈嗙厵妞ゆ棁妫勯悘锕傛煏閸パ冾伂缂佺姵鐩鎾倷鐎电硶鍋撻崜褏纾藉ù锝堟鐢盯鏌ｉ埡濠傜仸闁绘侗鍠氶埀顒婄秵閸犳宕愰悜鑺ョ厸濠㈣泛顑呴悘鈺傜箾閸稑鈧繂顫忕紒妯诲闁告盯娼х紞濠囥€侀弽顓炲耿婵炴垶岣块澶愭⒑閹肩偛鍔€閻忕偛澧界粙渚€姊绘担鍛婂暈缂佽鍊婚埀顒佺殰閸パ冨殤闁瑰吋鐣崝宥夋偂濞嗘劑浜滈柡宓嫷妫為柣搴㈠嚬閸犳绮嬪澶樻晜闁割偆鍟块幏缁樼箾鏉堝墽鍒伴柟璇х節瀹曨垶鎮欓悜妯煎幗闂佺粯姊瑰ḿ娆撳礉閵堝鐓欐鐐茬仢閻忊晠鎽堕敐鍛偓鎺戭潩閻撳海浠╁┑鐐茬墑閸斿秶鎹㈠┑瀣仺闂傚牊鍒€閿濆洨妫柡澶庢硶鏁堥悗娈垮枟閻擄繝鐛弽銊﹀闁革富鍘煎鎶芥⒒娴ｈ櫣甯涙繛鍙夌墵瀹曟劙宕烽娑樹壕婵ḿ鍋撶€氾拷!

推荐：解析.NET中字符串替换的五种方法
1：使用String.Replace函数替换，但不支持大小写。 2：正则System.Text.Regex替换，用RegExpOption修改是否支持大小写。 3：在小数据的情况下，使用String.SubString和可以实现间接替

以下为引用的内容：
<System.Diagnostics.DebuggerStepThrough ( ) > Private Sub InitializeComponent ( )
Me.Label1 = New System.Windows.Forms.Label
Me.Label2 = New System.Windows.Forms.Label
Me.Label3 = New System.Windows.Forms.Label
Me.Label4 = New System.Windows.Forms.Label
Me.Label5 = New System.Windows.Forms.Label
Me.TextBox1 = New System.Windows.Forms.TextBox
Me.TextBox2 = New System.Windows.Forms.TextBox
Me.TextBox3 = New System.Windows.Forms.TextBox
Me.TextBox5 = New System.Windows.Forms.TextBox
Me.Button1 = New System.Windows.Forms.Button
Me.TextBox4 = New System.Windows.Forms.TextBox
Me.SuspendLayout ( )
Me.Label1.Location = New System.Drawing.Point ( 40 , 28 )
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size ( 114 , 23 )
Me.Label1.TabIndex = 0
Me.Label1.Text = "数据库服务器名："
Me.Label2.Location = New System.Drawing.Point ( 64 , 59 )
Me.Label2.Name = "Label2"
Me.Label2.TabIndex = 1
Me.Label2.Text = "数据库名称："
Me.Label3.Location = New System.Drawing.Point ( 64 , 90 )
Me.Label3.Name = "Label3"
Me.Label3.TabIndex = 2
Me.Label3.Text = "数据表名称："
Me.Label4.Location = New System.Drawing.Point ( 88 , 121 )
Me.Label4.Name = "Label4"
Me.Label4.TabIndex = 3
Me.Label4.Text = "用户名："
Me.Label5.Location = New System.Drawing.Point ( 98 , 152 )
Me.Label5.Name = "Label5"
Me.Label5.TabIndex = 4
Me.Label5.Text = "口令："
Me.TextBox1.Location = New System.Drawing.Point ( 160 , 26 )
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size ( 148 , 21 )
Me.TextBox1.TabIndex = 5
Me.TextBox1.Text = ""
Me.TextBox2.Location = New System.Drawing.Point ( 160 , 56 )
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Size = New System.Drawing.Size ( 148 , 21 )
Me.TextBox2.TabIndex = 6
Me.TextBox2.Text = ""
Me.TextBox3.Location = New System.Drawing.Point ( 160 , 86 )
Me.TextBox3.Name = "TextBox3"
Me.TextBox3.Size = New System.Drawing.Size ( 148 , 21 )
Me.TextBox3.TabIndex = 7
Me.TextBox3.Text = ""
Me.TextBox5.Location = New System.Drawing.Point ( 160 , 146 )
Me.TextBox5.Name = "TextBox5"
Me.TextBox5.PasswordChar = Microsoft.VisualBasic.ChrW ( 42 )
Me.TextBox5.Size = New System.Drawing.Size ( 148 , 21 )
Me.TextBox5.TabIndex = 9
Me.TextBox5.Text = ""
Me.Button1.Location = New System.Drawing.Point ( 120 , 198 )
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size ( 126 , 36 )
Me.Button1.TabIndex = 10
Me.Button1.Text = "导出Excle表格"
Me.TextBox4.Location = New System.Drawing.Point ( 160 , 116 )
Me.TextBox4.Name = "TextBox4"
Me.TextBox4.Size = New System.Drawing.Size ( 148 , 21 )
Me.TextBox4.TabIndex = 8
Me.TextBox4.Text = ""
Me.AutoScaleBaseSize = New System.Drawing.Size ( 6 , 14 )
Me.ClientSize = New System.Drawing.Size ( 374 , 271 )
Me.Controls.Add ( Me.Button1 )
Me.Controls.Add ( Me.TextBox5 )
Me.Controls.Add ( Me.TextBox4 )
Me.Controls.Add ( Me.TextBox3 )
Me.Controls.Add ( Me.TextBox2 )
Me.Controls.Add ( Me.TextBox1 )
Me.Controls.Add ( Me.Label5 )
Me.Controls.Add ( Me.Label4 )
Me.Controls.Add ( Me.Label3 )
Me.Controls.Add ( Me.Label2 )
Me.Controls.Add ( Me.Label1 )
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.MaximizeBox = False
Me.Name = "Form1"
Me.Text = "Visual Basic .Net导入数据库数据到Excel表格"
Me.ResumeLayout ( False )
End Sub

分享：.NET教程之--.NET动态创建类的实例解析
看了网上很多关于DotNet动态创建类的实例的文章，我这里想总结一下，其实方法很简单，就是用“Activator.CreateInstance”。但是这个方法需要待创建的类的Type作为参数，为了获

ASP.NET视频教程

北大青鸟ASP.NET编程视频教程

ASP.NET一夜速成视频教程

ASP.NET语音视频教学

21天学通ASP.NET40小时多媒体语音视频教学DVD

ASP.NET3.5从入门到精通视频

.NET教学视频免费下载

asp.net夜话教学视频【完】

来源：模板无忧/所属分类：.Net教程/更新时间：2009-09-03

[收藏][报错][返回列表]

Visual Basic .NET处理Excel表格全接触(4)_.Net教程

ASP.NET视频教程

.Net教程Rss订阅编程教程搜索

.Net教程推荐

猜你也喜欢看这些