Stack FILO VB.NET入門

Stack FILO

まずはこちらを実行してください。
逆さ言葉になっております。
回文ではないですが。

FILOとは
first in last out のことです。

最後からアウトプットします。

ソース
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim Stack As New Stack
Stack.Push(“!”)
Stack.Push(“だ”)
Stack.Push(“い”)
Stack.Push(“ら”)
Stack.Push(“き”)
Stack.Push(“い”)
Stack.Push(“だ”)
Stack.Push(“て”)
Stack.Push(“ん”)
Stack.Push(“な”)
Stack.Push(“ス”)
Stack.Push(“マ”)
Stack.Push(“ス”)
Stack.Push(“リ”)
Stack.Push(“ク”)

For i = 0 To Stack.Count – 1
MsgBox(Stack.Pop())

Next

End Sub
End Class

実行結果は















と表示されます。

今日はクリスマス私は何をしているんでしょうかw
ノーダメージで過ごすため
今日は家を出ていません(キリッ

宣言
構文
Dim 変数名 As New Stack

データの追加
構文
変数名.Push(データ)

データの取り出し
構文
変数名.Pop

シェアする

  • このエントリーをはてなブックマークに追加

フォローする

Translate »