博客园-天道酬勤http://www.cnblogs.com/buhaiqing/天道酬勤zh-cnThu, 08 Jan 2009 03:04:42 GMTThu, 08 Jan 2009 03:04:42 GMT60VB 9.0 和C# 3.0比较http://www.cnblogs.com/buhaiqing/archive/2009/01/08/1371630.html卜海清卜海清Thu, 08 Jan 2009 02:14:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2009/01/08/1371630.htmlhttp://www.cnblogs.com/buhaiqing/comments/1371630.htmlhttp://www.cnblogs.com/buhaiqing/archive/2009/01/08/1371630.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1371630.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1371630.htmlVB和C#是大家在.net平台上编程的主要语言,它们在最新的VS2008都有如些相同和不同的新功能点呢??

csharp3_vb9

 

如果大家对VS2010里提供的C#4.0和VB10感兴趣的话可以去MS网站上去下载介绍文档

C# 4.0 future: http://code.msdn.microsoft.com/csharpfuture

VB10 future: http://code.msdn.microsoft.com/vbfuture

 

希望对大家的学习有帮助!! 欢迎交流!



--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：微软周五发布Windows 7 Beta 1 向公众开放
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>VB futurehttp://www.cnblogs.com/buhaiqing/archive/2008/12/31/1366192.html卜海清卜海清Wed, 31 Dec 2008 08:30:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2008/12/31/1366192.htmlhttp://www.cnblogs.com/buhaiqing/comments/1366192.htmlhttp://www.cnblogs.com/buhaiqing/archive/2008/12/31/1366192.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1366192.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1366192.htmlNew features in Visual Basic 10VB10里会有哪些新功能呢?

今天在codeplex 网站看到了一个介绍VB10新功能的文档.（http://code.msdn.microsoft.com/vbfuture）

下来研究了一下.VB10和VB9比起来没有太多的亮点,只是对实用性方面作了一些改进.

像 Auto-implemented properties, Multiline lambada功能早该在VB9就实现的。

 

关注VB，希望以后的版本里能有更多更好的功能出来。 呵呵！！



--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：硅谷财团欲收购雅虎 搜索业务将转卖给微软
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>Static Code Analysis Introductionhttp://www.cnblogs.com/buhaiqing/archive/2008/12/31/1365855.html卜海清卜海清Wed, 31 Dec 2008 01:51:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2008/12/31/1365855.htmlhttp://www.cnblogs.com/buhaiqing/comments/1365855.htmlhttp://www.cnblogs.com/buhaiqing/archive/2008/12/31/1365855.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1365855.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1365855.html最近一直有在收集测试相关的资料。因为最近从老板那得知可能在下一个项目里自己作PM。所以自己也有意在这方面多学一些。

最近自己在头脑风暴里就是想如何能作好管理。作了这么多年技术，当然不能放弃，要想想如何能好好利用这一特长！！ :)

今天就分享一段视频：

http://vstsrocks.net/files/26/code_analysis/default.aspx

 

希望对大家有用！！欢迎交流！



--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：硅谷财团欲收购雅虎 搜索业务将转卖给微软
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>Office VBA进阶（五）：如何让EXCEL工作簿在浏览器里显示http://www.cnblogs.com/buhaiqing/archive/2008/12/12/1353414.html卜海清卜海清Fri, 12 Dec 2008 01:01:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2008/12/12/1353414.htmlhttp://www.cnblogs.com/buhaiqing/comments/1353414.htmlhttp://www.cnblogs.com/buhaiqing/archive/2008/12/12/1353414.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1353414.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1353414.html其实很简单，就是利用WorkBook的WebPagePreview函数

 

Sub test()
 ThisWorkbook.WebPagePreview
End Sub

 

 

 



--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：联想集团宣布全球裁员2500人
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>Did you know… You can keep recently-used files from falling off the File Tab Channel?http://www.cnblogs.com/buhaiqing/archive/2008/12/01/1344753.html卜海清卜海清Mon, 01 Dec 2008 03:04:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2008/12/01/1344753.htmlhttp://www.cnblogs.com/buhaiqing/comments/1344753.htmlhttp://www.cnblogs.com/buhaiqing/archive/2008/12/01/1344753.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1344753.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1344753.html如果你想在你的Visual Studio里的File Tab里依次显示最近浏览的文件。具体可以参考下面的一文

 

 

http://blogs.msdn.com/saraford/archive/2008/10/09/did-you-know-you-can-keep-recently-used-files-from-falling-off-the-file-tab-channel-331.aspx 

 

 

 



--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：Intel公布初步财报 收入大减近四分之一
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>WebPartManager的一个问题http://www.cnblogs.com/buhaiqing/archive/2008/11/27/1342234.html卜海清卜海清Thu, 27 Nov 2008 05:59:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2008/11/27/1342234.htmlhttp://www.cnblogs.com/buhaiqing/comments/1342234.htmlhttp://www.cnblogs.com/buhaiqing/archive/2008/11/27/1342234.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1342234.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1342234.html今天想写一个WebSite程序，在其中加入了一个WebPartManager控件，想玩一下。

结果怎么也跑不起来。

总是说：

A network-related or instance-specific error occurred while establishing a connection to SQL Server. The server was not found or was not accessible. Verify that the instance name is correct and that SQL Server is configured to allow remote connections. (provider: SQL Network Interfaces, error: 26 - Error Locating Server/Instance Specified)



搞得我莫名其妙的。Google了好久才知道了原因， 都是WebPartManager里的Personalization属性搞的鬼。缺省它是被设置成TRUE的。启动时候会去找一个数据库实例。

我机器上没有这个数据库实例，所以会失败。


具体的还可以参考 这里。


看来对Web编程还是不熟啊！！ 努力！！ 

 



