Also pass auf ^^
Du hast die checkbox und die textbox.
Du übergibst beide an die Stub selbst wenn die Textbox leer ist.
dim text as boolean = checkbox1.checked
dim textboxinhalt as string = textbox1.text
...value = text & "<>" & textboxinhalt
Und in der Stub schreibst du:
Dim text as boolean
dim textboxinhalt as string
If text = true then
msgbox(textboxinhalt)
end if
mfg
iPott <3
2 Zeiche zum Splitten? Uh da hab ich böse Erfahrungen gemacht... Geht in die Hose"<>"
Mach es doch einfach so:
Schon hast du keine Leerstrings mehr und kannst Splitten....value = text & "<>" & CStr(textboxinhalt & "#")
Die Stub muss dann einfach "#" mit "" ersetzen...
Ist unsauber, ich weiß, aber kompliziertere Lösungen wird er nicht verstehen![]()
Das Problem ist ich habe dafür keine TextBox ich habe die checkBox in den builder nun sieht es bei mir in der kllasse so aus
......
Builder =
Public Class Frm_Builder
Dim persky As Boolean
Dim Befehle As String
und so in den button
persky = AntiKas.Checked
SaveFileDialog1.ShowDialog()
IO.File.Copy(BuilderStub, SaveFileDialog1.FileName)
VB6setting.Value = persky
FileOpen(1, (SaveFileDialog1.FileName), OpenMode.Binary)
FilePutObject(1, VB6setting.Value, LOF(1) + 1)
FileClose(1)
MessageBox.Show("Server wurde Gebuildet", "Underground stealer", MessageBoxButtons.OK, MessageBoxIcon.Information)
und die stub den so
Public Class Form1
Dim persky As Boolean
Private Sub Form1_Load
persky = Befehle(4)
If persky = True Then
Call AntiPers()
End If
Aber ich kriege ein fehle beim formload (Fehler bei der konvertierung im wert true n Boolean
Please Help
wundert mich nicht , du versuchst einen String an einen bool zu übergeben , versuche das ganze mal so
MfGCode:persky = Convert.ToBoolean(Befehle(4))
Danke the papst du hast mir mal wieder geholfen
Geändert von sunny-boy3 (16.07.2009 um 11:40 Uhr)
Nein das geht in VB problemlos.
True wird in allen Cases zu 1 als Boolean.
Der Fehler liegt wohl wo anders.