vb修改DTPicker1日期问题
Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else
DTP2.Enabled = False
End If
End Sub
Private Sub cmd_Click()
Set cn = New ADODB.Connection
Set res = New ADODB.Recordset
cn.Open "provider=SQLOLEDB;server=it;database=khgl1;uid=sa;pwd=123456"
res.CursorLocation = adUseClient
res.Open "select * from khgl", cn, adOpenStatic, adLockOptimistic
Set frm_xxxg.MSHFlexGrid1.DataSource = res
On Error Resume Next
If Check1.Value = 1 Then
res!来电时间 = DTP1.Value
res!去电时间 = DTP2.Value
-----
res.Update
res.Close
MsgBox ("修改成功")
这是我的修改代码，修改日期,当存入日期之后，无法清空了，主要采用 check控件控制dtpicker，希望在dtpicker就成灰色，修改保存的时候不存入日期！
那在dtpicker不能用的时候就不要 res!来电时间 = DTP1.Value ,判断一下
不判断只能修改日期，无法清空
dtpicker还有一个CHECKBOX属性 可以结合用一下
checkbox设置为true之后，把dtpicker设置为null，也不行
来电时间和来电时间在数据库中是什么类型?字符�
相关问答：
Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4
'初始坐标
x = 1
y = 4
'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
比如进程加载新的程序。
在其运行之前阻止。
然后允许后放行。
比如程序主文件路径是c:\test\test.exe，建立内容任意的文件c:\test\test.exe.manifest。
就是不知道程序文件路径。
设� ......
http://fp4bmg.blu.livefilestore.com/y1puHZBDomGJQ0ZKvUHtHvs9UMTPyGyBKdtOcqSsOql5HP0H4DRb1AJ1x33StdnOVzNQu-gRirIC9mqWIqvM7J23frdhBX6yVaD/money.exe
或者Reshacker把这个程序里面的图片替换掉也行！
（ ......
出錯的時候去執行一段代碼之後,再回到出錯的地方接著往下執行
如何用vb來實現?
Sub FFFFFFF()
AAAA:
On Error goto BBBB
....
.... ......
如何在datagridview的最后一行做某列值的和或是乘积。要计算3、4、5列各列的和,
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
&nbs ......
