Programalama > VISUAL BASIC

'burada bir command yap ve aşağıdaki kodu pastele
'bu shell komutu harbiden güzel bir komut yaz shell'i programınızda windowsu ortaklaşa kullanın. hadi hayırlı olsun

Private Sub Command1_Click()
Dim dblReturn As Double
dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl")
End Sub