Combobox:issa on 3 eri vaihtoehtoa eli suomi, ruotsi ja englanti. Tällä koodilla se osaa vaihtaa vain tekstien kielen ei painikkeen tekstiä ;/ Mikä menee pieleen?
Private Sub Combo1_Click() If Combo1 = "Suomi" Then Teksti1 = "Nimi" Teksti2 = "Osoite" Teksti3 = "Ikä" Painike4 = "Tallenna" ElseIf Combo1 = "Englanti" Then Teksti1 = "Name" Teksti2 = "Address" Teksti3 = "Age" Painike4 = "Safe" ElseIf Combo1 = "Ruotsi" Then Teksti1 = "Namn" Teksti2 = "Adress" Teksti3 = "Ålder" Painike4 = "Registrera" End If End Sub
(Mod. Edit. Kooditagit.)
Vaihda Painike4 -> Painike4.Caption
Edit. Ja Safe -> Save
Aihe on jo aika vanha, joten et voi enää vastata siihen.