dim i as integer=0
sub buttong1_click()
dim str as string
try
str=textbox1.text.substring(i,1)
catch ex as exception
end try
i+=1
end sub
sub buttong1_click()
dim str as string
try
str=textbox1.text.substring(i,1)
catch ex as exception
end try
i+=1
end sub
{
string text = this.textBox1.Text;
if(index >= 0 && index < this.textBox1.Text.Length)
{
MessageBox.Show(text[index].ToString());
index++;
}
}