求VB高手帮忙解答题目2道,谢谢!

2025-02-27 09:02:47
推荐回答(2个)
回答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

回答2:

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