vb textbox中如何获取更改前的值？
我想让TextBox的TextBox_Change发生时就打印出上一次的值，
要怎样处理？
Dim Oldtext As String
Private Sub Text1_Change()
Debug.Print Oldtext
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Oldtext = Text1.Text
End Sub
这种效果？
Dim Oldtext As String
Private Sub form_load()
Oldtext=text1.text
End Sub
Private Sub Text1_Change()
debug.print Oldtext
Oldtext=text1.text
End Sub
这个似乎没有直接的消息或方法,看来你要自己定义一个变量,每次TextBox_Change时都把当前值存下来,这样下次TextBox_Change时就可通过这个变量知道更改前的值了;)
晕,三个人的答案撞做一堆了
相关问答：
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
本人使用的是VB6.0版本
假设有一个对象A，A内有类型为B的对象属性。现在的问题是，需要添加若干个B对象作为A对象的属性。如，
A.B1,A.B2,...
但具体添加多少个B对象作为A对象的属性则视具体情况不同而不同 ......
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
MouseWait()
Dim ClearTempTabelSQL As String
'If Not ......
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
