![](https://img-blog.csdnimg.cn/20201014180756926.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Vb.net
水草会武
三人行必有我师。
精诚所至,金石为开。
展开
-
.net取得本地计算机名和IP地址
.net2008 Dim ips As IPAddress() = Dns.GetHostAddresses(Dns.GetHostName) LoginInfo.UserIP = ips(0).ToString .net2003 Dim ips As IPAddress() = Dns.Reso原创 2011-09-23 13:49:29 · 758 阅读 · 0 评论 -
vb.net 向Excel模板中填充数据
''' ''' Excelを作成 ''' ''' Headerデータ ''' ''' Detailrデータ ''' ''' Excelを作成 Private Function Fn_SetExcel(ByRef dtHeader As DataTable, _原创 2012-05-18 15:00:44 · 1919 阅读 · 0 评论 -
利用MultiTouchVista模拟Windows Phone 7的多点触摸
引言 近来有消息称,WP7会在明年下半年在中国上市,这对于广大国内的爱好者来说,无疑是个杯具,一般来说,我们只能用模拟器来进行测试了。上回写到了《How-to: 利用Web Camera模拟Windows Phone 7的重力加速度传感器》,我们可以利用PC摄像头进行Windows Phone 7上的重力加速度模拟。那么,对于WM6.5以来支持的Multi-touch如何处理呢?Char转载 2012-02-07 13:36:53 · 1482 阅读 · 0 评论 -
DirectoryInfo类 按扩展名,遍历目录中所有文件
Public Shared Sub findDirectory(ByVal pDirectory As String, ByVal pAryExtension As ArrayList, ByRef pAryFileInfo As ArrayList) Try Dim directory As String = pDirectory ' 目录原创 2008-06-16 16:09:00 · 962 阅读 · 0 评论 -
vb.net2005 PictureBox生成bmp彩色图片
Private Sub drawPicture() Dim G As Graphics = PictureBox1.CreateGraphics() Dim bmp As New Bitmap(100, 30, G) G = Graphics.FromImage(bmp) Dim fontFamily As New FontFamil原创 2008-06-27 14:52:00 · 936 阅读 · 0 评论 -
asp.net2.0 mvc应用 IIS5.1服务器发布问题(整理版)
环境: XP系统 及自带的iis5.1服务器开发工具:vs2008,vb.net 插件: mvc本人利用mvc自带的vb mvc asp站点的应用创建一个工程,名为MvcSample 如果直接在Vs2008下运行,没一任何问题。但直接把asp.net mvc 部署在iis5上,会出现无法显示页面的情况,原因可能是路径映射没有起作用。会出现页面找不到错误。1.打开原创 2012-07-06 09:42:19 · 1039 阅读 · 0 评论 -
Vss2008 项目调试编译并继续功能(Debug 同时修改代码功能)(已解决)
远程登录别的电脑来开发的时候,Debug 同时修改代码功无法使用, 调试的时候,一修改代码,就出现一个消息:意思是64位的CPU 下 编译并继续功能 不能使用。 调查了一下: 1. 首先检查: 在“选项”的“编辑并继续”页中,选择或清除“启用‘编辑并继续’”复选框。 该设置将在重新启动调试会话时生效。 2.当目标为 64 位应用程序时,调试托管代码原创 2012-06-28 11:05:24 · 1127 阅读 · 0 评论 -
VB.NET中基于声卡和DirectX的虚拟仪器设计
摘要:本文在VB.NET环境中使用声卡和DirectX实现虚拟仪器的数据采集。使用DirectX技术从声卡采集数据,使用多线程技术实现数据的不间断采集,并给出了直流信号的数据采集方案。本文主要介绍系统的硬件设计、采集数据的DirectSound类、多线程和数据存储等。关键词:VB.NET;声卡;DirectX;虚拟仪器0 引言虚拟仪器是使用传感器、A/D转换芯片和计算机实现转载 2012-07-13 13:40:12 · 2405 阅读 · 0 评论 -
Vb.net2008 Direct编程(一)
Vb.net2008 Direct编程(一) 这几天用vs2008编写direct游戏,突然发现关于vs2008的direct的教程几乎没有。所以我决定——让我这个写作文不好的孩子写一份vs2008——vb.Net的direct教程,但因为作文水平一般,direct也学得不精,各位不要见笑啊~(*^__^*)嘻嘻……。 自我介绍下吧,网名:“程”风破浪(问:“真名是转载 2012-07-13 14:00:28 · 1069 阅读 · 0 评论 -
VB.NET调用Windows API函数(整理中)
1、发送Windows消息:Private Declare Auto Function SendMessage Lib "user32" Alias "SendMessageW" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As String) As Integer转载 2012-07-13 10:06:39 · 4566 阅读 · 0 评论 -
vb.net UltraChart画柱状图
Form2.Designer.vb文件 _Partial Class Form2 Inherits System.Windows.Forms.Form 'フォームがコンポーネントの一覧をクリーンアップするために dispose をオーバーライドします。 _ Protected Overrides Sub Dispose(ByVal disposin原创 2012-04-26 16:26:23 · 2328 阅读 · 0 评论 -
vb.net 或 Sqlserver 加减月份的方法
SQLserver 加0个月,并且转为yyyymm格式CONVERT(CHAR(6),DATEADD(MONTH,0,CONVERT(DATETIME,GETDATE(),111)),112)VB.net减1个月,并且转为yyyy/MM格式 Convert.ToDateTime(Utility.GetDBTime()).AddMonths(-1).ToString("yyyy/原创 2012-04-26 16:19:45 · 1718 阅读 · 1 评论 -
vb.net string转为日期 yyyyMM格式
Convert.ToDateTime(Utility.ChangeQuotation(dt.Rows(i).Item("対象月"))).ToString("yyyyMM")原创 2012-04-25 16:15:48 · 3245 阅读 · 0 评论 -
vb.net 2008 dataTable Sort()函数和Select()函数用法实例
Public Shared Function PFn_SET_次工程設定(ByRef dt工程 As DataTable) As DataTable Dim tmpDataTable As DataTable Dim strExpression As String Dim strExpressionTmp As String原创 2011-11-24 16:41:57 · 4698 阅读 · 0 评论 -
vb.net 2008 datatable 数据填充 实例
Public Shared Function PFn_TEST() As DataTable Dim tmpDataTable As DataTable Dim row As DataRow Dim dt工程 As DataTable = New DataTable() Dim column1 As DataColumn =原创 2011-11-24 16:43:11 · 924 阅读 · 0 评论 -
vb.net2008 DataTable的一行复制到新DataTable
If tmpDataTable.Columns.Count = 0 Then tmpDataTable = dt入出庫履歴.Clone() End If tmpDataTable.Rows.Add(dt入出庫履歴.Rows(0).ItemArray)原创 2011-11-28 10:17:14 · 1461 阅读 · 0 评论 -
Sqlserver2008 保存文件对象到字段中
1. 可能存储任意格式的文件 *.xls,*.doc,*.pdf,图片等2. 字段需要定义成: Image类型。需要另外一个字段保存扩展名,以变还原。3.DB模型为: Private arr印影画像() As Byte '印影画像 Public Property b印影画像() As Byte() Get原创 2011-11-08 16:30:53 · 1642 阅读 · 0 评论 -
vs.net或sqlserver安装时提示:检测到另一个程序要求计算机重新启动. (已解决)
解决方法:a. 单击开始, 选择“运行” 。 b. 在打开框中, 键入“regedit” , 然后单击“确定”以启动注册表编辑器。 c. 在注册表编辑器, 找到并单击以下注册表子项:HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\Session Managerd. 在右侧窗格中的注册表编辑器, 删除转载 2011-12-31 17:08:33 · 648 阅读 · 0 评论 -
WPF Multi-Touch 开发:基础触屏操作(Raw Touch)
WPF Multi-Touch 开发:基础触屏操作(Raw Touch)作者:Gnie 来源:博客园 时间:2010-08-18 阅读:667 次 原文链接 [收藏] 小提示:点击可切换浏览 多点触控(Multi-Touch)就是通过与触屏设备的接触达到人与应用程序交互的操作过程。例如,生活中经常使用的触屏手机、触屏笔记本、显示器以及微软最新的Surf转载 2012-02-07 17:27:08 · 1151 阅读 · 0 评论 -
VS2010安装失败 VC 9.0 Runtime (x86)
VS2010安装失败 VC 9.0 Runtime (x86)2011-11-30 22:49继续安装VS2010,结果问题,又来了,如下图:真是一波未落,一波又起啊,困难重重啊,继续寻找解决方法,找到了如下的方法:有人说:1、①原来"Windows Modules Installer" 关了,变成“手动”的了。 重启Windows Modu转载 2012-02-09 08:53:40 · 8761 阅读 · 1 评论 -
在VB.NET中实现拖放操作 DragDrop
绪论用户一般分为两类:一类习惯用键盘操作,一类习惯用鼠标操作。程序员们在编程时一般会提供快捷键或快捷方式来照顾到那些习惯键盘的用户,但是那些鼠标用户却被忽略了。因为程序员们一般都习惯用键盘,所以他们这种重视键盘操作的特点是可以理解的,但是每个程序员也应该考虑到提供鼠标支持。鼠标用户所期望的一件事就是能够在应用程序中实现拖放。如果你注意到一些大型应用程序或windows自身的话,拖放操作几乎转载 2012-02-29 17:23:15 · 4508 阅读 · 0 评论 -
VB.NET中实现Drop拖放功能
在VB.NET中实现拖放操作Implementing Drag and Drop in Visual Basic .NETSteve HoagVisual Basic® .NET TeamMicrosoft CorporationSeptember 2003摘要:这篇文章阐述了如何在VB.NET中实现拖放操作绪论Windows用户一般分为两类:一类习惯用键盘转载 2012-03-19 15:20:29 · 2372 阅读 · 0 评论 -
vb.net2008 Direct编程(三)音乐播放器——第二部分
PrivateSub Form1_Load(ByVal senderAs System.Object, ByVal eAs System.EventArgs) HandlesMyBase.Load Dim Enb_DSAs New BufferDescription Enb_DS.ControlVolume = True转载 2012-07-13 14:04:06 · 2805 阅读 · 0 评论 -
VB.NET制作特效窗体
窗体是Windows应用程序的基础。新一代的开发工具Visual Basic.Net为设计制作窗体提供了更多简单而丰富的方法,无需再求助于复杂而易错的API函数,我们就可以轻松制作多种特效窗体:1 、轻松制作透明窗体VB.NET可以轻松制作出任一透明度的窗体:我们只要在窗体的“属性”窗口中,将 Opacity 属性设置为一个介于 0.0(完全透明)与 1.0(完全不透明)之间的值就可以了:转载 2012-07-13 14:10:52 · 1373 阅读 · 0 评论 -
vb.net 逐行读取RichTextBox内容
Function Fn_ConvertVBCode() As StringBuilder Dim tmp As New StringBuilder For i As Integer = 0 To RichTextBox1.Lines.Count - 1 Dim txt As String = Me.RichTextBox1.Lines(原创 2012-08-03 16:43:13 · 5301 阅读 · 1 评论 -
vb.net WebBrowser控件使用
Public Class Form1 Dim time As Integer = 0 Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Me.WebBrowser1.Navigate("http://www.baidu.com")原创 2012-08-02 09:57:59 · 6192 阅读 · 0 评论 -
winform 显示PDF文件
C#显示PDF文件,winform打开PDF文件并在窗体中显示1.在工具箱中添加Adobe提供的ActiveX控件,如图所示:选择com组件,我用的是7.0版本打勾点确定,在控件工具栏就有了,见下图:拖一个Adobe PDF Reader控件到窗体上,双击窗体,在窗体加载时,弹出对话框,加载PDF文件:string fileName = My转载 2013-01-23 16:39:54 · 4492 阅读 · 0 评论 -
vb.net 读取和显示PDF
我下载了一个pdfbox,不怎么会用·只读到了文字·可排版很乱·图片也没有·希望老鸟们给个例子供菜鸟们学习学习·不一定用pdfbox·能显示就好·转载 2013-01-23 16:28:26 · 6221 阅读 · 1 评论 -
vb.net Adobe Reader AxAcroPDF控件常用属性(整理中)
1. Adobe Reader ActiveX功能使用 Acrobat Reader ActiveX控件可以在 Authorware应用程序中操作 PDF文件。2. Adobe Reader AstiveX的属性src:设置要打开的PDF文件名。、.3. Adobe Reader ActiveX的常用方法(Methods)□ gotOFirstPage:到第一页。转载 2013-01-23 16:45:44 · 12337 阅读 · 0 评论 -
c# pictureBox1.Image的获得图片路径的三种方法 winform
代码如下:c# pictureBox1.Image的获得图片路径的三种方法 winform1.绝对路径:this.pictureBox2.Image=Image.FromFile("D:\\001.jpg");2.相对路径:Application.StartupPath; 可以得到程序根目录 string picPath=Application.StartupPath+"\转载 2013-02-05 15:48:41 · 8544 阅读 · 1 评论 -
winForm pdf显示 转换 图片
最近弄了一个项目,需要读取本机的pdf文件并转换成图片放置到另外一个文件夹下,现在把代码分享下: 一、看看如何读取本机的pdf文件到窗体中 首先,我们下载一个pdf阅读AdbeRdr器到电脑上,最好是安装完整版的,要不然vs获得到组件 其次,我们就可以在工具箱中获取Adobe提供的Active控件了转载 2013-01-23 16:25:36 · 2188 阅读 · 0 评论 -
异常CLR 无法从COM 上下文0x1a0e50 转换为COM 上下文0x1a0fc0,这种状态已持续60 秒(解决)
CLR 无法从COM 上下文0x1a0e50 转换为COM 上下文0x1a0fc0,这种状态已持续60 秒 CLR は、COM コンテキスト 0x225a98 から COM コンテキスト 0x225c08 へ 60 秒で移行できませんでした。ターゲット コンテキストおよびアパートメントを所有するスレッドが、ポンプしない待機を行っているか、Windows のメッセージを表示しないで非常に長い转载 2013-03-23 12:45:52 · 8903 阅读 · 0 评论 -
.Net启动外部程序 .
在Win32应用程序中使用API的ShellExecute方法来启动外部应用程序;在VB可以使用Shell函数;在.Net,则使用Process类来启动外部应用程序,如果是VB.net,还可以使用Shell函数。 一、使用Process类启动外部应用程序 Process proc = New Process(); proc.StartInfo.FileName转载 2013-03-26 09:01:35 · 1397 阅读 · 0 评论 -
vb.net 通过按钮复制内容
Private Sub BtnCopy_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnCopy.Click My.Computer.Clipboard.Clear() If Me.RichTextBox2.Text.Length > 0 Then原创 2012-08-03 16:45:18 · 1451 阅读 · 0 评论 -
vb.net DataGridView指定列与DB列绑定
DataGridView上右键选择编辑列,在数据一项中找到DataPropertyName=绑定的数据中的字段名 '代码Me.UltraCheckEditorColumn1.DataPropertyName = "Column0"原创 2012-08-02 16:54:30 · 1746 阅读 · 0 评论 -
vb.net ComboBox 绑定数据字段
Dim dt As DataTable = Nothing ComMain.objDBCon = New ComDBConn dt = ComMain.objDBCon.PFn_QueryDB(Fn_GetTblInfoSQL) ‘指定值=SQL指定字段 Me.ComboBox1.ValueMember = "ROW_ID"原创 2012-08-02 17:00:06 · 5323 阅读 · 0 评论 -
Reflector 7.5.4.20注册
先输入代码:A36E-MWNR-GWHG-FK67-YH3Y-7ABA出错,选择手动链接加载下面的activation.txt文件,OKF52D-B296-9BE2-41292470A36E-MWNR-GWHG-FK67-YH3Y-7ABA10d77514-4965-4513-8691-7e82fc898118VSPro31LcQ原创 2012-07-12 16:36:28 · 1429 阅读 · 0 评论 -
VB Hook简介
文章作者:Jeffrey RichterHook这个东西有时令人又爱又怕,Hook是用来拦截系统某些讯息之用,例如说,我们想让系统不管在什麽地方只要按个Ctl-B便执行NotePad,或许您会使用Form的KeyPreview,设定为True,但在其他Process中按Ctl-B呢?那就没有用,这是就得设一个Keyboard Hook来拦截所有Key in的键;再如:MouseMove的E转载 2012-07-13 16:31:15 · 1138 阅读 · 0 评论 -
VB.NET调用Windows API函数 方法 (实例)
本例是Form中有一个按钮。点击按钮,Form的Title会显示指定的文字。 Public Class Form3 Private Declare Auto Function SendMessage Lib "user32" Alias "SendMessageW" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal原创 2012-07-13 10:04:40 · 3685 阅读 · 0 评论 -
vb.net 调式 检测到loaderlock错误 (已解决)
出错信息为: 检测到LoaderLock,正试图在OS加载程序锁内执行托管代码,不要尝试在DllMain或映像初始化函数内运行托管代码,这样会导致应用程序挂起。 解决办法: 在"Debug"菜单下----"Exceptions"----"Managed Debugging Assistants"中勾掉"LoaderLock" 说明:转载 2012-07-13 13:35:20 · 1033 阅读 · 0 评论