主题：不知道问题出在哪里？(已解决）

在DATETIMEPICHER控件的TEXTCHANGED事件里有如下代码

Dim BHTEMP As String

BHTEMP=format(e.Form.Controls("DateTimePicker2").Value,"yyyyMMdd")
Dim max As String
Dim idx As Integer

max = Tables("bmk").Compute("Max(BH)","substring([bh],5,8) = " & bhtemp & "" )
If max>"" Then
idx = CInt(max.Substring(10)) + 1
Else
idx = 1
End If

e.form.Controls("BH").Value ="HHZY" & BHTEMP & Format(idx,"00000")

一运行总是出现如下错误提示。不知道代码问题出在哪里

此主题相关图片如下：未命名.jpg

这个问题出在“e.form.Controls("BH").Value ”我查了一下LABEL空间，我将代码修改成"e.form.Controls("BH").text",解释一下e.form.Controls("BH")这是窗体中的一个LABLE控件