珠海公司于2008年9月1日收到广发公司的不带息商业承兑汇票一张，面值为80000元，付款期限为3个月，系产品的销售货款和增值税(增值税为11624元)。公司由于资金周转问题，将此票据于9月2日到银行贴现，银行贴现率为8％。3个月到期后(12月2日)，由于广发公司账上无法付款，银行通知珠海公司，将其存款的账面余额60000元抵付票面款，不足部分转为逾期贷款。要求：根据上述材料，计算票据贴现利息与贴现所得，并分别编制9月1日、9月2日、12月2日的会计分录。

下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数，打印其中7的倍数的数，井求它们的总和，请填空。　　Sub TOF( )　　Randomize　　Dim s As Double　　Dim a(10) As lnteger　　For i=0 To 9　　　　　【】　　Next　　For i=0 To 9　　　　If【】Then　　　　　Print a(i)　　　　　s=s+a(i)　　　　　【】　　　Next i　　Print　　Print "S=" ; s　　End Sub