2012-03-29 3 views
1

タイトルが明確でない場合。私は複雑なループ依存コード(私はそれを行うことができます)を作ることなく、テキストボックスから任意の文字を選択できるようにしたい。たとえば、このテキストがテキストボックスに入力されたとします:VB 2010:テキストボックスのインデックス作成方法(スロットのようにする)

hello user!

私は私が私にインデックス1の値を取得するために伝える際に、いくつかの構文は、それがインデックス5 =「O」のために、私に「h」を与えたい...など

だから、誰もが右は何を知っています構文、助けてください!

+0

em3ricasforsaleが私に非常に正しい答えを与えてくれてありがとう...すべてありがとう:-D ...皆さんへの挨拶。 – IWIH

+0

彼のコードは私が以下に述べたように完全に不誠実です。文字列は直接インデックス可能です。ちょうどmystring(myindex)と言って、charを取得します。それを使用することは、mystring.ToArray()(myIndex)と全く同じです。これは、mystring(myindex)とまったく同じです! – asawyer

+0

'vb'タグはあいまいで段階的に廃止されており、インデックスタグにはデータベースに関連するより具体的な意味があります。彼らはあなたの質問には属しません。 –

答えて

3

stringが直接、特別なコードをせずにインデックスを作成することができます。

//from metadata 
public sealed class String : IComparable, ICloneable, IConvertible, IComparable<string>, IEnumerable<char>, IEnumerable, IEquatable<string> 
{ 
    .... 
    // Summary: 
    //  Gets the character at a specified character position in the current System.String 
    //  object. 
    // 
    // Parameters: 
    // index: 
    //  A character position in the current string. 
    // 
    // Returns: 
    //  A Unicode character. 
    // 
    // Exceptions: 
    // System.IndexOutOfRangeException: 
    //  index is greater than or equal to the length of this object or less than 
    //  zero. 
    public char this[int index] { get; } 
    .... 
} 


dim str = "hello"; 

dim hchar = str(0); 
dim echar = str(1); 
dim lchar = str(2); 
ect 
+0

ああ!!最高のもの.....非常にシンプルで、私が必要としていた仕事のために:-D – IWIH

+0

あなたはプログラミングの人生で最善を尽くすことを願っています。 – IWIH

0
Dim x As String = "Hello" 

Console.Write(x.IndexOf("e")) 'Would return the position 
Console.Write(x(x.IndexOf("e"))) 'Would return the character based upon the position 
Console.Write(x(1)) 'Returns the character based at position 1 of the string 

WinFormを使用している場合は、Console.Writeを削除できます。

TextBox1.Text = x(x.IndexOf("e")) 
+0

ありがとうございました...私はあなたに最高のお祈りをしています! – IWIH

0

これは動作するはずです。

Dim orig = "hello user!" 
Dim res = Enumerable.Range(0,orig.Length).[Select](Function(i) orig.Substring(i,1)) 

それではあなたが行うことができます:

Dim x = res(0) 'x = "h" 
+0

私はこのソリューションが非常に奇妙であると言わざるを得ない。 – asawyer

+0

ありがとうem3ricasforsale、 それは仕事を大きくします...しかし、私はそれが何を意味するのか分かりませんでした!私はそれを慎重に研究し、アッラーの意志で、私はそれを理解するでしょう.... 私の心の深みからありがとう... – IWIH