Shulou(Shulou.com)06/01 Report--

The content of this article mainly focuses on how to print digital diamond patterns in VB language. The content of the article is clear and clear. It is very suitable for beginners to learn and is worth reading. Interested friends can follow the editor to read together. I hope you can get something through this article!

How to print a digital diamond pattern

Output target

one

one hundred and twenty one

12321

1234321

12321

one hundred and twenty one

one

Type declaration symbol

Long &

Integer%

String $

Double #

Single!

Interface:

Source code:

Private Sub Form_Load () ShowFontSize = 18

Dim To n Step, For n = 5For I = 0 Step 1 'output spaces For j = 1 To n-I Step 1 Print ""; Next j Dim k & k = 1' output digits For j = 1 To 2 * I + 1 Step 1 Print Format (k, "@"); If j

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.