uji coba

contoh trial vb project 


<table border=”1″><tr><td> 
If isDemo = True Then
Dim i As Date
i = Date
If Year(i) <> 2011 Then 'Month(i) <> 7 Then
For Each control In Me.Controls
If TypeOf control Is XPButton Then
control.Enabled = False
End If
Next control
Else
If Month(i) <> 9 Then
TbSIMPAN.Enabled = False
TbBersih.Enabled = False
TBEXIT.Enabled = True
End If
End If
End If
 ></td></tr></table>

Posted in: cristal report dengan vb,gendoncorporation,mesuji raya,mesujiraya,pemprograman,programing,servicegendoncorporation,vb,vb 6.0,vb net,vb.net