Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
casa verde 2024

Intrerupator cu N - doza doar cu ...

Incalzire casa fara gaz/lemne

Incalzire in pardoseala etapizata
 Suprataxa card energie?!

Cum era nivelul de trai cam din a...

probleme cu ochelarii

Impozite pe proprietati de anul v...
 teava rezistenta panou apa calda

Acces in Curte din Drum National

Sub mobila de bucatarie si sub fr...

Rezultat RMN
 Numar circuite IPAT si prindere t...

Pareri brgimportchina.ro - teapa ...

Lucruri inaintea vremurilor lor

Discuții despre TVR Sport HD.
 

comanda visual basic

- - - - -
  • Please log in to reply
6 replies to this topic

#1
credit

credit

    Member

  • Grup: Members
  • Posts: 621
  • Înscris: 04.05.2007
Am creat un buton in excel care prin apasarea lui imi deschide userform1

Private Sub CommandButton1_Click()
UserForm1.Show
End Sub


userform1 contine o caseta label1 care are codul

Private Sub Label1_click()
Label1 = "ok"
End Sub


Astfel ca la apasarea butonului din excel se deschide userform1 cu caseta label1. Caseta label1 va avea valoarea ok la efectuarea unui click pe label1.
Eu vreau ca valoarea "ok" a label1 sa fie afisata instant fara a mai da click pe label1.

Cu ce pot inlocui randul de cod "Private Sub Label1_click()" ca valoarea label1 sa fie afisata instant??


Multumesc

#2
Sandstorm

Sandstorm

    Member

  • Grup: Banned
  • Posts: 632
  • Înscris: 30.04.2009
Pai daca dai click pe label1 si mergi in panoul de proprietati din partea stanja jos la proprietatea Caption si pui ok, nu te ajuta?
Astfel cand apelezi acel userform, label1 are afisat textul Ok.

#3
am4tor

am4tor

    Junior Member

  • Grup: Members
  • Posts: 108
  • Înscris: 27.10.2009

View PostCredit, on 21st October 2010, 13:44, said:

Cu ce pot inlocui randul de cod "Private Sub Label1_click()" ca valoarea label1 sa fie afisata instant??.

Pai vezi care e corect (suportat) "...Label1_text()"   sau "_value()" ..etc.
sau "_caption()"  cum ar fi din ce zice Sandstorm.

Oricum nu vei pune o actiune (gen "_click()" ) ci mai degraba o atribuire/afisare de sir/text .

#4
Sandstorm

Sandstorm

    Member

  • Grup: Banned
  • Posts: 632
  • Înscris: 30.04.2009
Pai mai simplu decat ce ti-am zis nu e.
Mai ales ca nici nu trebuie cod.

#5
credit

credit

    Member

  • Grup: Members
  • Posts: 621
  • Înscris: 04.05.2007
Am gasit greseala.

In locul codului

Private Sub Label1_click()
Label1 = "ok"
End Sub

trebuia sa scriu

Private Sub UserForm_activate()
label1 = "ok"
End Sub


Practic codul label1 = "ok" trebuia sa-l scriu pentru userform nu pentru label1.

Multumesc

#6
dani.user

dani.user

    Guru Member

  • Grup: Senior Members
  • Posts: 30,195
  • Înscris: 24.02.2007
Ce bine ar merge uneori un tutorial bun sau chiar o carte decat sa invatam pe pipaite.

#7
Sandstorm

Sandstorm

    Member

  • Grup: Banned
  • Posts: 632
  • Înscris: 30.04.2009
Nu inteleg de ce te complici sa adaugi cod inutil, cand poti sa umblii la proprietatile acelui label.

Anunturi

Bun venit pe Forumul Softpedia!

0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

Forumul Softpedia foloseste "cookies" pentru a imbunatati experienta utilizatorilor Accept
Pentru detalii si optiuni legate de cookies si datele personale, consultati Politica de utilizare cookies si Politica de confidentialitate