vb 輸出星星
hollow square
輸入5 顯示

我的代碼
Public Class Form1
Dim i, t As Integer
Dim p As String
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
i = InputBox("please enter square length")
For t As Integer = 1 To i
For g As Integer = 1 To i
If t = 1 Or t = i Then
p &= "*"
Else
If g = 1 Or g = i Then
p &= "*"
Else
p &= Space(1)
End If
End If
Next
p &= vbNewLine
Next
MessageBox.Show(p)
End Sub
End Class
中間的空格顯示不多 要怎么改
vb一個字母的空格的代碼是什么?
uj5u.com熱心網友回復:
字體的問題,換在label上顯示吧,uj5u.com熱心網友回復:
不要用MsgBox來顯示。你用一個多行文本框顯示,字體設為等寬字體(比如 Consolas)就正確了。轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/98229.html
標籤:VB基礎類
上一篇:誰有API入門的教程?指點一二
