Hej, jag skulle vilja veta hur man öppnar en exe fil med en combobox.Alltså.När jag drar ner menyn till svenska och när jag tryckt där vill jag att en exe fil ska öppnas. Tjingeling! HejHjälp med att öppna....
Om ni inte förstår.
Lägg till mig på din ICQ lista. nummret är:
98622271Sv: Hjälp med att öppna....
Combo boxen anvander du sahar:
Private Sub Combo1_Click()
Select Case Combo1.Text 'Vald text i comboboxen
Case "Svenska"
'Oppna exe filen for svenska
Case "Engelska"
'Oppna en annan fil
End Select
End Sub
/CissiSv: Hjälp med att öppna....
Private Sub Combo1_Click()
Dim ret As Long
Select Case Combo1.Text 'Vald text i comboboxen
Case "Svenska"
ret = Shell("NotePad.exe", vbNormalFocus)
Case "Engelska"
ret = Shell("RegEdit.exe", vbNormalFocus)
End Select
End Sub
mvh
Sven