維基大典

「培基」：各本之異

互動式瀏覽歷史
[底本][底本]
←前辨後辨→
刪去的內容 新增的內容
視覺化wikitext
丁子君（議｜勛）
IP封鎖豁免者、總校官
七九五五筆編輯
細無編輯摘要
扎姆（議｜勛）
IP封鎖豁免者、總校官
九五六筆編輯
無編輯摘要
簽：阿拉伯數字
第四三行：
Public Shared Sub Main()
Dim UserName, Answer, stars As String, NumStars As Integer
Console.Write("What is your name"爾何名: ")
      UserName 簿名= Console.ReadLine()
Console.WriteLine("Hello無恙 {0}", UserName簿名)
Do
Console.Write("How many stars do you want:爾欲星幾何 ")
          NumStars星之數 = CInt(Console.ReadLine())
          stars星 = New String("*", NumStars)
Console.WriteLine(stars星)
Do
Console.Write("Do you want more stars?其餘？ ")
              Answer答 = Console.ReadLine()
Loop Until Answer <> ""
Answer答 = Answer答.Substring(0, 1)
Loop While Answer答.ToUpper() = "Y"
      Console.WriteLine("Goodbye請歸 {0}", UserName簿名)
End Sub
End Class
取自「https://zh-classical.wikipedia.org/wiki/培基」