广东vb程序设计自考真题

写程序最忌讳使用没有意义的字母做变量，这样会让程序可读性变得很差。使用迭代算法要千万注意迭代是否收敛，可以在循环体内部打印退出条件的值是否符合预期。看不懂。T_T

答案供参考，不保证全对：ADAABCDADEFABCCDACDACDADAB

Private Sub Command1_Click()    Dim price As Double    If MCText = "90号" Then price = 3 * CLng(MTText)    If MCText = "95号" Then price = 45 * CLng(MTText)    If MCText = "100号" Then price = 6 * CLng(MTText)    MTText = priceEnd SubPrivate Sub Form_Load()    MCAddItem ("90号")    MCAddItem ("95号")    MCAddItem ("100号")        MCText = "90号"    MTText = 0    MTText = ""End Sub

1\AD2\AB3\ABD4\ADEF5\ABC6\ACD7\ACD8\ACD9\ABD10\AB

(1)A(3)C(4)B(5)A(6)B(7)B(8)C(9)A(10)B(11)D(12)B(13)B(14)B填空题（2）(4)public（5）(6)5*x*x-3*x-2*sin(a)/3(8)open "c:\xt" for output as #1

（1）A（3）C（4）B（5）A（6）B（7）B（8）C（9）A（10）B（11）D（12）B（13）B（14 ）B 填写的空白 1（2）11 2（4）公共（5）私人 3（6）5 * X * X-3 * X -2 * SIN（A）/ 3 （8）打开“C：\ xt”输出为＃1

有没有图啊。