تابع switch

[Babak.Hassanpour]

راه درست اینه



Function matchLanguage(ByVal cityName As String) As String
MsgBox Switch(cityName = "London", "English", cityName = "Rome", "Italian", cityName = "Paris", "French")
End Function
Private Sub Command1_Click()
Call matchLanguage("London")
End Sub



راستی امروز سایت چش شده.پاک قاطی پاطیه.پست من چرا اومده اول؟!!!:گیج::متعجب:

[ali-software]

سلام
ali Home: Private Sub Command1_Click()
Dim a, b As String
a = Text1.Text
b = Text2.Text
b = Switch(b = "London", " English ")
End Sub
اشکال این چیه؟
دو تکست و باکس و یک کاموند بزنید.ممنون میشم اگه جواب بدین

[ali-software]

یعنی از تابع switch استفاده نمیکنیم؟

[Babak.Hassanpour]

توی خط دوم چکار کردیم پس؟!:متفکر: