- Code:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim s As String = "English Language"
Dim intcount As Integer = 0
For Each c As Char In s
If intcount Mod 2 = 0 Then
s = s.Remove(intcount, 1).Insert(intcount, "#")
End If
intcount += 1
Next
MsgBox(s)
End Sub
Liệt kê những bài viết mới nhất
code cho hint2
1 code cho hint2 Wed Jan 13, 2016 3:22 pm
HdAd
Admin
» Khoa học » Máy Tính » code cho hint2
Similar topics
Permissions in this forum:
You cannot reply to topics in this forum
|
|