dennistky
04-06-2003, 03:00 AM
Dear VB expert,
I am currently trying to understand the meaning of Val(txtID)? Can somebody enlighten me? Below is part of the program which I am stuck?
Regards
Dennis Tan
Private Sub txtID_Change()
Dim Sift%
Cells(Val(txtID) + 4, 7).Activate ' Move Cell Position
lblSend = Cells(Val(txtID) + 4, 6).Value ' Show Send Comment
txtSend = Cells(Val(txtID) + 4, 7).Value ' Show Sended Contents
txtWait2 = Val(Cells(Val(txtID) + 4, 8).Value) ' Show Wait
If Cells(Val(txtID) + 4, 9).Value = "None" Then
chkResive.Value = 1 'If there is no Responce
Else
chkResive.Value = 0 'If there is any Responce
End If
End Sub
I am currently trying to understand the meaning of Val(txtID)? Can somebody enlighten me? Below is part of the program which I am stuck?
Regards
Dennis Tan
Private Sub txtID_Change()
Dim Sift%
Cells(Val(txtID) + 4, 7).Activate ' Move Cell Position
lblSend = Cells(Val(txtID) + 4, 6).Value ' Show Send Comment
txtSend = Cells(Val(txtID) + 4, 7).Value ' Show Sended Contents
txtWait2 = Val(Cells(Val(txtID) + 4, 8).Value) ' Show Wait
If Cells(Val(txtID) + 4, 9).Value = "None" Then
chkResive.Value = 1 'If there is no Responce
Else
chkResive.Value = 0 'If there is any Responce
End If
End Sub