VB.NET Sorular - Kod istekleri

kolay da yarın inş

Ichy' Alıntı:

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

Genişletmek için tıkla ...

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

bnim sorunumuda çözermisiniz

Yeni geldim dershaneden bakıyorum şimdi

----------

wwoollff' Alıntı:

işletim sistemi 32bit

Genişletmek için tıkla ...

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.

Ichy' Alıntı:

Hocam Aslında Ben Denedim Galiba Yanlış Anladın List Box Kullanımı Zaten Bİliyorum

Genişletmek için tıkla ...

Ben Bilmiyorsun Sandım Kusura Bakma biraz Ugrasayım bir şeyler cıkar belkı

ö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 Eksik varmı ?

Senlik bişey değil . Import edilicekleri söylemeyi unutmuşm

en üste bunu ya

Imports System.Diagnostics
Imports System.Runtime.InteropServices

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

Başka işim var şuan :S Uğraş biraz daha . olmazsa sonra atarım. yapılamıyacak birşey yokki kodlar ortada