笨笨地问个VB的问题

来源：百度知道 编辑：UC知道 时间：2024/07/02 10:23:17
如果我在一个工程里建了text1和text2
我想要达到的效果是不管text1里输入什么数字经过一段计算后能从text2中输出计算结果
高手帮我写一写这个程序怎么写!!
还有将text1里的数字赋值给变量A和将变量A的数值给TEXT2的语句分别怎么写啊 ? 要完整点的

谢谢啦1!!

谢谢啦!!!
我想这个对于一个高手老说是很简单的
我也承认我很笨
但表骂我!!!

我不是高手，但可以帮你，^_^。
打个比方吧，求text1里的数字的平方。
private sub form_click()
text2=val(text2)^2 '其中val是将文本筐里的字符形变量转换成数值形。括号中的text2也可以写成text2.text由于text的text属性很常用，所以可以省略
end sub
将text1 的值赋给a，再将a赋给text2:
dim a as integer
a=text1
text2=a
就是这样的
建议你买一本vb书看一下

新建个工程，窗体form1包含三个控件，分别是文本框：TEXT1和TEXT2
按钮：Command1
双击Command1进入Command1单击时间：
代码如下：
Private Sub Command1_Click()
Dim A As Integer
Dim sum As Long
A = Text1.Text'把TEXT1的值赋给变量A
sum = a * a'计算过程，并把计算结果赋给变量sum。可自己根据需要来写，
Text2.Text = sum'把结果在TEXT2显示出来
End Sub

很久没碰VB了，呵呵

private text1_change()
dim a
a=val(text1.text)
text2.text=...过程
end sub

private sub form_click()
dim a
a=val(text1) * 55 (运算的话就要用val()函数了)
text2=a
end sub
94这么简单

Private Text1_Change()
a=Text1
a=a+1
Text2=a
End Sub

上面两