/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Textboxs Baggrund
Fra : Jens Andersen


Dato : 12-04-01 21:18

Jeg har et lille trip for tiden hvor jeg gerne vil have en anden baggrund på
den textbox som curseren står i, problemet opstår når man med musen klikker
på en textbox så skulle den gerne skifte baggrund med det samme...

Hvordan klare man sådan en lille opgave ?????

Jeg sminker tit skod programmer med et fancy look i håb om tryghed fra
brugeren *LOL*

Mvh
Jens
til@infojens.dk



 
 
Niels (13-04-2001)
Kommentar
Fra : Niels


Dato : 13-04-01 05:27

Prøv med:

Private Sub Text1_GotFocus()
Text1.BackColor = vbBlue
End Sub

Private Sub Text1_LostFocus()
Text1.BackColor = vbWindowBackground
End Sub

Her er en anden fancy lille stykke kode (hvis du da ikke allerede kender
det):

Private Sub Form_Paint()
Dim lngN As Long
With Me
.ScaleMode = vbPixels
.DrawStyle = 5 'Transparent
.DrawWidth = 1
End With
For lngN = 0 To ScaleHeight
Line (-1, lngN)-(ScaleWidth, lngN), _
RGB(0, 0, 255 - (lngN * 255 \ ScaleHeight)), BF
Next lngN
End Sub

- Niels.

"Jens Andersen" <infojens@mail.dk> wrote in message
news:9b52ge$67i$1@news.inet.tele.dk...
> Jeg har et lille trip for tiden hvor jeg gerne vil have en anden baggrund

> den textbox som curseren står i, problemet opstår når man med musen
klikker
> på en textbox så skulle den gerne skifte baggrund med det samme...
>
> Hvordan klare man sådan en lille opgave ?????
>
> Jeg sminker tit skod programmer med et fancy look i håb om tryghed fra
> brugeren *LOL*
>
> Mvh
> Jens
> til@infojens.dk
>
>



Jens (13-04-2001)
Kommentar
Fra : Jens


Dato : 13-04-01 12:42

Tak Niels det virker

Mærkligt jeg ikke selv kom på svaret så nemt det var.....

Mvh
Jens





Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408849
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste