What is the value of txtstart.value ?

>hi,
>i get error mesage
>Statement is not valid in a class definition
>thanks
>
>>>hi all,
>>>
>>>how i can write this code under via correct way ?
>>>

>>>Add Object txtstart As TextBox With ;
>>>    Value = (Date()), Left = 80, Top = 115, Width = 100
>>>  Add Object cmdCalculate As CommandButton With ;
>>>    Top = 145, Left = 80, Caption = "Go"
>>>  Add Object grddistribution As Grid With ;
>>>    Height = 280, Left = 190, Top = 5, Visible = .F., Width = 280
>>>
>>>    ****************************************************************
>>>IF  day(txtstart.value)=01 or 1 &&
>>>.
>>>.
>>>endif
>>>

>>>
>>>thanks.
>>
>>I think what you want is:
>>
>>

>>IF INLIST(ALLTRIM(STR(day(txtstart.value))),"01","1")
>>