IP1 Sample (VB6)

This sample illustrates IP address entry.

This is not an executable sample, so a complete project is not provided. These statements are intended to show basic concepts and the syntax used.

Private Sub Form_Load()
    SftMask1.Caption.SizePercent = 33
    SftMask1.Caption.Text = "&IP:"
    SftMask1.Mask = "$I^03(0,255)\.$I^03(0,255)\.$I^03(0,255)\.$I^03(0,255)"
    SftMask1.Text = "127.0.0.1"
    SftMask1.EditStyle = editSftMaskUpDown
    SftMask1.AutoAdvance = True
    SftMask1.AutoSize = True
    SftMask1.TabAdvance = True
    SftMask1.TabAdvanceLast = True
    SftMask1.EntrySelect = entrySftMaskSelectHome
    SftMask1.EntrySelectMouse = True
End Sub