- 博客(12)
- 资源 (3)
- 收藏
- 关注
RSS订阅原创 .NET利用多线程的小问题
实在没时间来写优快云这些，大家有什么要帮助或讨论的就留言吧。 若你的程序利用了多线程技术，在单核CPU上运行正常，在多核CPU机器上出现问题 那么你这样做： 一句话：使用静态方法！避免使用实例方法 这可以解决一些问题，但是不是所有。有什么具体问题有需要就留言吧。
2008-11-02 00:37:00
402
原创 将多个文件写到一个文件(并合文件)，也可从该并合文件中获得其中某个文件的流（具体不多写了，压缩功能未加进，有兴趣留言）
Imports System.IOImports System.Runtime.InteropServicesImports System.ComponentModelPublic Class Form1 Dim cfm As New CoalescentFileManager Private Sub Form1_Load(ByVal sender As
2008-11-02 00:28:00
703
原创 VB.NET趣像
Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim a As Form = aa.tt.f Dim b As Form = aa.f End Sub
2008-03-05 21:30:00
364
原创 排序问题
Enum SortOrder 上升排列,重元素下轻元素上 Ascending 下降排列,轻上重下 Descending End Enum Sub BubbleSort
2008-03-05 13:06:00
321
原创 VB2008 new features preview
VB2008 new features preview 1.LINQ(用以支撑语言集成查询)2.局部变量类型推测 3.对象初始化器和匿名类型 4.嵌套函数和Lambda函数 (嵌套函数在正式发布的版本中未实现)5.扩展方法 6.查询包含 7.XML字面量 8.XML后期绑定
2008-02-11 13:36:00
334
原创 LINQ示例
Imports System.IOImports System.ReflectionPublic Class Form1Class Form1 Public Sub Linq107()Sub Linq107() Randomize() Dim y = Year(Now) Dim m = Month(Now) Randomly pi
2008-01-28 14:36:00
377
原创 播放GIF动画
Imports SystemImports System.DrawingImports System.Windows.FormsPublic Class Form1ClassClass Form1Class Form1 创建图片对象 Private animatedImage As New Bitmap ("C:ani.gif") Private currently
2008-01-17 01:37:00
460
原创 文件路径的正则表达式改啊改的
去regexlib上找了一下关于文件路径的写法，最符合的找到一个，写法如下：([a-zA-Z]/:)(//[^///:*?但使用的时候还是出现了磁盘上文件名并不能捕获的问题，原因是在网上下的mp3文件常常会出现这样的名字xxx .mp3，到了磁盘上就成这样 c:/xxx .mp3;也就是在点号和文件名之间出现个空格，于是我针对此情况改进了表达式：([a-zA-Z]/:)("|]*)
2008-01-11 20:04:00
3115
5
原创 vb2005对图片放大方法的实现
Function FixBitmapSize()Function FixBitmapSize(ByVal b As Bitmap, ByVal scale As Byte) As Bitmap 创建倍数表-------- Dim jishubiao() As Integer Dim dimension As Integer = Math.
2008-01-11 19:46:00
683
1
原创 获得引用程序集的路径
创建一个Windows Application 接受其默认名称WindowsApplication1若想获得WindowsApplication1的所在目录，可以用以下方法：应用程序域：AppDomain.CurrentDomain.BaseDirectory => E:/WindowsApplication1/WindowsApplication1/bin/Debug/ 环境变
2007-12-02 16:39:00
729
原创 在vb6中检测Internet是否连接
有关的API声明和定义Private Declare Function RasEnumConnections Lib "RasApi32.dll" Alias "RasEnumConnectionsA" (lpRasCon As Any, lpcb As Long, lpcConnections As Long) As LongPrivate Declare Function RasGetC
2007-11-29 20:33:00
2216
原创 VS2005中获得控件图象
VB 2005Imports System.Runtime.InteropServices Public Function GetControlBitmap()Function GetControlBitmap(ByVal c As Control, ByVal targetBounds As Rectangle) As Drawing.Bitmap If (((tar
2007-11-24 06:30:00
600
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人