Question

求VB高手帮忙解答题目2道，谢谢！





Answer 1

第一题：6个大A   ：AAAAAA

第二题：

经过VB6.0测试。。

================================

Private Sub Form_Click()

    a = 10:

    b = 15

    c = 20

    d = 25

    Print a; Spc(5); b; Spc(7); c

    Print a; Space$(8); b; Space$(5); c

    Print c; Spc(3); "+"; Spc(3); d;

    Print Spc(3); "="; Spc(3); c + d

   

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

    Dim char As String

    char = Chr(KeyAscii)

    KeyAscii = Asc(UCase(char))

    Print String(6, KeyAscii)

End Sub

Answer 2

2. 65 （65前有4个空格）
3.10 15 20
10 15 20
20 25
= 45

追问

为什么会得出这些数字，能讲解一下吗?谢谢

追答

2.功能：将所按的键先转换成大写字母，然后再求出该字母的ASCII码并输出，因为输出结果要保持6位，所以在65前要有4 个空格
3.功能简单，就是在每个输出项前根据空格函数指定的空格数留下空档就行