拓文网络 → 文章系统 → .NET编程 → VB.NET

2007-01-09

9

· VB外接程序的设计一,得到VB的控制权首先,外接,故名思意,当然必须是要和vb一起启动!在新建一外接工程后.新工程中设计器中有 Conncet.Dsr有这一元件,元件中有最为关键的一个事件 Private Sub AddinInstance_OnConnection(ByVal Application As Object, ByVal ConnectMode As AddInDesignerObject...

TEA算法的VB实现代码

2007-01-09

8

· 前些日子不少人都要挂QQ,有客户需求就自然有人去研究,所以不少人开始研究QQ的协议.其中最重要的一步就是研究QQ使用的加密算法---TEA算法关于TEA算法的描述以及C语言源码这里就不多说了,现在给出该算法的VB实现 ' --------------------------------------------------------------------...

显示自定义动画鼠标或彩色图标(VB.net)

2007-01-09

11

· '//'//显示自定义动画鼠标或彩色图标'//根据【孟子E章】的专栏C#代码 http://blog.csdn.net/net_lover/archive/2004/10/22/146575.aspx'// 'Imports System.Runtime.InteropServicesImports System.ReflectionPublic Class Form1 Inherits System.Windows.Forms.Form #Region " Windows 窗...

学习编写《连连看》项目

2007-01-09

14

· 具体目的： 1、从VB6转型到VB.net，尽快熟识VB.net的语法和VS.net（VS.net2003）的开发环境。 2、学习更多关于ADO.net的使用。 3、了解“连连看”的寻道算法。 4、把一些VB6的类转去到VB.net中去，从而学习更多.net知识。 5、学习更多.net类库。总结： 1、基本上熟识VB.n...

颜色下拉COMBOBOX控件(vb.net)

2007-01-09

13

· 前不久，有位朋友发帖，寻求颜色选择的COMBOBOX 的制作方法，经过试验，整理了出来，仅供参考。（注：如有引用，请注明出处和作者） --闵峰（2005/08/0...

VB中获取指定打印机的各种纸张类型及大小

2007-01-09

13

· 放入一个MSFlexGrid，名称为fgd1，列数为4 'Option ExplicitPrivate Const DC_MAXEXTENT = 5Private Const DC_MINEXTENT = 4Private Const DC_PAPERNAMES = 16Private Const DC_PAPERS = 2Private Const DC_PAPERSIZE = 3Private Declare Function DeviceCapabilities Lib "winspool.drv" Alia...

VB.Net编程入门之Hello World(二)

2007-01-09

3

· 三.Visual Basic .Net开发利器Visual Studio .Net简介：　　微软公司提供了四个不同的Visual Studio .Net版本，分别是：企业级结构设计版、企业级开发版、专业版和学院版。其中学院版主要是为在校大学生学习Visual Studio.Net准备的，它又分成三个独立的版本：Visual C＃标准版、Visual Basic ...

listview控件显示文件夹

2006-02-25

83

·Public Sub ShowFiles(ByVal strDirectory As String) livPc.BackColor = System.Drawing.SystemColors.ControlLightLight ' Save the directory name as a field. Me.strDirectory = strDirectory livPc.Items.Clear() Dim diDirectories As New DirectoryInf...

用listview显示数据库内某个表的全部内容

2006-02-25

81

·Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim connStr, selectCmd As String, i As Integer connStr = "Server=...; database=...; uid=...; pwd=...;" selectCmd = "SELECT * FROM ..." Dim conn A...

窗体随鼠标一起移动

2006-02-25

24

·Public Class Form1 　Inherits System.Windows.Forms.Form 　Private mouse_offset As Point 　Private Sub form1_MouseDown(ByVal sender As Object, _ ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown 　　mous...

vb.net 中MDI子窗体对其父窗体属性的

2006-02-25

39

· 兄弟前些日子做项目，第一次使用vb.net，碰上不少问题，相信很多初学者多多少少都会遇到这些问题，为了初学者学习方便，小弟总结了一些小经验，供大家参考讨论。第一篇：如何在MDI子窗体中控制父窗体的属性等等功能：比如打开一个子窗体后，就要设置父窗体中的某个菜单项或者按钮为不可见状...

vb.net 防止MDI子窗体被多次实例化的四种方法

2006-02-25

52

·自从.net把每个设计form都当作一个类来处理后，相信很多习惯了vb6.0的兄弟姐妹们，一时半会还真不适应，可能会出现莫名其妙的问题，本篇为在下《.net环境下开发》的第二篇，如何防止窗体被多次实例化。问题发现方法：一个菜单项显示一个非模化form，连续点击两次，就会同时显示两个实体。本篇文章...