Visual Basic - ayuda con codigo

Life is soft - evento anual de software empresarial
   
Vista:

ayuda con codigo

Publicado por jose (3 intervenciones) el 21/11/2015 04:13:01
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Public Shared Function GenerarCodigoActivación(Code As String) As String
	Dim text As String = "56789567895678956789567895678956789567895678956789"
	Dim text2 As String = ""
	Dim arg_31_0 As Integer = 0
	' The following expression was wrapped in a checked-statement
	Dim num As Integer = CInt(Math.Round(CDec(Code.Length) / 2.0 - 1.0))
	Dim num2 As Integer = arg_31_0
	While True
		Dim arg_69_0 As Integer = num2
		Dim num3 As Integer = num
		If arg_69_0 > num3 Then
			Exit While
		End If
		text2 += Conversions.ToString(Conversions.ToInteger(Code.Substring(num2 * 2, 2)) * Conversions.ToInteger(text.Substring(num2, 1)))
		num2 += 1
	End While
	Return text2
End Function



Quien me puede decir cual es el numero que se genera text2 gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de xve

ayuda con codigo

Publicado por xve (178 intervenciones) el 21/11/2015 10:51:43
Hola Jose, donde esta el problema??
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

ayuda con codigo

Publicado por jose (3 intervenciones) el 23/11/2015 19:56:45
estoy recien aprendiendo y quiero saber como hago para que se genere ese codigo y lo pueda ver y no puedo verlo. el txt2
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar