VB.Form,Name,frmTest
,BorderStyle,3  'Fixed Dialog
,Caption,"Using the VText Control"
,ClientHeight,2715
,ClientLeft,45
,ClientTop,330
,ClientWidth,6135
,MaxButton,0   'False
,MinButton,0   'False
,ShowInTaskbar,0   'False
,StartUpPosition,3  'Windows Default
ValText.VText,Name,vtxUpper
,Height,315
,Left,1320
,Top,60
,Width,1215
,UpperCase,-1  'True
,Text,""
,Name,"MS Sans Serif"
,Size,8.25
,Charset,0
,Weight,400
,Underline,0   'False
,Italic,0   'False
,Strikethrough,0   'False
VB.Frame,Name,Frame1
,Caption,"DataBound VText Controls"
,Height,1815
,Left,2580
,Top,60
,Width,3435
ValText.VText,Name,VText2
,DataField,"Name"
,DataSource,"Data1"
,Height,255
,Left,1200
,Top,780
,Width,1995
,Name,"MS Sans Serif"
,Size,8.25
,Charset,0
,Weight,400
,Underline,0   'False
,Italic,0   'False
,Strikethrough,0   'False
ValText.VText,Name,VText1
,DataField,"AUID"
,DataSource,"Data1"
,Height,255
,Left,1200
,Top,420
,Width,1095
,Name,"MS Sans Serif"
,Size,8.25
,Charset,0
,Weight,400
,Underline,0   'False
,Italic,0   'False
,Strikethrough,0   'False
VB.Data,Name,Data1
,Caption,"Data1"
,Connect,"Access"
,DatabaseName,"C:\tysdbvb6\source\data\books6.mdb"
,DefaultCursorType=,'DefaultCursor
,DefaultType,2  'UseODBC
,Exclusive,0   'False
,Height,345
,Left,180
,Options,0
,ReadOnly,0   'False
,RecordsetType,1  'Dynaset
,RecordSource,"Authors"
,Top,1320
,Width,3060
VB.Label,Name,Label8
,Caption,"Author ID"
,Height,255
,Left,120
,Top,420
,Width,1095
VB.Label,Name,Label9
,Caption,"Author Name"
,Height,255
,Left,120
,Top,780
,Width,1155
VB.CommandButton,Name,cmdOK
,Caption,"OK"
,Height,375
,Left,4740
,Top,2160
,Width,1215
ValText.VText,Name,vtxDigits
,Height,315
,Left,1320
,Top,420
,Width,1215
,Digits,-1  'True
,Text,""
,Name,"MS Sans Serif"
,Size,8.25
,Charset,0
,Weight,400
,Underline,0   'False
,Italic,0   'False
,Strikethrough,0   'False
ValText.VText,Name,vtxInRange
,Height,315
,Left,1320
,Top,1140
,Width,1215
,CheckRange,-1  'True
,LowValue,"50"
,HighValue,"100"
,Text,""
,Name,"MS Sans Serif"
,Size,8.25
,Charset,0
,Weight,400
,Underline,0   'False
,Italic,0   'False
,Strikethrough,0   'False
ValText.VText,Name,vtxCheckSize
,Height,315
,Left,1320
,Top,1500
,Width,1215
,CheckSize,-1  'True
,MinLength,5
,MaxLength,10
,Text,""
,Name,"MS Sans Serif"
,Size,8.25
,Charset,0
,Weight,400
,Underline,0   'False
,Italic,0   'False
,Strikethrough,0   'False
ValText.VText,Name,vtxRequired
,Height,315
,Left,1320
,Top,1860
,Width,1215
,Required,-1  'True
,Text,""
,Name,"MS Sans Serif"
,Size,8.25
,Charset,0
,Weight,400
,Underline,0   'False
,Italic,0   'False
,Strikethrough,0   'False
ValText.VText,Name,vtxConditional
,Height,315
,Left,1320
,Top,2220
,Width,1215
,CheckConditional=,'True
,Text,""
,Name,"MS Sans Serif"
,Size,8.25
,Charset,0
,Weight,400
,Underline,0   'False
,Italic,0   'False
,Strikethrough,0   'False
ValText.VText,Name,vtxNumeric
,Height,315
,Left,1320
,Top,780
,Width,1215
,Numeric,-1  'True
,Text,""
,Name,"MS Sans Serif"
,Size,8.25
,Charset,0
,Weight,400
,Underline,0   'False
,Italic,0   'False
,Strikethrough,0   'False
VB.Label,Name,Label1
,Caption,"vtxUpper"
,Height,315
,Left,60
,Top,60
,Width,1215
VB.Label,Name,Label2
,Caption,"vtxDigits"
,Height,315
,Left,60
,Top,420
,Width,1215
VB.Label,Name,Label3
,Caption,"vtxNumeric"
,Height,315
,Left,60
,Top,780
,Width,1215
VB.Label,Name,Label4
,Caption,"vtxInRange"
,Height,315
,Left,60
,Top,1140
,Width,1215
VB.Label,Name,Label5
,Caption,"vtxCheckSize"
,Height,315
,Left,60
,Top,1500
,Width,1215
VB.Label,Name,Label6
,Caption,"vtxRequired"
,Height,315
,Left,60
,Top,1860
,Width,1215
VB.Label,Name,Label7
,Caption,"vtxConditional"
,Height,315
,Left,60
,Top,2220
,Width,1215