-3

これが上記の数値チャートです。以下のクエリのコードを書きたいと思います。

textbox1私が持っているコントロールlabel1、、、。label2button1

私はtextbox1乱数を生成する、つまり402045を持っています。

label1次のテキスト ボックスにテキストが 40,20,45 と表示されます。

そして、Label2上記のチャートのカンマ区切りの数値の値が表示されます。つまり、label2値は次のようになります。PFr.

サンプルコード:

For i As Integer = 0 To TextBox1.Text.Length
    ListBox1.Items.Add(i)
    Label1.Text = TextBox1.Text.Substring(0, 2) & "-"
Next i
4

1 に答える 1

0

これを試して ：

Dim sChars '--> contain your chars
Dim s as String = Textbox1.text 
Dim s1,s2,s3 as String

sChars = "+-* ..."   ' --> fill this
s1 = mid(s,1,2)
s2 = mid(s,3,2)
s3 = mid(s,5)

Label1.text = s1 & "," & s2 & "," & s3
Label2.text = mid(sChars,val(s1),1) & mid(sChars,val(s2),1) & mid(sChars,val(s3),1)

しかし、この場合、Label1.text は必要ないと思います!

于 2013-04-29T15:26:31.170 に答える