请你帮忙解释一下图片代码各句的意思,谢谢!!

如题所述

首先运行的是 form_load 这个程序就是加载窗体的时候运行
第一行:将“用户名”的值赋给 tUser_1 “用户名”和 tUser_1 可能是窗体的公共变量,也可能是个文本框,具体情况看你的窗体设计
第二、三行跟第一行一样
第四行是将 tEnter 赋为空值

其它三个都是按钮程序,即是点击窗体上的按钮才运行
CmdEdit_Click()这个程序是点击名称为CmdEdit的按钮才运行(不是caption,是name)
tuser_1.enabled=true 将tUser_1(应该是文本框)的可操作属性设为真,如果tuser_1=false的话
这个文本框就不能操作,你自己可以试试。
Me!Lremark.visible=true 将Lremark(应该是标签)的可视属性设为真,Me!Lremark.visible=false的话,运行程序后,就看不见这个标签了。

这个程序其它行就不用解释了,跟前面的一样

cmdquit_Click()
这个程序是点击名称为cmdquit的按钮才运行(不是caption,是name)
DoCmd.Close 将记录集关闭,或者是关闭窗体

CmdSave_Click()
这个程序是点击名称为CmdSave的按钮才运行(不是caption,是name)
if me!tpass=me!tenter then 判断tpass的值跟tenter 的值是否相等
如果相等:
if 语句下面的前面三行,是将tuser_1 / tpass /tremark_1 的值写进数据库
Forms!fEdit.Refresh 应该是刷新一个控件,至于那个控件,看你的窗体
DoCmd.GToControl "cmdedit" 程序自动点击CmdEdit按钮,自动运行CmdEdit_Click()这个程序
注意先运行了一遍CmdEdit_Click()程序,再运行 CmdSave.Enabled=false
这些都不用解释了吧,前面解释过意思

如果不想等:
msgbox "请重新输入口令!"
弹出提示框
vbokquit 这只是提示框的一种模式,其它模式想了解可以度娘一下。追问

是不是.visible=false就看不到相应的标签,对话框等等这些??
docmd run SQL 是什么意思??
docmd 呢??
这句:
DoCmd.RunSQL ("update tUser " & "set 用户名='" & Me!tUser_1 & "'" & "where 用户名='" & Me!tUser_1 & "'")
应该怎么看啊??主要是括号里面的

谢谢先了!!!!!!!!!

追答

我昨天回答了的,不知道为嘛没了。。。。。
.visible=false运行这句代码后,确实看不见相应的控件。
docmd是一个记录集的name属性,就是一个记录集的名称
docmd.runsql就是记录集运行sql语句,sql语句即是后面括号里的
update tUser 就是更新tUser 表,只要你代码改动了表里面任何数值,都要update才能保存下来以及读取到你当前的记录集里面
set 用户名='" & Me!tUser_1 让tUser 的字段“用户名”等于Me!tUser_1的值
where 用户名='" & Me!tUser_1 找到表tUser的字段“用户名”等于Me!tUser_1的所有数据
DoCmd.RunSQL ("update tUser " & "set 用户名='" & Me!tUser_1 & "'" & "where 用户名='" & Me!tUser_1 & "'")

这句代码比较费解,现在假设Me!tUser_1 =456

来自:求助得到的回答
温馨提示:答案为网友推荐,仅供参考
第1个回答  2012-08-23
主要处理就是CmdSave_Click这个处理
看程序是个更改用户名或密码的处理
主要看看RunSQL这个方法里面是怎么处理的

-----------------------
其他都是设置画面的一些状态