
怎么让vb程序显示计算后的数值
Dima,s,xAsSinglea=InputBox("请输入1自变量宽")x=InputBox("请输入自变量值")s=a*a+8*x(Text.1text)=s这是这...
Dim a, s, x As Single
a = InputBox("请输入1自变量宽")
x = InputBox("请输入自变量值")
s = a * a + 8 * x
(Text.1 text) = s
这是这个程序的式子,如何让他们计算后再显示出来??本人新手,求大神指教
就是让s这个量显示出来,现在我调试的时候显示不出来 展开
a = InputBox("请输入1自变量宽")
x = InputBox("请输入自变量值")
s = a * a + 8 * x
(Text.1 text) = s
这是这个程序的式子,如何让他们计算后再显示出来??本人新手,求大神指教
就是让s这个量显示出来,现在我调试的时候显示不出来 展开
展开全部
vb显示计算后的结果有两种方法
1、直接用输出控件
比如用text1输出。计算结果是s 你可以把s赋给text1.text
代码为 text1.text=s 这里的s可以字符型,也可以是数字型 他会自动转换成字符型,等效
text1.text=cstr(s)
本例中 就用这种方法来显示,代码有错误 把(Text.1 text) = s 改成(Text1. text) = s 就可以了
2、用 print 语句
print 语句用法为: 控件名.print s
控件名为你要显示的地方,可以是form 也可以是picture控件等 s就是的计算结果。
也可以用debug.print s。这样结果就显示在调试窗口。
1、直接用输出控件
比如用text1输出。计算结果是s 你可以把s赋给text1.text
代码为 text1.text=s 这里的s可以字符型,也可以是数字型 他会自动转换成字符型,等效
text1.text=cstr(s)
本例中 就用这种方法来显示,代码有错误 把(Text.1 text) = s 改成(Text1. text) = s 就可以了
2、用 print 语句
print 语句用法为: 控件名.print s
控件名为你要显示的地方,可以是form 也可以是picture控件等 s就是的计算结果。
也可以用debug.print s。这样结果就显示在调试窗口。
展开全部
1、在窗体添加text1和command1,在command1的单击事件里运行你代码,在text1里显示结果。
2、工具vb6
3、示例:
Private Sub Command1_Click()
Dim a, s, x As Single
a = InputBox("请输入1自变量宽")
x = InputBox("请输入自变量值")
s = a * a + 8 * x
Text1.Text = s
End Sub
3、注意:要确保inputbox()输入的是数值。
2、工具vb6
3、示例:
Private Sub Command1_Click()
Dim a, s, x As Single
a = InputBox("请输入1自变量宽")
x = InputBox("请输入自变量值")
s = a * a + 8 * x
Text1.Text = s
End Sub
3、注意:要确保inputbox()输入的是数值。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
最简单的,在窗体上画一个 Label(标签),默认名字是 Label1。代码里计算过程之后写上:
Lable1.Text = "计算结果是:" & 【计算结果那个变量的名字】
Lable1.Text = "计算结果是:" & 【计算结果那个变量的名字】
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Dim a As Single, s As Single, x As Single
a = InputBox("请输入自变量宽")
x = InputBox("请输入自变量值")
s = a * a + 8 * x
Text1.Text = s '你的语法错误了,怎么能写成 (Text.1 text) = s 呢?
a = InputBox("请输入自变量宽")
x = InputBox("请输入自变量值")
s = a * a + 8 * x
Text1.Text = s '你的语法错误了,怎么能写成 (Text.1 text) = s 呢?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询