--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：Facebook用户1.5亿 堪称全球第八人口大国
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>Office VBA进阶（四）：如何在Access里创建一个Reporthttp://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340699.html卜海清卜海清Tue, 25 Nov 2008 07:44:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340699.htmlhttp://www.cnblogs.com/buhaiqing/comments/1340699.htmlhttp://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340699.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1340699.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1340699.html如何能用VBA创建一个Report对象呢？ 

Sub testreport()
  Dim rp As Access.Report
  
  Set rp = CreateReport
  With rp
  .Caption = "test report"
  End With
End Sub

 

其中的CreateReport函数就是Access集成的建Report的函数。

Enjoy! 

 



--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：国内3G牌照正式发放 三运营商分获三张牌照
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>Office VBA进阶（三）：如何合并Access里的多张表http://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340596.html卜海清卜海清Tue, 25 Nov 2008 05:24:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340596.htmlhttp://www.cnblogs.com/buhaiqing/comments/1340596.htmlhttp://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340596.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1340596.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1340596.html在上节已经讲述了把多个Excel文件导入到Access 2007里来，现在是把把生成的这些表里的数据合并到一个表里去，假设这表的名字叫aa.

导入的表名有两个1和2

下面是代码示例：

  Dim query As QueryDef
  Set query = CurrentDb.QueryDefs(0)
   
  query.SQL = "INSERT INTO aa SELECT * FROM 1;"
  query.Execute
 
  query.SQL = "INSERT INTO aa SELECT * FROM 2;"
  query.Execute

 


怎么样，还是挺简单的吧！！！

Enjoy! 

 

 



--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：国内3G牌照正式发放 三运营商分获三张牌照
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>Office VBA进阶（二）：如何在Access 2007里导入一个Excel sheet表http://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340540.html卜海清卜海清Tue, 25 Nov 2008 04:02:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340540.htmlhttp://www.cnblogs.com/buhaiqing/comments/1340540.htmlhttp://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340540.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1340540.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1340540.html今天一个同事问我怎么样可以快速合并多个Excel的Workbook文件。 她把那些文件放在了一个目录下，每个Excel表格里没有太复杂的数据，

或是说想要合并的Sheet页没有太复杂的数据格式（我指的是数据透视图，数据透视表，smartArt图形等）。让我帮她想想办法。



我的解决方案如下：

（1）遍历该目录，得到要合并的各个Excel文件路径。（这个在前一章节里讲解过了，不清楚的请参看这里)

（2）批量导入成Access对并的一张表。（这个是本节要讲述的,之后还会讲解VB.NET版本）

（3）在Access里合并成一张表

（4）方向导出到一个Excel表格里。（这个在Access的Ribbon Toolbar里直接操作就可以，我就不多废话了）


好的，言归正传，开始这节的内容。 

要实现在Access里导入一个Excel表格可以如何作呢？大致步骤如下：

（1）新建一个Access 2007文档，打开选中“External Data”的Tab

import Excel Sheet into Access

 (2)点选Excel，一步步就可以导入一个Excel WorkBook的Sheet表了。


但是要是遇到有许许多多这样的Excel文件需要导入时，这个也是挺麻烦的。

很自然得你会想到，能不能用Access的VBA宏来实现这样的功能呢？　答案当然：Yes.

=================================

这需要用到Access里的DoCmd对象。DoCmd里有一个TransferSpreadsheet函数就能完成这个功能。

我把示例代码贴出来：

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, sheetname, filename,True

 

如果你的Excel表格里的第一行是Title，最后一个参数就使用True,缺省是False.

 Access帮你把什么事都作了，省去了你去建立Connection的步骤，不然还要用ADO操作，太麻烦了，对初学者太深奥咯！

怎么样，很简单吧，但我得说，很小但很强大。　哈哈！！

Enjoy! 




--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：国内3G牌照正式发放 三运营商分获三张牌照
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>Office VBA进阶（－）:遍历目录http://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340419.html卜海清卜海清Tue, 25 Nov 2008 02:16:00 GMThttp://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340419.htmlhttp://www.cnblogs.com/buhaiqing/comments/1340419.htmlhttp://www.cnblogs.com/buhaiqing/archive/2008/11/25/1340419.html#Feedback0http://www.cnblogs.com/buhaiqing/comments/commentRss/1340419.htmlhttp://www.cnblogs.com/buhaiqing/services/trackbacks/1340419.html今天想讲解如何用ＶＢＡ宏得到一个目录下以某个后缀名结尾的文件。

这要用到一个叫Dir的函数：

第一个参数就是所要遍历的目录路径，第二个参数是可选的，就是不是必要的。它是罗列了一些查找的属性

Syntax

Dir[(pathname [, attributes] )]

 

还是举个例子说说吧，现在我想得到C:\test\demo目录下的所有Excel 文件该如何作呢？


Sub SearchFolder(mypath As String, szExtension As String)
 
 ' Add a slash at the end of the path if needed.
    If Right(mypath, 1) <> "\" Then
         mypath = mypath & "\"
    End If
    
    
  ' If there are no Excel files in the folder, exit.
    FilesInPath = Dir(mypath & szExtension)
    If FilesInPath = "" Then
        MsgBox "No files found"
        Exit Sub
    End If

    ' Fill the myFiles array with the list of Excel files
    ' in the search folder.
    FNum = 0
    Do While FilesInPath <> ""
        FNum = FNum + 1
        ReDim Preserve MyFiles(1 To FNum)
        MyFiles(FNum) = FilesInPath
        FilesInPath = Dir()
    Loop
End Sub
 

 



--------------------------
盛大招聘.Net开发工程师
经典好书：.NET框架程序设计（修订版）
新闻：国内3G牌照正式发放 三运营商分获三张牌照
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看]]>