2016-08-13 10 views
0

プログラムを開くときに表示される起動ヒントと似たプログラムを作成しようとしています。表示するテキストのラベルを作成しました私は残りの部分を追加すると、最後の文字列はlabel.Belowのすべての前の文字列を上書きします。私のコードです。ボタンを1つのラベルで複数回実行するにはどうすればいいですか?

Public Class Form1 

    Dim string1 As String = "Hello " 
    Dim string2 As String = "world" 
    Dim string3 As String = "next text" 
    Dim string4 As String = "text4" 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnNext.Click 
     lblDisplay.Text = string1 
     lblDisplay.Text = string2 
    End Sub 

End Class 
+0

ボタンをクリックするたびに、次の文字列がラベルに表示されますか? –

+0

はい、私はそれを表示したい。 – Noppy

答えて

1

ボタンをクリックすると、各文字列が表示されます。テキストから文字列string1を作成し、ボタンをクリックすると、項目数を追跡しながら各項目が配列内に表示されます(tipcnt)。 tipcnt = string1.Countの場合、0にリセットされます。表示する文字列がさらにある場合は、配列に追加するだけです。

Public Class Form1 
    Dim string1 As String() = {"Hello", "world", "next text", "text4"} 
    Dim tipcnt As Integer = 0 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 
     lblDisplay.Text = string1(tipcnt) 
     tipcnt += 1 
     If tipcnt = string1.Count Then tipcnt = 0 
    End Sub 
End Class 
関連する問題