VB计算,在TEXT1中输入两个数字,单击command1按钮,则在text2中显示总和数和平均值.怎么写?比如:输入:6.2 4.7 总和数:10.9 平均值:5.45

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/09 10:51:52

VB计算,在TEXT1中输入两个数字,单击command1按钮,则在text2中显示总和数和平均值.怎么写?比如:输入:6.2 4.7 总和数:10.9 平均值:5.45
VB计算,在TEXT1中输入两个数字,单击command1按钮,则在text2中显示总和数和平均值.怎么写?
比如:输入:6.2 4.7 总和数:10.9 平均值:5.45

VB计算,在TEXT1中输入两个数字,单击command1按钮,则在text2中显示总和数和平均值.怎么写?比如:输入:6.2 4.7 总和数:10.9 平均值:5.45
Private Sub Command1_Click()
Dim a() As String
a = Split(Text1.Text, " ")‘分割两个数据
Text2.Text = (Val(a(0)) + Val(a(1))) / 2
End Sub
输入的两个值用一个空格分开就行了.如果用其他分割符号(例如,号),修改
a = Split(Text1.Text, " "),在" "中代入你的分割符号就行了

VB计算,在TEXT1中输入两个数字,单击command1按钮,则在text2中显示总和数和平均值.怎么写?比如:输入:6.2 4.7 总和数:10.9 平均值:5.45 VB计算,分别在TEXT1、TEXT2中输入一个数字,单击command1按钮,则在text3中显示平均值.怎么写?比如 输入:5.6 8.5 平均值:7.05 VB计算,分别在TEXT1、TEXT2中输入一个数字,单击command1按钮,则在text3中显示平均值.怎么写?比如 输入:5.6 8.5 平均值:7.05 VB计算,分别在TEXT1、TEXT2中输入一个数字,单击command1按钮,则在text3中显 示最大值和最小值相除的结果比如:4.5 4.96 最大值和最小值相除:4.96/4.5=1.1022222222222 如何在VB 中使用datediff计算某开始日期到结束日期之间的月数,并均分到每年在text1中输入200803-200907kssj = Left(Me.Text1.Text,4) & - & Mid(Me.Text1.Text,5,2) '开始时间jssj = Mid(Me.Text1.Text,8,4) & - & Mid(Me.T VB 小数减法计算结果不对的问题做了小程序,里面有减法计算,在TEXT1和text2中分别输入数字A和B(A=212.03;B=202.1)这样的结果是非常明显的是9.93,然而在系统计算的结果确实9.9300000000001,这是 vb 计算器中按等号再按数字键时的问题我用vb编写了一个计算器程序,数字输入的代码是这样的Text1.Text = Text1.Text & 7,可在按下=号键后,希望再按数字键时是重新输入,而不是在后面添加,如何编 vf6.0 我新建一个表单 想实现text1中输入数字a 点击command1按钮 在edit1中显示 计算结vf6.0 我新建一个表单想实现text1中输入数字a 点击command1按钮 在edit1中显示 计算结果bb=a*0.7后四舍五入再乘以12 在VB中Text1为变量定义是什么意思 vb实验:要求在text1中输入一个百位数,然后按command,即在text2中输出百位数由“个、十、百”新组成的数 vb 一组三位数,选最大的两个数两个文本,一个按钮.text1输入一个三位数,156提交命令后,text2输出text1中最大的两个数56.如果text1最大两个数相同,如输入155,那么text2输出55 vb编程,目的是根据输入的直角三角形的直角边长计算周长及面积.想在没填数据或者填的不是数字的时候弹出一个消息框.代码是:Private Sub Command1_Click()If IsEmpty(Text1.Text) = True Or IsEmpty(Text2.Text) VB 限制TEXT输入数字,且只能输入小数点后两位数.比如text1输入中文/英文时,不响应.输入数字响应.输入带小数点的数字时,只允许输入小数点后两位.求代码, vb中定义的d为双精度变量,设d=text1.text,text1.text里输入的是12.3625 为啥运行时d=36.2500, VB计算问题有公式:a+b=c,要求输入任意两个值,能求出第三个值.输入框中要求只能输入数字、小数点、负号.请大侠帮助…… 使用VB在Text1中输入一个英语句子,在Text2中显示出句子中有多少个单词!急用!【提示】根据题意可知:统计单词个数由其中的空格来判断,利用num变量来存放单词个数,因为两个单词中间有一个 使用VB在Text1中输入一个英语句子,在Text2中显示出句子中有多少个单词!急用!【提示】根据题意可知:统计单词个数由其中的空格来判断,利用num变量来存放单词个数,因为两个单词中间有一个 在VB 语句中 x = Val(Text1.Text) Val Dim y As IntegerPrivate Sub Command1_Click()Text2.Text = yEnd SubPrivate Sub Text1_Change()x = Val(Text1.Text)If x < 0 Or x > 100 ThenText1.Text = Text1.SetFocusLabel1.Caption = 请重新输入ElseLabel1.Ca