29/07/07 12:47
ppanico2
Module Module1
Sub Main()
Dim S As String = "Cerchi un programmatore? Trovalo"
If S(2) = "r" Then
Console.WriteLine("La terza lettera della stringa è una 'r'")
Else
Console.WriteLine("La terza lettera della stringa non è una 'r'")
End If
Console.Write(vbCrLf & "Premi un qualsiasi tasto per chiudere il programma...")
Console.ReadKey()
End Sub
End Module
Ultima modifica effettuata da ppanico2 29/07/07 12:48
aaa