百科知识

vb代码编写从键盘输入任意一个实数,用print方法在窗体上同一

2008-03-26 15:23:51蒙***
从键盘输入任意一个实数,用print 方法在窗体上同一行上显示其平方和平方根,要求每个数保留三位小数.vb代码编写从键盘输入任意一个实数,用print方法在窗体上同一行上显示其平方和平方根,要求每个数保留三位小数.:在窗口中添加一个 CommandButton ?

最佳回答

  •   在窗口中添加一个 CommandButton 控件,起名为 Command1,在代码窗口中复制以下代码: Private Sub Command1_Click() Dim s As Single, str As String str = InputBox("输入实数:", "输入") If IsNumeric(str) Then s = Val(str) If s >= 0 Then Print "平方:" & Format(s ^ 2, "0。
      000"), Tab(18); "平方根:" & Format(Sqr(s), "0。000") Else Print "平方:" & Format(s ^ 2, "0。000") End If Else MsgBox "输入了非法字符!", vbCritical + vbOKOnly, "输入非法" End If End Sub。
      
    2008-04-05 12:02:03
  • 很赞哦! (230)