Visual basic 编程求助！！

显示全部楼层 · 2009-4-1 11:56:56

题目如下
1：设计一工程,当输入某一角度X后,单击"计算"按钮能够计算出相应的三角函数(sinX和cosX)的绝对值.每次的计算结果附加在上次计算结果之后,显示于带垂直滚动条的文本框中.所有数据保留3位小数,注意输入的X为角度.每次完成计算之后,选中输入的文本,以便继续输入.
2.使用InPutBox函数输入小时、分、秒，求一共多少秒。单击窗体时，将结果显示在窗体上。要求输出数据格式为：xx小时xx分xx秒

千问 · 2009-4-1 11:56:56

Const PI = 3.1415926Private Sub Command1_Click() Dim i As Singlei = CSng(Text1.Text)List1.AddItem Format(Abs(Cos(i * PI / 180)), ".000") List2.AddItem Format(Abs(Sin(i * PI / 180)), ".000")Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Le...