VB中怎样设置将文本框中的数据保存下来

这个方法可以利用API函数读写配置文件实现，参考例子如下：首先申明API：Private Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long

Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long 将Text1的内容保存到E:\aini中：

Private Sub Command1_Click()

WritePrivateProfileString "UserName", "User", Text1Text, "E:\aini"

End Sub 将E:\aini的内容读取到text2中Private Sub Command2_Click()

Dim inistring As String

inistring = Space$(254)

GetPrivateProfileString "Username", "User", "", inistring, 255, "E:\aini"

Text2Text = CStr(inistring)

End Sub

首先要确定一下您所谓的自动是什么意思,是在文本框中输完就保存呢还是在您全部输入一系列相关内容后按某个键后保存,

如是第一种情况, 那么您保存的代码应该写在文本框的事件中,如您在文本框中输入一个回车表示您输入完毕保存数据

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then '输入了回车

rsaddnew

rs!姓名 = Text1

rsupdate

End If

End Sub

如是第二种情况,就得把代码写到command_click事件中了

VB是面向对象的开发工具,您可以在任何您需要保存的事件中写入保存代码,这样就能符合您的要求了

点击修改按钮以后，相对的数据显示到 信息显示 窗口的相对TextBox 的代码如下：

1

2

信息显示TextBox1Text = DataGridView1SelectedRows(0)Cells("Name_CN")ValueToString'中文姓名为例，其他的跟这个一样。

信息显示ShowDialog()

完成修改的SQL代码如下：

1

UPDATE 表名 SET Name_CN='新值', Name_EN='新值' WHERE 列名=条件

以上就是关于VB中怎样设置将文本框中的数据保存下来全部的内容，包括:VB中怎样设置将文本框中的数据保存下来、如何将vb中输入的数据自动储存在数据库中、在vb.net上的dategridview修改后的内容怎么保存在数据库。例如，点击一个按等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！