VB语言

本类阅读TOP10

·Visual Basic 安装程序的制作!!
·VB中使用EXCEL输出
·一个简单的MP3播放器
·VB程序实现WindowsXP效果的界面!!
·VB打造超酷个性化菜单(六)
·透明位图
·平铺与拉伸MDI窗口的背景图 ~!~
·对《VB程序实现WindowsXP效果的界面》一文的补遗
·从Windows资源管理器中拖动文件
·VB打造超酷个性化菜单(一)

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
汉化ActiveReports 2.0界面

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

用法很简单:在要显示ActiveReports窗体前,加入:
Creport ActiveReport1   'ActiveReport1是AR的窗体。

Public Sub Creport(AReport As ActiveReport)
'汉化ActiveReport
'以下适用2.0
With AReport
  .ToolBar.Tools.Item(0).Tooltip = "各页目录"
  .ToolBar.Tools.Item(2).Caption = "打印..."
  .ToolBar.Tools.Item(2).Tooltip = "打印报表"
  .ToolBar.Tools.Item(4).Tooltip = "拷贝"
  .ToolBar.Tools.Item(6).Tooltip = "查找"
  .ToolBar.Tools.Item(8).Tooltip = "单页显示"
  .ToolBar.Tools.Item(9).Tooltip = "多页显示"
  .ToolBar.Tools.Item(11).Tooltip = "缩小"
  .ToolBar.Tools.Item(12).Tooltip = "放大"
  .ToolBar.Tools.Item(15).Tooltip = "上一页"
  .ToolBar.Tools.Item(16).Tooltip = "下一页"
  .ToolBar.Tools.Item(19).Tooltip = "后退"
  .ToolBar.Tools.Item(19).Caption = "后退"
  .ToolBar.Tools.Item(20).Tooltip = "前进"
  .ToolBar.Tools.Item(20).Caption = "前进"
 End With
End Sub




相关文章

相关软件