Skip to main content

AccessTr.neT


Pset kullanımı

Pset kullanımı

Çözüldü #1
iyi günler
Ayrıntı.PSet (500, 500), 255
diye bir komut olabilirmi
daha doğrusu
Nesne.PSET (X,Y), Renk
şeklinde vb için bir kod var
nesnenin belirlenmiş bölgesine nokta koyuyor
bu ayrıntı için geçerli olur mu
ayrıntı bir nesne midir
teşekkürler
Sub Ayrıntı_Print(Cancel As Integer, PrintCount As Integer)
Dim sngMidPt As Single, intI As Integer
' Set scale to pixels.
Me.ScaleMode = 3
' Calculate midpoint.
sngMidPt = Me.ScaleHeight / 2
' Loop to draw line down horizontal axis pixel by pixel.
For intI = 1 To Me.ScaleWidth
Me.PSet(intI, sngMidPt)
Next intI
End Sub
@benbendedeilem
Son Düzenleme: 03/02/2010, 14:32, Düzenleyen: accessman.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Pset kullanımı - Yazar: accessman - 03/02/2010, 13:57
Cvp: Pset kullanımı - Yazar: cuneyt - 03/02/2010, 21:02
Cvp: Pset kullanımı - Yazar: accessman - 04/02/2010, 08:35
Cvp: Pset kullanımı - Yazar: accessman - 07/02/2010, 21:54
Cvp: Pset kullanımı - Yazar: accessman - 09/02/2010, 08:06
Cvp: Pset kullanımı - Yazar: accessman - 09/02/2010, 10:05
Cvp: Pset kullanımı - Yazar: esrefigit - 09/02/2010, 13:02
Cvp: Pset kullanımı - Yazar: esrefigit - 09/02/2010, 17:23
Cvp: Pset kullanımı - Yazar: esrefigit - 10/02/2010, 09:04
Cvp: Pset kullanımı - Yazar: accessman - 10/02/2010, 09:13
Task