Edit Method Example

原创 2005年05月19日 09:21:00

'This example uses the Edit method to replace the current data with the 'specified name. The EditName procedure is required for this procedure to run.

Sub EditX()

 Dim dbsNorthwind As Database
 Dim rstEmployees As Recordset
 Dim strOldFirst As String
 Dim strOldLast As String
 Dim strFirstName As String
 Dim strLastName As String

 Set dbsNorthwind = OpenDatabase("Northwind.mdb")
 Set rstEmployees = _
  dbsNorthwind.OpenRecordset("Employees", _
  dbOpenDynaset)

 ' Store original data.
 strOldFirst = rstEmployees!FirstName
 strOldLast = rstEmployees!LastName

 ' Get new data for record.

strFirstName = Trim(InputBox( _
   "Enter first name:"))
 strLastName = Trim(InputBox( _
   "Enter last name:"))

 ' Proceed if the user entered something for both fields.
 If strFirstName <> "" and strLastName <> "" Then
  ' Update record with new data.
  EditName rstEmployees, strFirstName, strLastName

  With rstEmployees
   ' Show old and new data.
   Debug.Print "Old data: " & strOldFirst & _
    " " & strOldLast
   Debug.Print "New data: " & !FirstName & _

" " & !LastName
   ' Restore original data because this is a
   ' demonstration.
   .Edit
   !FirstName = strOldFirst
   !LastName = strOldLast
   .Update
  End With

 Else
  Debug.Print _
   "You must input a string for first and last name!"
 End If

 rstEmployees.Close
 dbsNorthwind.Close

End Sub

Sub EditName(rstTemp As Recordset, _
 strFirst As String, strLast As String)

 ' Make changes to record and set the bookmark to keep

' the same record current.
 With rstTemp
  .Edit
  !FirstName = strFirst
  !LastName = strLast
  .Update
  .Bookmark = .LastModified
 End With

End Sub

Struts2.5动态方法调用 错误Messages:This method: edit for action product is not allowed!解决方法

报错信息如下: Struts Problem Report Struts has detected an unhandled exception: Messages: Th...
  • zp1318
  • zp1318
  • 2016年06月03日 19:03
  • 3096

APS.NET_MVC5学习笔记-验证编辑方法(Edit method)和编辑视图(Edit view)

在本节中,您将验证电影控制器生成的编辑方法(Edit action methods)和视图。但是首先将修改点代码,使得发布日期属性(ReleaseDate)看上去更好。打开Models \ Movie...

ASP.NET MVC 5 - 验证编辑方法(Edit method)和编辑视图(Edit view)

在本节中,您将验证电影控制器生成的编辑在接下来的教程中,我们将讨论DataAnnotations。Display属性指明要显示的字段的名称(在本例中“Release Date”来代替“ReleaseD...

Windows edit控件(编辑框控件)

在C语言控制台程序(Console Application)中,可以使用 scanf 函数获取用户的输入,而在Windows程序中使用编辑框控件。 创建编辑框控件 编辑框控件的窗口类名是edi...
  • softn
  • softn
  • 2016年06月20日 06:40
  • 1361

Windows消息对Edit控件的处理

例如对windows发消息让文本选中。 SendMessage(Text1.hwnd,EM_GETSEL,0,-1 ); EC_LEFTMARGIN(&H1) EC_USEFONTINF /...

MFC——LIstCtrl中嵌入Edit和Combobox控件

在MFC中经常会使用到ListCtrl控件,并且在控件中可以对单元格进行Edit的编辑或者ComboBox的编辑。实现ListCtrl中用edit和combobox编辑并数据同步,下面就是我用到的这个...

汇编语言 文本文件编辑器(简单的EDIT)

源代码下载 http://pan.baidu.com/s/1qYa3L04一、 问题描述用汇编语言实现一个文本文件编辑器(简单的EDIT),实验要实现打开、保存、编辑。二、数据结构为了处理文本信息的读...
  • Shuphen
  • Shuphen
  • 2017年07月14日 10:30
  • 532

MFC->Edit Control控件基本使用

介绍使用Edit Control控件进行基本的输入和显示,其他功能有待补充。使用MFC应用程序开发流程: 1.创建基于对话框的应用程序框架(修改对话框属性) 2.给对话框添加控件(设置唯一ID) 3....
  • xAston
  • xAston
  • 2016年03月16日 00:32
  • 2518

MFC中Edit控件的用法整理

MFC中Edit用法整理 众所周知,现在微软出台的编译器已经很多了,如vc++6.0,vs2005,vs2008,vs2010等,虽然变化多样,但是万变不离其根本,最根本用法没有多大变化。打开你所安...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Edit Method Example
举报原因:
原因补充:

(最多只允许输入30个字)