设在工程中有一个标准模块,其中定义了如下记录类型:Type Books Name As String *10 Te1Num As
查看答案
执行如下两条语句后,窗体上显示的是 。a=9.8596print Format(a,"$00,00.00")A.0,009.86 B.$9.86 C.9.86 D.$0,009.86
(34)下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx As Single End Type Dim Ksc As Ang Private Sub Form_Click() Dim Y As Single Dim i As Integer Dim Ksc As Ang Open Y=3.14159/180 For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc.Cosx=Cos(i*Y) ___________ Next i Close #2 End SubA."‥\Datal.txt"For Random As#1 Len=10 Put#1,i,KscB."‥\Datal.txt"For Random As#1 Len=10 Put#1,Y,Ksc C."‥\Datal.txt"For Random As#1 Put#1,i,KscD."‥\Datal.txt"For Random As#1 Put#1,Y,Ksc
(8)在程序的空白处填写适当的语句,完成下列功能:依次自动将列表框List2中所有列表项目移入列表框List1中,并将移入List1中的项目从List2中删除 Do While List2.ListCount _____________________ List2.RemoveItem 0 Loop