計概Ⅳ 3-4 上機作業【加分題3】

題        目：開啟新檔，撰寫一個可顯示「九九乘法表」的程式。
實習步驟：(1)在表單上佈建一個標籤(Label)，並設定下列屬性：
                             BackColor：(淡紫色)           '設定背景色
                             ForeColor：(黃色)                '設定前景色(文字顏色)                           
                             AutoSize：False                   '設定可調整大小
                             Font：(自定字體、大小)   
                             TextAlign：MiddleCenter     '設定文字置中對齊
                             Text : 九九乘法表                     

                        又佈建一個文字方塊(TextBox)，並設定下列屬性：
                              BackColor：(黃色)               '設定背景色
                              ForeColor：(藍色)                '設定前景色(文字顏色)
                              Multiline : True                      '設定可顯示多行文字
                              ScrollBars : Both                    '設定水平與垂直捲軸
                              Text : (空)                            
                              WordWarp : False                  '設定不自動斷行
                        再佈建一個標籤(Label)，並設定下列屬性：

                              Text : ( 設計者：班級-座號-姓名 )                              

                    (2)在Form1_Activated下撰寫相關程式，使九九乘法表顯示在
                         文字方塊(TextBox)上
                         並請思考如何使九九乘法表之行列對齊？( 提示：使用If ... Then敘述)      
                    (3)最後將方案存為 "ac21-xx-vb5-1.sln"，
                         並繳交""ac21-xx-vb5-1.exe"之執行檔
程式碼參考 :
        Dim i, j As Integer
        For i = 1 To 9
            TextBox1.Text = TextBox1.Text  & vbCrLf       'vbCrLf是VB的換行常數
            For j = 1 To 9
                TextBox1.Text =TextBox1.Text &  i  &  " x "  &  j  &  " = "  &  (i * j)
                TextBox1.Text  = TextBox1.Text &  "    "   '顯示空格
            Next
        Next 

 執行參考畫面：