拼图(2).frm
上传用户:lt27857608
上传日期:2022-03-06
资源大小:666k
文件大小:1k
源码类别:

其他游戏

开发平台:

Visual Basic

  1. VERSION 5.00
  2. Begin VB.Form Form2 
  3.    Caption         =   "图片"
  4.    ClientHeight    =   9000
  5.    ClientLeft      =   2835
  6.    ClientTop       =   1380
  7.    ClientWidth     =   12000
  8.    LinkTopic       =   "Form2"
  9.    ScaleHeight     =   9000
  10.    ScaleWidth      =   12000
  11.    Begin VB.Image Image1 
  12.       Height          =   9000
  13.       Left            =   0
  14.       Picture         =   "拼图(2).frx":0000
  15.       Stretch         =   -1  'True
  16.       Top             =   0
  17.       Width           =   12000
  18.    End
  19. End
  20. Attribute VB_Name = "Form2"
  21. Attribute VB_GlobalNameSpace = False
  22. Attribute VB_Creatable = False
  23. Attribute VB_PredeclaredId = True
  24. Attribute VB_Exposed = False
  25. Private Sub Form_Load()
  26. If Form1.s = "" Then
  27.   Image1.Picture = LoadPicture(App.Path & "风景1.jpg")
  28. Else
  29.   Image1.Picture = LoadPicture(Form1.s)
  30. End If
  31. End Sub