要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数.

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 03:34:38
要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数.

要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数.
要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数.

要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数.
Private Sub Commmand1_Click()
Dim a As Double
a = InputBox("输入一个正实数")
If a < 0 Then Exit Sub
Print Int(Sqr(a) * 1000) / 1000
End Sub

要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数. 要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数. InputBox输入一个正实数,用Debug方法在一行上显示出它的平方和平方根、立方和立 使用VB 6.0 制作一个程序,求1!+2!+3!+……+n!要求输入任意的N,求1到N的阶乘.用Inputbox 和Msgbox 用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.将10个学生 vb求m+mm+mmm+...+mm...mmm(n个m)要求 n ,m值 用 inputbox输入Dim m%,n%,i%,j%,a(0 To 9999999) As IntegerPrivate Sub Form_Click()m = InputBox(请输入m值 )n = InputBox(请输入n值 )For i = n To 0 Step -1a(n) = a(n) + 10 ^ (i - 1)Next iPrin 用InputBox输入一个正整数,用Print方法在一行显示出他的平方根平方和立方根立方和 VB用inputbox函数输入一个摄氏温度 根据华氏温度=9/5*摄氏温度+32算出华氏温度 vb编写程序:一个具有10个元素的一维数组,下标从1到10,要求用inputbox从键盘上输入其元素值,并找出最小的那个数. 随机产生20个10~99之间的整数,要求:1) 用冒泡法排序(降序) 2) 用InputBox( )函数输入一整数X 随机产生20个10~99之间的整数,要求:1) 用冒泡法排序(降序) 2) 用InputBox( )函数输入一整数X VB试题:输入x,y,z三个数,按从小到大的次序显示.用InputBox函数输入3个数 编写一个程序当单击窗体时用输入框(inputbox函数)输入一个自然数,判断是否“正数”“负数”或“0”,并邮箱ww11040202@163.com 我想要电子版的 用辗转相除法求两数的最小公倍数和最大公约数 VBPrivate Sub Command1_Click()m = InputBox(输入第一个自然数)n = InputBox(输入第二个自然数) (1)Do While (2)m = n(3)r=m mod n LoopPrint 最大公约数为:; 一个笼子里有鸡,兔若干只,若已知鸡,兔的总头数和总头数,问,鸡,兔各多少只?要求,用VB程序,通过InputBox函数输入鸡,兔的总头数和总脚数,单机窗体时在窗体上显示出鸡,兔各有多少只.大恩不言 vb 用inputbox函数输入3个任意整数,安从大到小顺序输出 (块if语句) vb 一个分段函数 编程错误 我用的 vb6.0版的 编一个分段函数 如下Private Sub form_Click()Dim x As Integer,y As Integerx = Val(InputBox(请输入x值:))If x 用vbs排列一个包含5个元素的数组的大小,dim a(4),strfor i=0 to 4a(i)=inputbox(输入& i+1 &shu)NextDim tempFor i=0 To 4If a(i)