|
-
Sep 6th, 2000, 02:42 PM
#1
Thread Starter
Addicted Member
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
-
Sep 6th, 2000, 06:41 PM
#2
_______
<?>
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
-
Sep 7th, 2000, 02:29 AM
#3
Thread Starter
Addicted Member
???
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|