www.pudn.com > HEX2BIN_VB.zip > DIALOG.FRM
VERSION 5.00
Begin VB.Form Dialog
BorderStyle = 3 'Å©±â °íÁ¤ ´ëÈ »óÀÚ
Caption = "Áغñ±Ý ¼³Á¤"
ClientHeight = 2205
ClientLeft = 2760
ClientTop = 3750
ClientWidth = 3510
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 2205
ScaleWidth = 3510
ShowInTaskbar = 0 'False
StartUpPosition = 1 '¼ÒÀ¯ÀÚ °¡¿îµ¥
Begin VB.ComboBox Combo1
Height = 300
ItemData = "Dialog.frx":0000
Left = 240
List = "Dialog.frx":0013
Style = 2 'µå·Ó´Ù¿î ¸ñ·Ï
TabIndex = 3
Top = 600
Width = 1335
End
Begin VB.TextBox txtAble
Alignment = 1 '¿À¸¥ÂÊ ¸ÂÃã
Height = 300
Left = 240
TabIndex = 2
Text = "0"
Top = 1560
Width = 1215
End
Begin VB.CommandButton CancelButton
Cancel = -1 'True
Caption = "Ãë¼Ò"
Height = 375
Left = 2040
TabIndex = 1
Top = 1080
Width = 1215
End
Begin VB.CommandButton OKButton
Caption = "È®ÀÎ"
Default = -1 'True
Height = 375
Left = 2040
TabIndex = 0
Top = 480
Width = 1215
End
Begin VB.Label Label1
Alignment = 2 '°¡¿îµ¥ ¸ÂÃã
Caption = "Áغñ±Ý °³(¸Å)¼ö"
Height = 255
Index = 1
Left = 120
TabIndex = 5
Top = 1200
Width = 1455
End
Begin VB.Label Label1
Alignment = 2 '°¡¿îµ¥ ¸ÂÃã
Caption = "Áغñ±Ý Á¾·ù"
Height = 255
Index = 0
Left = 240
TabIndex = 4
Top = 240
Width = 1215
End
End
Attribute VB_Name = "Dialog"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit
Private Sub CancelButton_Click()
Me.Tag = 0
Me.Hide
End Sub
Private Sub Combo1_Change()
txtAble.Text = 0
End Sub
Private Sub Form_Load()
Me.Combo1.ListIndex = 0
End Sub
Private Sub OKButton_Click()
Me.Tag = 1
Me.Hide
End Sub