درخواست فوری برنامه(client to screen به زبان VB.NET

[sh711917]

سلام
من تابع client to screen به زبان VB,NET می خوام نیاز قوری دارم .
این تابع از توابع API است.
یک سوال دیگه هم دارم خواستم بدونم اگه بخوام یک دستور بروی فرم نمایش داده بشه چیکار کنم بدون استفاده از TEXTBOX ,LABEL,COMMAND
با تشکر

[arash020]

یه روش برای سوال دوم:


Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
e.Graphics.DrawString("Hello World", Me.Font, Brushes.Red, 10, 10)
End Sub

[sh711917]

با تشکر ولی یه مشکلی داره من می خوام مختصات x,y را حساب کنه برنامم اینو بزنیم ثابته یهنی اگه ماوس رو حرکت دهیم مخیتصات x,y تغییر نمی کند
برای من سوال اولی مهم تره

[M.T.P]

Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
If e.Button = Windows.Forms.MouseButtons.Left Then
Dim Gr As Graphics = Me.CreateGraphics
Gr.DrawString("hello", Me.Font, Brushes.Blue, e.X, e.Y)
End If
End Sub

در رابطه با سوال اول ، می خواید چه کاری انجام بدهید؟

[sh711917]

من کد کامل دستور clienttoscreen مس خوام که مختصات رو از کاربر می گیره و به مختثات صفحه تبدیل می کنه
اون کدی رو که شما دادین ردم درست کار نکرد من این کد رو برای تابع getcoursorpos می خوام