• Forum vBulletin altyapısından Xenforo altyapısına geçirildi, bu sebeple eski şifreleriniz ile foruma giriş yapamayacaksınız, parolamı unuttum adımından mailiniz ile şifre sıfırlayarak giriş yapabilirsiniz.

    Üyeliklerinde geçerli bir mail adresi olmadığı için sıfırlama yapamayacak kullanıcılar forum kullanıcı adlarını ve yeni şifrelerini yazarak info@maxigame.org adresine şifre sıfırlamak istediklerine dair bir mail göndersinler şifrelerini sıfırlayıp mail adreslerini güncelleyeceğiz. Şifreniz sıfırlandıktan sonra foruma giriş yapıp tekrar istediğiniz gibi değiştirebilirsiniz.

VB.NET Sorular - Kod istekleri

  • Konuyu başlatan Konuyu başlatan Cottonmouth
  • Başlangıç tarihi Başlangıç tarihi
Bunun İçi Zor Diyenler Oldu Tatile Gitmeden Önce Program Yapıcam Burada Bekliyorum Bütün Gece :D
 
Formda 1 text box 1 tane listbox ve 2 tane buton (biri gizle diğeri göster)

Pencere Adını giriyorsun textbox 'a Gizle d iyon gizliyor ve listbox'a ekliyor listboxtan seçiyorsun göster diyon gösteriyor pencereyi ve listboxdan siliyor nasıl yapıcam bunu


Bunun Kodları ney

Çok mu zor oldu xD

https://www.maxigamerz.com/f195/vbnet-videolu-derslersurekli-yeni-dersler-113651/
Yukardakı Link te bulabılırsın listbox kullanımı (videolu) bak biraz ugras yapamazsan kodları verırım
 
Yeni geldim dershaneden bakıyorum şimdi

----------

işletim sistemi 32bit

herhangibir fikrim yok ama net frameworku güncellemeyi deneyebilirsin belki işe yarar. birde bilgisayar adınca özel karakterler olmasın bendede onnla ilgili bir sorun olmuştu. Mesela £mr& bilgisayarın adı diyelim o zaman £mr&/belgeler/visual... gbi bir yere kaydetmeye çalışıyor debug yaptığında buda sorun oluyor.
 
Tamam Bekliyorum Seni Emre ^^

Umut Sen İsterseN Bak :D
 
önce şu değişkenleri ekle dll i okut ve fonksiyonu aç

Const SW_GIZLE As Integer = 0
Const SW_GOSTER As Integer = 9
Dim hWnd As Integer
Dim p As Process()
<DllImport("User32")> Private Shared Function ShowWindow(ByVal hwnd As Integer, ByVal nCmdShow As Integer) As Integer
End Function


Sonra Form1_load eventi :

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
pencerelerigoster()


End Sub

penceleri göstermek için gerekli sub :


Private Sub pencerelerigoster()
Dim islem() As Process = Process.GetProcesses()

ListBox1.Items.Clear()

For Each x As Process In islem
If x.ProcessName <> "" Then
ListBox1.Items.Add(x.ProcessName())
End If
Next
ListBox1.Items.Remove(Me.Text)
End Sub

Button3_Click ; (gösterme)

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
ShowWindow(hWnd, SW_GOSTER)

hWnd = p(0).MainWindowHandle.ToInt32

End Sub

Button4_Click (Gizleme) ;

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
ShowWindow(hWnd, SW_GIZLE)
hWnd = p(0).MainWindowHandle.ToInt32

End Sub

Listbox1_selectedindexchange(listede seçili itemi değiştirme ) ;

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
p = Process.GetProcessesByName(ListBox1.SelectedItem.ToString)
End Sub



bi bak hızlıca yaptım arenadayım da :D Eksik varmı ?
 
4eac58fc.png


Neyi Beceremedim ?
 
Senlik bişey değil . Import edilicekleri söylemeyi unutmuşm :D

en üste bunu ya

Imports System.Diagnostics
Imports System.Runtime.InteropServices
 
Fonksiyon nasıl açılıyor bir de onu beceremedim :S
 
Açıyoruz zaten verdiğim kodlarda dllimportdan sonra özel birşey yapmana gerek yok .

<DllImport("User32")> Private Shared Function ShowWindow(ByVal hwnd As Integer, ByVal nCmdShow As Integer) As Integer
End Function
 
Beceremedim. Sen Bana Atar Mısın AllFiles Olarak
 
Başka işim var şuan :S Uğraş biraz daha . olmazsa sonra atarım. yapılamıyacak birşey yokki kodlar ortada
 
Geri
Üst