Ich wollte mal wissen ob es eine möglichkeit gibt ein programm mit mehreren kernen laufen zu lassen, damits eben schneller geht
Ich hab da nämlich folgendes Programm geschrieben um Primzahlen zu errechnen:
Das Programm arbeitet bei meinem Quad aber nur mit 25% sprich einen kern....
Ich hab da nämlich folgendes Programm geschrieben um Primzahlen zu errechnen:
Quellcode
- Dim weiter As Boolean = True
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdGo.Click
- lblStat.Text = "arbeitet"
- lsbPrim.Items.Clear()
- lsbPrim.Items.Add(2)
- Dim i As Integer = 3
- Dim d As Double = 0
- Dim w As Boolean = True
- weiter = True
- While weiter
- w = True
- For x = 0 To lsbPrim.Items.Count - 1
- d = i / lsbPrim.Items.Item(x)
- If d = Math.Floor(d) Then w = False : Exit For
- Next
- If w Then lsbPrim.Items.Add(i)
- i += 2
- My.Application.DoEvents()
- End While
- lblStat.Text = "fertig"
- End Sub
Das Programm arbeitet bei meinem Quad aber nur mit 25% sprich einen kern....