开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 交通/航空行业 > 查看源码
frmDocument.frm
资源名称：2005.rar　[点击查看]
上传用户：salesll
上传日期：2014-07-25
资源大小：2665k
文件大小：1k
源码类别：

交通/航空行业

开发平台：

Others

frmDocument.frm：源码内容
  1. VERSION 5.00
  2. Object = "{3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0"; "richtx32.ocx"
  3. Begin VB.Form frmDocument 
  4.    Caption         =   "shuju "
  5.    ClientHeight    =   3120
  6.    ClientLeft      =   60
  7.    ClientTop       =   420
  8.    ClientWidth     =   4680
  9.    LinkTopic       =   "Form1"
  10.    MDIChild        =   -1  'True
  11.    ScaleHeight     =   3120
  12.    ScaleWidth      =   4680
  13.    Begin RichTextLib.RichTextBox rtfText 
  14.       Height          =   2000
  15.       Left            =   100
  16.       TabIndex        =   0
  17.       Top             =   100
  18.       Width           =   3000
  19.       _ExtentX        =   5292
  20.       _ExtentY        =   3519
  21.       _Version        =   393217
  22.       ScrollBars      =   3
  23.       TextRTF         =   $"frmDocument.frx":0000
  24.    End
  25. End
  26. Attribute VB_Name = "frmDocument"
  27. Attribute VB_GlobalNameSpace = False
  28. Attribute VB_Creatable = False
  29. Attribute VB_PredeclaredId = True
  30. Attribute VB_Exposed = False
  31. Private Sub Form_Load()
  32.     Form_Resize
  33. End Sub
  36. Private Sub Form_Resize()
  37.     On Error Resume Next
  38.     rtfText.Move 100, 100, Me.ScaleWidth - 200, Me.ScaleHeight - 200
  39.     rtfText.RightMargin = rtfText.Width - 400
  40. End Sub