Question

请问一下，利用vb凭公式设程序，如何使输出值的数字的字体变大，谢谢啊！

输出值为x啊。

Answer 1

代码发来，我给你改改，多简单点事

追问

Private Sub command1_click()
Dim x As Single, y As Single, z As Single
z = Val(Text1.Text)
y = Val(Text2.Text)
x = 90 - z + y / 2.5
Print x
End Sub
其他三个类似，x=90-2z+y/2.5等等，请问每道程序后加什么啊，谢谢啊！

追答

也不知道他们啰嗦半天说啥呢？？？你是不是每次只显示算出来的结果？上次的结果清除掉是吗

Private Sub command1_click()
Dim x As Single, y As Single, z As Single
me.cls '一句话搞定你的问题
z = Val(Text1.Text)
y = Val(Text2.Text)
x = 90 - z + y / 2.5
Print x
End Sub

追问

不好意思啊，那text框里输入的数据在每次算完以后，怎样加vb代码自动清除？谢谢啊！

Answer 2

调大窗体的字号即可。

追问

谢谢啊，但我想问一下，每次算出一个值后，下一次再算另一个只时，上一值就消失，该加什么程序，我在一个form里一共设了三个公式的程序，是在每个公式程序后加吗？

追答

没计算出一个结果你就使用print打印一次就行了，也可以使用3个标签，把每个结果计算出来后都保存在不同的标签中。

Answer 3

Label1.FontSize = Label1.FontSize+1{这个可以换2，3，4都行}
或
Label1.FontSize = 30

Answer 4

什么意思？是在窗体上显示么？