|
Registrieren
Login
BackgroundWorker und Zedgraph.dll
Verfasst am: 19.10.2011, 09:48 Aufrufe: 335
Add(fraction)
End If
End If
Next
For Each databra In del_fractions
frac.Remove(databra)
Next
End If
Return frac
End If
Return Nothing
End Function
beim zuweisen in "temp" tritt der fehler auf
Gruß
pascal
Retain Astigmatism Peeled DVD
Verfasst am: 09.09.2011, 07:49 Aufrufe: 531
By carrying out this it will checklist probably the most advantageous and expenditures for you. very much more importantly, they will also price the institution and help offered by each and every of those over the net stores. even although you are at it, also make specific that you just confirm out the , return policies, and customer ratings.
You also can retain astigmatism peeled for close-out and liquidation sale ...
ListView Einstellung speichern/laden
Verfasst am: 26.08.2011, 11:20 Aufrufe: 467
Columns(i).Text & "-"
Next
My.Settings.m_listView_setting = str
My.Settings.Save()
MsgBox("Fertig!")
Return
End Sub
Laden: PROBLEME!! Bitte hier um HILFE!!
Private Sub btnLoad_Click(sender As System.Object, e As System.EventArgs) Handles btnLoad.Click
Dim str As String = My.Settings.m_listView_s ...
nach externem Programmaufruf eine Zeile aufrufen
Verfasst am: 08.08.2011, 10:37 Aufrufe: 141
Hallo alle miteinander,
gebe zu bin blutiger Anfänger und brauche eueren Rat.
Ich rufe via shell ein extrenes Programm auf dieses benötigt aber zum Start einen Benutzer - ich möchte nunmehr das Programm aufrufen und dann gleich den Benutzername plus Return mitschicken wie kann ich das tun?
Danke schonmal im Voraus 
Objekt mit Pfeilen bewegen + Start-Button
Verfasst am: 21.07.2011, 18:29 Aufrufe: 587
Steuern über Pfeile:
Schritt 1
Protected Overrides Function isinputkey(ByVal keyData As System.Windows.Forms.Keys) As Boolean
Select keyData
Case Keys.Up, Keys.Down, Keys.Left, Keys.Right
Return True
End Select
End Function
Schritt 2
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me. ...
XML .... Controls
Verfasst am: 13.07.2011, 17:33 Aufrufe: 450
<Language>.<Menu>.<mnuStripFileCloseProgram>.Value)
Return 1
End Function
Ich möchte quasi aus dem XML-File einen Wert auslesen von einem Child-Element und dem entsprechenden Form-Element zuweisen. Wie man sieht heißt das Child-Element genauso wie das Form-Element.
Jetzt bräcuhte ich quasi eine Schleife baut, da ich sonst ja jeden Wert einzeln zuweisen müsste. Ab einer gewissen ...
Textbox Inhalt Vererbung zwischen Klassen
Verfasst am: 18.03.2011, 13:15 Aufrufe: 241
MaxLength = 6
_ProjectNumber.Width = 90
_ProjectNumber.Height = 16
Return _ProjectNumber
End Function
End Class
Public Class Template
Public Function Builder() As List(Of Control)
Dim GI As GeneralInformation = New GeneralInformation
Dim value As List(Of Control) = New List(Of Control)
value.Add(GI.txtProjectNumber)
Return value
End ...
ButtonKlick ohne name ( Web )
Verfasst am: 10.01.2011, 11:43 Aufrufe: 1120
Und zwar:
Möchte ich einen Button klick im webbrowser ausführen lassen ( das ist der einzigste Button auf der ganzen Seite )
( type=button )
hier der dazugehörige Code
<input type="button" class="inCo fwB" value="Add" onclick="Guestbook.entry.send('Add', this);return false;">
da der button aber kein Name enthält außer dem onclick..
finde ich leider keine Lösung
w ...
JPG wird mit der falschen Bittiefe / Farbtiefe gespeichert
Verfasst am: 18.12.2010, 14:25 Aufrufe: 537
... phics = Graphics.FromImage(bild_dest)
grafik_dest.DrawImage(bild, 0, 0, _
bild_dest.Width + 1, _
bild_dest.Height + 1)
PictureBox1.Image = bild_dest
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
bild_dest.Save(SaveFileDialog1.FileName)
Else
Return ...
Ruckeln bei DrawReversibleFrame oder DrawFocusRect
Verfasst am: 16.12.2010, 19:36 Aufrufe: 474
... teger
Dim Top As Integer
Dim Right As Integer
Dim Bottom As Integer
End Structure
'Lokale Variablen
Private FramePen As Pen
Private DrawArea As Graphics
Private MouseDwn As Boolean
Private Frame As RECT
Private SrcPt As Point
Private DrawOnClient As Boolean
Private Dragging As Boolean
'Eigenschaften
Public Property FrameColor()
Get
Return ...
TreeView - TreeNodes rekursiv
Verfasst am: 06.10.2010, 21:56 Aufrufe: 654
GetDirectories(str_Pfad)
obj_new.Nodes.Add(F_Folder(str_run, obj_new))
Next
obj_Node.Nodes.Add(obj_new)
Return obj_Note
End Function
Probleme bereitet mir die Funktion "F_Folder", ich vermute das es am Rückgabewert liegt, bin mir also nicht sicher. Die Funktion bleibt im Part:
For Each str_run As String In System.IO.Directory.GetDirectories ...
konsolen anwendung in eine forms anwendung bringen
Verfasst am: 28.09.2010, 16:12 Aufrufe: 555
Match = System.Text.RegularExpressions.Regex.Match(input, pt)
If m.Captures.Count <> 1 Then
Return "-1"
Else
Return m.Value
End If
End Function
Private Sub __Scanner_ScanComplete(ByVal AvailabeIPs As System.Collections.Generic.List(Of NetworkScanner.PingResult)) Handles __Scanner.ScanComplete
__IPs = Avai ...
wake on lan in vb
Verfasst am: 17.09.2010, 16:51 Aufrufe: 761
Net
Imports System.Net.Sockets
Public Class WakeOnLan
Public Const MAC_ADDR_BYTES As Integer = 6
Private Const PORT_BROADCAST = 2304
' <remarks>
' Constructs and returns a magic packet for the given mac address.
' A Magic Packet is 6 bytes of FF followed by the MAC address 16 times.
' </remarks>
Public Shared Function GetMagicPacket(ByVal macAddress As String) ...
Problem mit einer Datenbank - wie oeffnen und vergleichen
Verfasst am: 13.07.2010, 05:09 Aufrufe: 486
CommandText = "SELECT * FROM commandCenter WHERE systemMessage='" & atResultCommand & "'"
Try
con.Open()
'hier muss eine Zuweisung hin... irgendwie, nur weiss ich leider nicht wie
con.Close()
Catch ex As Exception
MsgBox(ex.Message)
'strBuff = reader I want to return the value back to the thread were the methode was started
End Try
Debug.WriteLine(container)
End S ...
[VB 2010] Mehrkreistemperaturregler Feller Engineering MCS
Verfasst am: 02.07.2010, 12:29 Aufrufe: 878
None, 8, IO.Ports.StopBits.One)
com1.WriteLine(data)
com1.Close()
End Using
End Sub
Function ReceiveSerialData() As String
Dim returnStr As String = ""
Dim Incoming As Integer
Dim IncomingChar As Char
Dim com1 As IO.Ports.SerialPort = Nothing
Try
com1 = My.Computer.Ports.OpenSerialPort("COM1", 9 ...
Punkte automatisch auf Bild einzeichnen (VB.net)
Verfasst am: 18.03.2010, 22:42 Aufrufe: 1162
LoadCompleted
Punktmalen()
End Sub
Function Punktmalen()
Dim g As Graphics = PictureBox1.CreateGraphics
Dim Radius = 10
Dim rectangle As New Rectangle(300, 300, Radius, Radius)
g.DrawEllipse(Pens.Black, rectangle)
MsgBox("PUNKT")
Return 0
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e ...
Nächst-Verfügbares Verzeichnis ermitteln
Verfasst am: 24.01.2010, 12:15 Aufrufe: 377
Start / Stop Buttons Mechanikfrage
Verfasst am: 15.12.2009, 14:41 Aufrufe: 571
Wie bringe ich mein Programm dazu, auf Return zu reagieren?
Verfasst am: 30.11.2009, 17:09 Aufrufe: 577
????????????
Ich hab VB 2008 Express
Win7 - VB6 - Computername setzen
Verfasst am: 14.10.2009, 08:09 Aufrufe: 784
Was kann ich tun?
Schlichtes Beispiel aus dem MSDN:
Name = "name"
Password = "password"
Username = "username"
Set objWMIService = GetObject("Winmgmts:root\cimv2")
' Call always gets only one Win32_ComputerSystem object.
For Each objComputer in _
objWMIService.InstancesOf("Win32_ComputerSystem")
Return = objCompu ...
Probleme mit XML
Verfasst am: 22.08.2009, 14:28 Aufrufe: 904
Close()
End With
End Sub
Function GetAnswers(ByVal F As Fragestellung) As Integer
For j As Integer = 0 To 5
If F.Antworten(j) = Nothing Then
Return j
End If
Next
End Function
Ich hoffe, das hilft dir weiter, wenn nicht, stell mal deinen Quellcode hier rein, dann guck ich mir den noch mal an.
StarTr ...
Popups(Layer)wegklicken
Verfasst am: 18.07.2009, 15:35 Aufrufe: 1298
Über ein Webbrowser element rufe ich die Seite auf vorher lösche ich immer die cockies und den cache und sezte einen neuen Proxy.
Nun über den Proxy lädt das Programm halt meine Seite und nach 3,5 sek kommt der Layer reingefolgen z.b von Layer ADS .de
Der Code des Buttons die man klicken kann sieht wiefolgt aus:
<div style="float: right;">
<a href="#" onclick="bookm ...
Updater
Verfasst am: 01.07.2009, 10:10 Aufrufe: 1430
In dem Beispielprojekt ist nur ein Update Server eingetragen, aber es ist möglich mehrere einzutragen indem in die Multiline Textbox Server mehrere Adressen eingetragen werden (je Zeile immer einer). Ich weis nicht warum aber bei mir nimmt die Textbox die Return und Enter Taste nicht an, um mehrere Server einzutragen musste ich deshalb die Server erst in eine andere Datei schreiben und dann mit Strg + C und Strg + V ...
CPU Last von mehreren CPUs überwachen
Verfasst am: 29.06.2009, 13:25 Aufrufe: 845
Beschreibung:Mit dieser Klassen kann man die CPU Last von einer oder mehreren CPUs überwachen.Wichtig: Da diese Klasse die CPUs in eigenen Threads überwacht, muss drauf geachtet werden das wenn man die Werte an die Form übergeben will, man mit Delegates und Invoke arbeiten muss. Ein Beispiel dazu findet man in meinem Kommentar.Funktion:Visual Basic: Quelle: dotnet-snippets.de
Netzwerkverfügbarkeit prüfen
Verfasst am: 29.06.2009, 13:24 Aufrufe: 751
Beschreibung: Aus der Anwendung heraus prüfen, ob das Netzwerk verfügbar ist.Funktion:Visual Basic: Quelle: dotnet-snippets.de
Bestimmte Registry Keys oder Values überwachen
Verfasst am: 29.06.2009, 13:22 Aufrufe: 1238
Beschreibung:Diese Klasse überwacht veränderungen in der Registry entweder an einem Key oder an einem Wert.Wenn man einen Key überwacht wird das Event immer dann ausgelöst wenn irgendetwas an diesem Key geändert wird wie z.B. es wird unter diesem Key ein neuer Key angelegt oder es wird ein Wert geändert.Wenn man einen Wert überwacht wird das Event immer nur dann ausgelöst wenn auch genau dieser Wert verändert wird.Fu ...
Datenverschlüsselungsklasse
Verfasst am: 29.06.2009, 13:16 Aufrufe: 757
Beschreibung: Das ist eine Kryptographieklasse die die Verschlüsselungsalgorithmen aus den .NET Frameworkzusammenfasst und in einfach anzuwendenen Funktionen kapselt.Es gibt für jedes Szenario eine passende Funktion z.B. wenn man eine Datei von der Festplatte direkt in ein Bytearray entschlüsseln will oder wenn man ein Bytearray verschlüsseln will und das Ergebnis in ein anderes Bytearray speichern wil ...
Globale HotKeys (Tastenkombinationen)
Verfasst am: 29.06.2009, 13:11 Aufrufe: 1935
Beschreibung:Mit dieser Klasse kann man sehr leicht eine globale Hotkey funktionalität in seinem Programm einbinden.Man muss nur diese Klasse mit WithEvents deklarieren und ihr eine Form zuweisen die gesubclassed werden soll.Dann muss man nur noch ein paar eigene HotKey-Kombinationen registrieren (z.B. Strg+Alt+X) und diesemit dem Event abfragen bzw, abfangen. Dazu muss man eine eigene HotKeyID angeben um einen besti ...
URL auf Verfügbarkeit prüfen
Verfasst am: 29.06.2009, 13:08 Aufrufe: 704
Beschreibung: Diese kleine aber nützliche Funktion prüft eine URL ob diese im Internet verfügbar ist. Wenn Ja dann gibt die Funktion ein True zurück.Funktion:Visual Basic: Quelle: dotnet-snippets.de
Windows Live Messenger "Was ich gerade höre" setzten
Verfasst am: 29.06.2009, 13:02 Aufrufe: 1054
Beschreibung:Mit dieser Klasse kann man - wie man es vom Windows Media Player kennt - sich in MSN bzw. Windows Live Messenger anzeigen lassen was man gerade hört. Es wird einfach mittels SendMessage ein String-Parameter an den Messenger geschickt und der zeigt den Text dann in das entsprechende Feld "Was ich gerade höre". Diese Funktion muss aber im Messenger aktiviert sein.Funktion:Visual Basic: Quelle: dotnet-snipp ...
Ping auf einen anderen Rechner absetzen
Verfasst am: 29.06.2009, 12:59 Aufrufe: 720
Beschreibung:Mit der Funktion lässt sich einfach prüfen, ob ein Host im Netzwerk vorhanden ist. Die Funktion erwartet entweder der Hostnamen oder die IP-Adresse und gibt True zurück, wenn der Host vorhanden ist bzw. False, wenn nicht.Funktion:Visual Basic: Quelle: vbarchiv.net
Screenshot des Desktops erstellen und speichern
Verfasst am: 18.06.2009, 17:34 Aufrufe: 1172
FromImage(make_screenshot)<br /> grTemp.CopyFromScreen(0, 0, 0, 0, New Size(iWidth, iHeight))<br /><br /> Return make_screenshot<br /> End FunctionBeispiel:Dim picScreen As Bitmap = make_screenshot()<br /><br /> ...
Screenshot der Form erstellen und speichern
Verfasst am: 18.06.2009, 17:01 Aufrufe: 844
FromLTRB(0, 0, width, heigth))<br /><br /> Return make_screenshot<br /> End FunctionBeispiel: Dim bImage As Bitmap<br /> bImage = make_screenshot(ListView1)<br /><br /> &n ...
Quelltext einer Internetseite runterladen
Verfasst am: 17.06.2009, 17:16 Aufrufe: 732
Default).ReadToEnd<br /><br /><br /><br /><br /><br /> Catch ex As Exception<br /><br /> Return ex.Message<br /><br /> End Try<br /><br /> End FunctionBeisp ...
Icon einer Datei in eine PictureBox laden
Verfasst am: 15.06.2009, 10:33 Aufrufe: 1081
... ige Icon einer Datei, einer Anwendung oder eines Textdokumentes in einer PictureBox anzeigen.Die Funktion: Private Function extract_Icon_from_file(ByRef sFilePath As String) As Bitmap<br /> Dim Icon As Icon = Icon.ExtractAssociatedIcon(sFilePath)<br /><br /> Return ...
Leere Felder eines Arrays löschen
Verfasst am: 15.06.2009, 10:32 Aufrufe: 1705
... nbsp; Exit For<br /> End If<br /> Next<br /><br /> Array.Resize(ar, i)<br /> Return ...
Datei erstellen mit Wunsch Namen
Verfasst am: 15.06.2009, 10:31 Aufrufe: 559
Close()<br /> Catch<br /> Return 0<br /> End Try<br /> Return 1<br /><br />End FunctionBeispiel:SaveTextFiles("TextFileName", "Some Content to write ...
Datei auslesen
Verfasst am: 15.06.2009, 10:30 Aufrufe: 679
Beschreibung:Diese Funktion liest eine Datei komplett aus.Funktion:Public Function ReadContent(ByVal FilePath As String)<br /> Dim ContentFile As New System.IO.StreamReader(FilePath)<br /> Return ContentFile.ReadToEnd.ToString()<br />End FunctionBeispiel:MessageBox.Show(ReadConte ...
Random Zahl zwischen Min. und Max. Wert generieren
Verfasst am: 15.06.2009, 10:29 Aufrufe: 623
... Try<br /> Dim [rnd] As Random = New Random <br /> <br /> Return ...
Prüfen ob das Betriebssystem Windows XP ist
Verfasst am: 15.06.2009, 10:29 Aufrufe: 680
Major > 5) <br /> If Result Then<br /> Return True<br /> Else<br /> ...
Prüfen ob Prozess bereits ausgeführt wird
Verfasst am: 15.06.2009, 10:28 Aufrufe: 907
Id) Then<br /> Return True<br /> End If<br /> Next<br /> & ...
Programm per Registry im Autostart eintragen
Verfasst am: 15.06.2009, 10:28 Aufrufe: 914
ExecutablePath)<br /> hReg.Close()<br /> Return True<br /> End If<br /> Return False<br /><br />End FunctionBeispiel:RegisterApplication ...
Start Menu Hide (disable)
Verfasst am: 30.05.2009, 17:51 Aufrufe: 964
... (ByVal idHook As Integer, ByVal lpfn As KeyboardHookDelegate, _
ByVal hmod As Integer, ByVal dwThreadId As Integer) As Integer
Private Declare Function UnhookWindowsHookEx Lib "user32" ( _
ByVal hHook As Integer) As Integer
#End Region
#Region "Properties"
Public Property BlockKeyCombinations() As Boolean
Get
Return ...
Datei auf Ausführbarkeit prüfen
Verfasst am: 15.05.2009, 05:52 Aufrufe: 543
... lt;/param>
Public Function IsExeFile(ByVal FileName As String) As Boolean
Try
Dim FS As New FileStream(FileName, FileMode.Open, FileAccess.Read, FileShare.Read)
Dim Data(4) As Byte
FS.Seek(128, SeekOrigin.Begin)
FS.Read(Data, 0, 5)
FS.Close()
If (Data(0) = 80 And Data(1) = 69 And Data(2) = 0 And Data(3) = 0 And Data(4) = 76) Then
Return ...
Eigene Variable (Klasse) in eigenem Benutzersteuerelement
Verfasst am: 12.04.2009, 16:16 Aufrufe: 1062
... ng, ByVal Subpoint2 as String)
MenüName = MenuName
Unterpunkt1 = Subpoint1
Unterpunkt2 = Subpoint2
End Sub
End ClassUnd hier noch die "eigentliche" Benutzersteuerelement-Klasse, bzw. ein Ausschnitt davon:
Dim TestMenü As Menu = New Menu("Blub", "Blub", "Blub")
...
Property Menu1() As Menu
Get
Return ...
Wie Pw über VBA in Router eingeben? Versuche gescheitert...
Verfasst am: 04.02.2009, 14:53 Aufrufe: 2585
... die Konfiguration</DIV>
<DIV id=c_titel>Passwort Eingabe</DIV>
<DIV id=c_last>
<table border="0" cellpadding="0" cellspacing="2">
<tr>
<td width="100"><input type="password" class="stylepwd" name="pws" size="12" maxlength="12" onkeypress="return ...
[C++ WinAPI] Windows-Fenster
Verfasst am: 29.01.2009, 21:04 Aufrufe: 2352
while (GetMessage(&msg, NULL, 0, 0)) //Wenn eine Message reingeht (z.b. wenn der Nutzer "Schliessen" gedrückt hat
{
TranslateMessage(&msg); //Wird die Nachricht übersetzt
DispatchMessage(&msg);
}
return msg.wParam; //Nun wird die Nachri ...
Spieleprogrammierung mit XNA - Teil 2
Verfasst am: 24.09.2008, 12:04 Aufrufe: 3865
Spieleprogrammierung mit XNA - Teil 2Willkommen zum zweiten Teil der XNA Tutorialreihe.In diesem Teil möchte ich euch die Grundkenntnisse von XNA zeigen.Hier werdet ihr die XNA Variablentypen und die FUnktionen das erste mal kennenlernen.Also fangen wir mit Schritt 1 an.2.1 - Import der NamespacesDamit auch alle Funtkionen zur Verfügung stehen müsst ihr zuerst einmal die Namespacesimportieren. Schreibt daher nach gan ...
ClipboardValueChanged? Gibts so was?
Verfasst am: 21.09.2008, 18:39 Aufrufe: 963
ClipboardValueChanged? Gibts so was?
Verfasst am: 21.09.2008, 18:37 Aufrufe: 963