控件介绍:
Spread 8 是Farpoint公司出品的表格控件,官价格很高。 利用 Spread 可以创建功能强大的前端数据库,通过加强的可视化模式实现20亿行*20亿列记录的显示输入管理、打印报表、完成计算、输入/输出文件、分类数据、支持 OLE drag and drop,响应用户的更改要求、利用Spread3内置的12个单元类型,实现非并行单元级初始化。所有这些只需一个控件便可完成。无须匹配任何支持工具,灵活、高速,使得Spread3可以成为任何应用工具的理想辅件。Spread为程序开发人员提供了一系列方便实用的新功能。用户可由 FarPoint List Pro fpCombo控件来加强组合框单元色,支持智能鼠标。弹出式年历会显示长短日期、月份。用户可根据需要移去常规函数。当执行了非法操作,控件就会自动关闭事件。Spread完全支持VB6.0 ,VC++6.0 界面。

Read the rest of this entry

, ,

控件介绍:
此控件是Sybase旗下Tidestone公司,注册价为:5,796元。包容了桌面电子表格应用精华的Formula One控件,为开发者提供了完整而灵活的表格应用。它配备一个工作簿设计器,可以建立2D、3D图表,实现了打印预览功能。能够读写Excel7.0/97/2000文件,拥有130种工作表函数。生成的报表能够在Netscape浏览器中使用,支持多国语言及HTML语言格式。Formula One配备一个独立的网格支持数据库应用,包括一些ODBC方法进行数据库的连接,支持统一的数据传输和简单的数据绑定,能够在PowerBuilder中作为数据窗口使用。

Read the rest of this entry

,

这是精品代码,方便好用,燕尾夹经常使用,强列推荐

‘================ 此行开始加入BAS模块中==========
Option Explicit ‘此行开始加入BAS模块中
Public Type BROWSEINFO
hOwner As Long
pidlRoot As Long
pszDisplayName As String
lpszTitle As String
ulFlags As Long
lpfn As Long
lParam As Long
iImage As Long
End TypePublic Declare Function SHBrowseForFolder Lib “shell32.dll” Alias “SHBrowseForFolderA” (lpBrowseInfo As BROWSEINFO) As Long

Read the rest of this entry

将以下代码 插入主窗口的代码中: Private Sub Form_Load() Call CheckExist(Me) End Sub Public Sub CheckExist(fm As Form) Dim title As String If App.PrevInstance Then title = App.title Call MsgBox(“这程式已执行”, vbCritical) App.ti Read the rest of this entry

VB调用代码如下:只要在你的FOMR窗体里面添加如下代码即可(VB工程得添加xp.res资源文件,否则没效果). Private Declare Sub InitCommonControls Lib “comctl32.dll” () Private Sub Form_Initialize() InitCommonControl Read the rest of this entry

,