计算机一级b试题60道题答案.docVIP

  • 7
  • 0
  • 约42.22万字
  • 约 34页
  • 2016-12-20 发布于河南
  • 举报
1.Private Sub Form_Click() label2.Caption = Year(Date) label4.Caption = Month(Date) label6.Caption = Day(Date) label8.Caption = Weekday(Date) - 1 label11.Caption = Time End Sub 2. Dim num As Double Private Sub Command1_Click() Label3.Caption = Command1.Caption 函数的计算结果为 Label2.Caption = Abs(num) Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) End Sub Private Sub Command2_Click() Label3.Caption = Command2.Caption 函数的计算结果为 Label2.Caption = Sqr(num) Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) End Sub Privat

文档评论(0)

1亿VIP精品文档

相关文档