قسمت هایی از برنامه نویسی ماشین حساب در ویژوال بیسیک 6 :
یادتون نره که متغیر ها رو عوض کنید.!



در قسمت general دو متغیر از نوع عددی و رشته ای تعریف می کنیم.
کد:


Dim p As Double

یک کد جالب که با توجه به نیازتون اگر تغییرات لازم بدین کاربرد جالبی میتونه داشته باشه*

کد:




procedure TForm1.FormCreate(Sender: TObject);
var
* FullRgn, ClientRgn, ButtonRgn: THandle;

Function MiladiToShamsi(var Year, Month, Day: Word): String;
const
count_days : array[1..12] of Byte = (31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
var
i: Byte;
st: String;
day_year:...