相关分类: Java技术 C/C++ VB delphi
  • 树视TreeView树视的使用技巧

    1、为树状浏览器控件添加节点和子节点 用ADD方法添加一个新节点到树状浏览器的NODES集合时,可以声明它是和已存在的节点所联系起来的。通常使用ADD方法,其语法如下: Nodes.Add(relative,[relationship][,key][,text][,image][,selectedimage]) 各个参数的意义如下:...

    2018-06-17 17:14:48

  • VisualBasic让一个Form出现在另一个非MDIForm的Form中

    假设要将Form2放在Form1中,请在宣告区中宣告: DeclareFunctionSetParentLib"user32"(ByValhWndChildAsLong,ByValhWndNewParentAsLong)AsLong 在Form2中的Form_Load中加入SetParent(Me.hWnd,Form1.hWnd)即可。 但有一点要注意的是,在UnloadForm1之前一定要先UnloadFo...

    2018-06-17 17:14:43

  • 利用VB访问Internet

    当前,有许多构造模块可以帮助用户创建名为超客户端(richclient)的Internet应用,其中包括VisualBasic(以下简称VB)的ActiveX控件集合。它们可以提供SMTP和POP邮件服务、FTP、Newsgroup和Web访问等功能。另外,利用OLE也可以实现Web访问的自动化。本文向大家介绍这两种方法...

    2018-06-17 17:14:45

  • SQL的基本操作(3.表的相关操作)

    1.创建表 (1)用CreateTable命令创建表 语法: CreateTabletabl_name ({ }column_nameAscomputed_column_expression } }[,...n] ) [On{fiegroup|Default}] [Textimage_On{fiegroup|Default}] 例子: 打开cust数据库,创建一个表,该表包含了学生的有关信息,即有学号、...

    2018-06-17 17:14:43

  • 理解面向对象编程

    一、什么是对象 学好VB的诀窍之一就是要以“对象”的眼光去看待整个程序设计。“对象”是面向对象程序设计的核心,明确这个概念对理解面向对象程序设计来说至关重要。那么,对象是什么?在程序中怎么没有看到对象呢? 其实对象在VB的程序设计中的地位,就像空气一样无...

    2018-06-17 17:14:43

  • 翻转一个字符串

    下面的函数利用递归原理获得字符串的翻转字符串 Functionreversestring(revstrAsString)AsString 'revstr:要翻转的字符串 '返回值:翻转后的字符串 DimdoreverseAsLong reversestring="" Fordoreverse=Len(revstr)To1Step-1 reversestring=reversestringMid$(revstr,dor...

    2018-06-17 17:14:42

  • VB在ACADWIN中的使用

    AutoCAD是一个常用工业绘图平台,用户在使用时经常要用Lisp或ADS进行二次开发,但Lisp处理数据库能力差,编制界面困难,而ADS要求较高.相比之下,VisualBasic(以下简称VB)编写独立程序的速度快,编制界面容易,可进行快速计算,可操作数据库。ACADWIN是AUTOCAD的Windows版...

    2018-06-17 17:14:39

  • 巧截字符串(探讨用InStrRev函数配合Right/Left函数截

    VB的Right函数、Left函数提供了从左或从右在已知字符串中截取指定数量的未知字符串的功能,不过要获取某个特定字符前面或者后面的字符串,情形就不一样了,比如我们要在字符串"E:\MyFavourite\001\xxx.xxx"中截取最后一个"\"后面的字符串亦即文件名,单单用上述几个函...

    2018-06-17 17:14:39

  • VisualBasic的工程限制

    一个单项工程可以包含多达32,000个标识符(非保留字),它们包括(但不限于)窗体、控件、模块、变量、常量、过程、函数和对象。注意,实际的标识符数受可用内存的限制。 VisualBasic中的变量名不多于255个字符,而窗体、控件、模块和类名不多于40个字符。VisualBasic不...

    2018-06-17 17:14:38

  • 用ParamArray接收任意个参数

    ->PublicSubFillList(ListControlAsListBox,ParamArrayItems()) DimiAsVariant WithListControl .Clear ForEachiInItems .AddItemi Next EndWith EndSub PrivateSubCommand1_Click() FillListList1,"TiffanyT","MikeS","RochesterNY" EndSub-> ->...

    2018-06-17 17:14:37

2