Select Case no funciona
Publicado por eloi (2 intervenciones) el 07/01/2018 22:44:15
Tengo una aplicacion cliente servidor que se conectan:
por una parte el servidor recive la cadena y si coincide tendria que activar el timer1.enabled pero no l hace. encambo con el closeclient si cierra la aplicacion :
el cliente envia la cadena:
v.TextSenden("DeskTop")
o
v.TextSenden("CloseClient")
por una parte el servidor recive la cadena y si coincide tendria que activar el timer1.enabled pero no l hace. encambo con el closeclient si cierra la aplicacion :
1
2
3
4
5
6
7
8
9
10
Sub Befehleinterpretieren(ByVal Befehl As String)
Dim Befehlsteil() As String = Split(Befehl, "")
Select Case Befehlsteil(0)
Case "CloseClient"Application.Exit() ---esto si fuciona
Case "DeskTop"timer1.enabled = true ---esto no funciona
End Select
el cliente envia la cadena:
v.TextSenden("DeskTop")
o
v.TextSenden("CloseClient")
Valora esta pregunta
0
