Autodesk 15606-011408-9300 Developer Guide - Page 183
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}, cdOpen.Filter = SDF Files *.SDF| *.SDF
UPC - 606121429548
View all Autodesk 15606-011408-9300 manuals
Add to My Manuals
Save this manual to your list of manuals |
Page 183 highlights
ConvertSDF Example Code (continued) End Begin VB.CommandButton btnBrowseSdf Caption = "Browse" Height = 288 Left = 4440 TabIndex =1 Top = 480 Width = 1212 End Begin RichTextLib.RichTextBox txtMsg Height = 2292 Left = 120 TabIndex =0 Top = 960 Width = 4212 _ExtentX = 7430 _ExtentY = 4043 _Version = 393217 Enabled = -1 'True ReadOnly = -1 'True ScrollBars =2 TextRTF = $"frmLab2.frx":0000 BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Courier New" Size = 7.8 Charset =0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty End End Attribute VB_Name = "frmLab2" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Option Explicit Private Sub btnBrowseSdf_Click() On Error GoTo ErrHandler cdOpen.Filter = "SDF Files (*.SDF)| *.SDF" cdOpen.FilterIndex = 1 cdOpen.DialogTitle = "Save SDF File" 'Show the open dialog box cdOpen.ShowSave txtSdfName.Text = cdOpen.FileName SDF Component Toolkit Applications | 183