﻿<?xml version="1.0" encoding="utf-8" standalone="yes"?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:trackback="http://madskills.com/public/xml/rss/module/trackback/" xmlns:wfw="http://wellformedweb.org/CommentAPI/" xmlns:slash="http://purl.org/rss/1.0/modules/slash/"><channel><title>IT博客-疾风随影-随笔分类-VB2005 column </title><link>http://www.cnitblog.com/stjie/category/5612.html</link><description /><language>zh-cn</language><lastBuildDate>Fri, 07 Oct 2011 08:45:42 GMT</lastBuildDate><pubDate>Fri, 07 Oct 2011 08:45:42 GMT</pubDate><ttl>60</ttl><item><title>在VB.net中编译生成dll文件方法</title><link>http://www.cnitblog.com/stjie/archive/2007/06/20/28826.html</link><dc:creator>疾风随影</dc:creator><author>疾风随影</author><pubDate>Wed, 20 Jun 2007 04:27:00 GMT</pubDate><guid>http://www.cnitblog.com/stjie/archive/2007/06/20/28826.html</guid><wfw:comment>http://www.cnitblog.com/stjie/comments/28826.html</wfw:comment><comments>http://www.cnitblog.com/stjie/archive/2007/06/20/28826.html#Feedback</comments><slash:comments>1</slash:comments><wfw:commentRss>http://www.cnitblog.com/stjie/comments/commentRss/28826.html</wfw:commentRss><trackback:ping>http://www.cnitblog.com/stjie/services/trackbacks/28826.html</trackback:ping><description><![CDATA[1.右击解决方案中的项目名称，选属性-&gt;输出类型改为:类库。 &nbsp; (由于默认为输入应用程序，所以这里要改一下输出类型) &nbsp; <br>&nbsp; 2.按Ctrl+Shift+B &nbsp; <br>&nbsp; 3.到项目下的bin目录下面的debug或release下面就可以找到刚生成的DLL &nbsp; <br>&nbsp; &nbsp; <br>&nbsp; &nbsp; <br>&nbsp; 应用: &nbsp; <br>&nbsp; 右击引用-》"添加引用"-&gt;浏览-&gt;找到刚生成的DLL.点OK即可<br><br>用vbc.exe编译的话，命令是：vbc &nbsp; /t:library &nbsp; /r:System.dll &nbsp; /r:System.Web.dll &nbsp; /out:Test.dll &nbsp; Test.vb
<img src ="http://www.cnitblog.com/stjie/aggbug/28826.html" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://www.cnitblog.com/stjie/" target="_blank">疾风随影</a> 2007-06-20 12:27 <a href="http://www.cnitblog.com/stjie/archive/2007/06/20/28826.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>清除Form中所有TextBox的文本</title><link>http://www.cnitblog.com/stjie/archive/2007/06/19/28760.html</link><dc:creator>疾风随影</dc:creator><author>疾风随影</author><pubDate>Tue, 19 Jun 2007 09:15:00 GMT</pubDate><guid>http://www.cnitblog.com/stjie/archive/2007/06/19/28760.html</guid><wfw:comment>http://www.cnitblog.com/stjie/comments/28760.html</wfw:comment><comments>http://www.cnitblog.com/stjie/archive/2007/06/19/28760.html#Feedback</comments><slash:comments>2</slash:comments><wfw:commentRss>http://www.cnitblog.com/stjie/comments/commentRss/28760.html</wfw:commentRss><trackback:ping>http://www.cnitblog.com/stjie/services/trackbacks/28760.html</trackback:ping><description><![CDATA['Clear All the TextBox<br>&nbsp;&nbsp;&nbsp; Public Sub ClearTextBoxse()<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim mycontrol As Control<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim i As Integer<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; For i = 0 To Controls.Count - 1<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; mycontrol = Controls(i)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If (TypeOf mycontrol Is TextBox) Then<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; mycontrol.Text = ""<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Next<br>&nbsp;&nbsp;&nbsp; End Sub
<img src ="http://www.cnitblog.com/stjie/aggbug/28760.html" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://www.cnitblog.com/stjie/" target="_blank">疾风随影</a> 2007-06-19 17:15 <a href="http://www.cnitblog.com/stjie/archive/2007/06/19/28760.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item></channel></rss>