Yahoo ID : pooya511
اگر مشكل و يا سوالي داشتيد و یا تکلیفی داشتید ميتونيد ازم بپرسيد 
.
اگر خواستید متن عدد یا هر چیز دیگری را روی form برنامه تان چاپ کنید
[name of the form].Print Form
بعد از printform اگر متغیر یا عدد و یا عبارت داخل " " قرار دهید آن را برایتان چاپ میکند .
برای ایجاد space بعد از نوشته ها از کد زیر استفاده کنید (به جای numberتعداد space ها رو بذارید .(
space(number)
در tab نیز به تعداد عدد داخل پرانتز tab چاپ می شود .
tab(number)
یک برنامه که خودم نوشتم به عنوان مثال برای چاپ روی فرم :(با کد برنامه)
Dim x As String
Dim y As Integer
Dim z As Integer
Dim f As Integer
x = "x"
z = 5
For countvar = 1 To 5
Form1.Print ; Tab(z); x
x = x + "xx"
z = z - 1
Next countvar
''''''''''''''''''''
x = "xxxxxxx"
y = 6
f = 3
Form1.Print ; Tab(2); x
z = 3
''''''''''''''''''''
For countvar2 = 1 To 3
Mid(x, y, f) = " "
Form1.Print ; Tab(z); x
z = z + 1
f = f + 2
y = y - 2
Next countvar2
این کد رو توی یک commandbutton قرار بدید.پس از کلیک command شکل زیر چاپ میشه: 
جمع :
Dim x As Integer, y As Integer
x = InputBox("Please Enter First Number") 'dar yaft voroodi 1
y = InputBox("Please Enter Second Number") ' dar yaft voroodi 2
z = x + y ' jam do moteghayer x va y va gharardadane hasele jam dar z
از ظ به عنوان خروجی عمل جمع استفاده کنید . تفریق نیز به همینگونه است ولی در خط 4 :
z = x - y
برای ضرب در خط ۴ : z=x*y
برای تقسیم اعشاری : z =x / y برای تقسیم صحیح : z= x \ y
لطفا ً نظر بدید .
| S/N : OCKFBLLA name: freeserials.net |
مراحل : استارت------> run --------> تایپ کنید syskey -------> سپس Encrption enable ro انتخاب کنید و Update رو بزنید . ---------> گزینخ password setup ro انتخاب کنید . ----------> پسوردتون رو 2 بار تایپ کنید و ok رو بزنید . 
