Results 1 to 3 of 3

Thread: vb malfunction - text box

  1. #1

    Thread Starter
    Addicted Member
    Join Date
    Oct 1999
    Location
    chicago (hope)
    Posts
    146

    Lightbulb

    hi all!

    i am makin a simple addressbook, for homeuse.
    i have a form, where i can enter the data

    textfields:
    firstname
    lastname
    telno
    email
    address
    zip
    city
    2. telno
    2. email
    date of birth

    all of them have
    appearance: 2d
    backcolor: &H00F9FFFF&
    forecolor: different (black/blue)
    font: verdana (sometimes underlined)
    borderstyle: 1

    if i set the borderstyle to 0 during form_load, the border still is there.
    and if i set the border to 1 in the email_gotfocus sub, the border gets BOLD!
    it looks good, but i don't know why it works!

    see my code:

    Code:
    Private Sub EMail_GotFocus()
    EMail.SelStart = 0
    EMail.SelLength = Len(EMail.Text)
    EMail.BorderStyle = 1
    EMail.BackColor = &HFFFFFF
    End Sub
    
    Private Sub EMail_LostFocus()
    EMail.BorderStyle = 0
    EMail.BackColor = &HF9FFFF
    End Sub
    
    Private Sub Form_Load()
    EMail.BorderStyle = 0
    End Sub

  2. #2
    _______ HeSaidJoe's Avatar
    Join Date
    Jun 1999
    Location
    Canada
    Posts
    3,946

    <?>

    Borderstyle:
    Returns or sets the border style for an object. For the Form object and the TextBox control, read-only at run time.

    "A myth is not the succession of individual images,
    but an integerated meaningful entity,
    reflecting a distinct aspect of the real world."

    ___ Adolf Jensen

  3. #3

    Thread Starter
    Addicted Member
    Join Date
    Oct 1999
    Location
    chicago (hope)
    Posts
    146

    Exclamation ???

    BUT IT WORX !!!!!!!!!!!!

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width