PDA

View Full Version : سوال: فرم با نقطه



soleman
چهارشنبه 21 اسفند 1387, 15:30 عصر
چطور میتونم روی فرم مثل همن فرمایی که ویژال بیسک نقطه بزارم کهه زیاد طول نکشه و بعدش هم مثل وِیژوال بیسک از این نقطه ها برای منظم کردن چیزای که مخوام استفاده کنم؟:متفکر:

amirrezan
پنج شنبه 04 تیر 1388, 23:42 عصر
این کد برای نقطه نقطه کردن صفحه است


Option Explicit

Private Sub Form_Load()
Const rScale = 8
Dim LScaleMode As Long, X As Long, Y As Long
LScaleMode = Me.ScaleMode
Me.ScaleMode = vbPixels
Me.AutoRedraw = True
Me.Cls
For X = 0 To ScaleWidth Step rScale
For Y = 0 To ScaleHeight Step rScale
Me.PSet (X, Y)
Next
Next
Me.ScaleMode = LScaleMode
End Sub

مهران رسا
جمعه 05 تیر 1388, 13:41 عصر
این همه یک نمونه همراه ScrollBar !