内容发布更新时间 : 2024/12/23 8:56:04星期一 下面是文章的全部内容请认真阅读。
ClientHeight = 3090 ClientLeft = 60 ClientTop = 450 ClientWidth = 5490 BeginProperty Font
Name = \宋体\ Size = 12 Charset = 134 Weight = 700
Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty
LinkTopic = \ ScaleHeight = 3090 ScaleWidth = 5490
StartUpPosition = 3 '窗口缺省 Begin VB.CommandButton Command3 Caption = \隐藏\ Height = 375 Left = 4080 TabIndex = 3 Top = 2040 Width = 975 End
Begin VB.CommandButton Command2 Caption = \图片2\ Height = 375 Left = 4080 TabIndex = 2 Top = 1320 Width = 975 End
Begin VB.CommandButton Command1 Caption = \图片1\ Height = 375 Left = 4080 TabIndex = 1 Top = 600 Width = 975 End
Begin VB.PictureBox Picture1 AutoSize = -1 'True BeginProperty Font
Name = \宋体\ Size = 9 Charset = 134 Weight = 400
Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty
Height = 1935 Left = 600 ScaleHeight = 1875 ScaleWidth = 2715 TabIndex = 0 Top = 480 Width = 2775 End End
Attribute VB_Name = \
Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Private Sub Command1_Click()
Picture1.Picture = LoadPicture(\End Sub
Private Sub Command2_Click()
Picture1.Picture = LoadPicture(\End Sub
Private Sub Command3_Click() Picture1.Visible = False End Sub
VERSION 5.00
Begin VB.Form Form1
Caption = \收款机\ ClientHeight = 2730 ClientLeft = 60 ClientTop = 450 ClientWidth = 4680 BeginProperty Font
Name = \宋体\ Size = 12
Charset = 134 Weight = 700
Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty
LinkTopic = \ ScaleHeight = 2730 ScaleWidth = 4680
StartUpPosition = 3 '窗口缺省 Begin VB.CommandButton Command1 Caption = \总价为\ Height = 375 Left = 600 TabIndex = 4 Top = 1920 Width = 1695 End
Begin VB.TextBox Text2 Height = 495 Left = 3000 TabIndex = 3 Top = 960 Width = 1335 End
Begin VB.TextBox Text1 Height = 495 Left = 3000 TabIndex = 2 Top = 240 Width = 1335 End
Begin VB.Label Label3
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single Height = 495 Left = 2760 TabIndex = 5 Top = 1920 Width = 1455 End
Begin VB.Label Label2
Alignment = 2 'Center
Caption = \货物的单价(元):\
Height = 375 Left = 360 TabIndex = 1 Top = 1080 Width = 2295 End
Begin VB.Label Label1
Alignment = 2 'Center
Caption = \货物的数量(个):\ Height = 375 Left = 360 TabIndex = 0 Top = 360 Width = 2295 End End
Attribute VB_Name = \
Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Private Sub Command1_Click() Label3 = Text1 * Text2 End Sub
Begin VB.Form Form1
Caption = \ ClientHeight = 1890 ClientLeft = 60 ClientTop = 450 ClientWidth = 4365 LinkTopic = \ ScaleHeight = 1890 ScaleWidth = 4365
StartUpPosition = 3 '窗口缺省 Begin VB.CommandButton Command2 Caption = \清除\ BeginProperty Font
Name = \宋体\ Size = 12 Charset = 134 Weight = 700
Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False
EndProperty
Height = 375 Left = 2400 TabIndex = 3 Top = 1200 Width = 975 End
Begin VB.CommandButton Command1 Caption = \复制\ BeginProperty Font
Name = \宋体\ Size = 12 Charset = 134 Weight = 700
Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty
Height = 375 Left = 720 TabIndex = 2 Top = 1200 Width = 975 End
Begin VB.TextBox Text2 Height = 495 Left = 2160 TabIndex = 1 Top = 360 Width = 1695 End
Begin VB.TextBox Text1 Height = 495 Left = 480 TabIndex = 0 Top = 360 Width = 1455 End End
Attribute VB_Name = \
Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False