Warehouse 13 Where And When / RR:Suche

Wenn Charlie, Alan und Jake in der Sauna sitzen, will Jake einen Witz erzählen, erzählt diesen aber nicht zuende. Wie endet er?
Ein Pfarrer, ein Rabbi und ein Mönch treffen sich in einer Bar.

Also, ein Rabbi, ein Priester und ein Mönch kommen in eine Bar. Sagt der Rabbi zum Mönch "he older haste mal ne mark?". darauf schaut der mönch den rabbi entgesiert an, dreht sich zum prister um und kniet sich nieder, küsst dessen Schuhe um schließlich bewusstlos am Boden zusammenzusacken wo er dort seinen surrealen visionen nachgeht indenen er wie ein frisch gepflücktes Känguruh mit 200km/h übers Meer geht. Als er von seinen Visionen aufwacht, läuft er zähneknirschend in das schweizer Weltraumaffentrainingscenter. Sehr zum entsetzen des mönches entpuppt sich das Weltraumaffentrainingscenter als ein geheimes ausbildungsprojekt für HTL professoren. Aufgrund der speziellen ausbildung war es ihnen möglich Schummler mit der Nase aufzuspüren und Gefühle wie Roboter sie haben zu haben. Trotz unbegründeter Ängste der Hardcorepädagogen versammeln sich jedes Jahr aufs Neue die 63 größten Nasenbohrer um in einer streng geheimen Abstimmung ihren neuen Oberbefehlshaber des um-die-Wette-Nasenbohren Wettbewerbs zu bestimmen, welcher immer 4 1/16 Stunden nach dem Wettbewerb stirbt weil im das Gehirn wegen der massiven Nasenausweitung aus seinen Rotzlöchern flutscht. Sehr zur Freude der Leichenbestattungsdienste, denn bekanntlich gibt es ja über 612 von Nasenflutschungsopfer die von 611 Institutionionen in 610 Gräber verteilt wurden was wiederum zur Foge haben muss, dass noch 2 zusätzliche Gräber angeschafft werden müssen oder aber auch sich jeweils 2 kleinere Opfer ein King Size Grab teilen müssen. Das einzige Problem dabei ist, dass sich die Kreativität der Nasenflutschbestattungsbeautragten in Grenzen hielt und deswegen entschieden sie sich dafür, dass alle in ein Grab geschmissen werden und die restlichen Gräber zum abmischen von günen Pakterien, blauen Schimmel und gelben Nasenflutsch genutzte werden. Dieses wird in das Leitungswasser der HTL geführt was wiederum bewirkt, dass viele HTL-Schüler an akuter bakterieller Stangleritis erkranken. Aufgrund dieser schon länger bekannten Infektion würde ein neues Gesetz erlassen, welches besagt, dass 2+2 fünf ergibt, da sich der erfolg in kränzen hielt versuchte man neue Methoden zum Kranzflechten zu entwickeln, dadurch wurde sichergestellt, dass man ein Lasso baun konnte welches selbstständig pädagogen lokalisiert und einfängt. Dadurch war man allerdings einer permanenten stresssituation ausgesetzt, die wie sich heraustellte, den rotationsmittelpunkt unseres sonnensystems um 3 km nach links setzte was wiederum zur Folge hat, dass der Äquator bei Finnland liegt. D.h. nicht mehr in der Mitte der Erde. Dies führt dazu, dass die Äquatorianer und die Finnesen die plätzte tauschen müssen. Also stiegen sie in ihre Luftschiffe und flogen los. Doch plötzlich begegnete ihnen der schreckliche.

nirgends , weil der neupreis im Laden schon ca. 60€ beträgt.
bei eBay findest du sie gebraucht für 20€

Link:
Lego Starwars Jango Fett 8011 | eBay

die Mini-Figur Jango Fett kriegst du nirgends unter 13 € selbst nicht unter 20,30,40€. Spar ein bisschen mehr und für 50€ hast du viel bessere Chancen

xX_CrYsTaL_Xx aber ich such jango fett als mini Lego Figur und nicht Lego Jango Fett 8011!


-3po

das weiss ich jetzt auch nachdem du das Bild hochgeladen hast

Lego Star Wars 7153 Figur Boba Fett aus Jango Fetts Sl | eBay

IqChamoion3231 aber ich suche Jango nicht Boba fett.



-3po

das ist nicht der Jango Fett , das ist Boba Fett aus Jango Fett's Slave l.

also es gibt viele arten diese figur zu bekommen Z.B. 1. du ziehst irgent einen über den tisch der keine ahnung hat. 2. du suchst bei ebay so lange bis du ihn für 13 € bekommst oder du schaust mal unter den link: BrickLink Price Guide - Minifig sw053 aber ob der preis stimmt bei dem link ist nicht immer sicher. aber ich hoffe ich habe trotzdem geholfen.

Also ich muss bei Visual Basic bei Excel einen Code für die Berechnung der Schnittpunkte zweier quadratischer Funktionen schreiben. Und beim durchgehen zeigt es mir a, b, und c als Laufzeitfehler 13 an. Kann mir jemand helfen. Hier der Code Private Sub CommandButton12_Click If d > 0 Then x1 = -t + Sqr / 2 * a x2 = -t - Sqr / 2 * a y1 = a1 * x1 * x1 + b1 * x1 + c1 y2 = a1 * x2 * x2 + b1 * x2 + c1 dummy = MsgBox("Die Funktionen haben zwei Schnittpunkte und zwar bei" & vbCr & "(" & x1 & "|" & y1 & ")" & vbCr & "und bei " & vbCr & "(" & x2 & "|" & y2 & ")""Die Funktionen haben einen Schnittpunkte und zwar bei" & vbCr & "(" & x3 & "|" & y3 & ")""Die Funktionen schneiden sich nicht.""Die Funktionen haben unendlich Schnittpunkte.") End If End Sub

Ich habe Deine Code erstmal in eine lesbare Form gebracht:
Private Sub CommandButton12_Click()
a1 = Cells
a2 = Cells.Address
b1 = Cells
b2 = Cells
c1 = Cells
c2 = Cells
a = Cells - Cells
b = Cells - Cells
c = Cells - Cells
If Gesamta > 0 Then
d = b * b - 4 * a *
If d > 0 Then
x1 = -t + Sqr / 2 * a
x2 = -t - Sqr / 2 * a
y1 = a1 * x1 * x1 + b1 * x1 + c1
y2 = a1 * x2 * x2 + b1 * x2 + c1
dummy = MsgBox("Die Funktionen haben zwei Schnittpunkte und zwar bei" _
& vbCr & "(" & x1 & "|" & y1 & ")" & vbCr & _
"und bei " & vbCr & "(" & x2 & "|" & y2 & ")")
ElseIf d = 0 Then
x3 = -b / 2 * a
y3 = a * x3 ^ 2 + b * x3 + c
dummy = MsgBox("Die Funktionen haben einen Schnittpunkte und zwar bei" _
& vbCr & "(" & x3 & "|" & y3 & ")")
Else
dummy = MsgBox("Die Funktionen schneiden sich nicht.")
End If
End If
If a = 0 And b = 0 And c = 0 Then
dummy = MsgBox("Die Funktionen haben unendlich Schnittpunkte.")
End If
End Sub
Wenn du einen Fehlercode angibst ist es auch immer sinnvoll, die Beschreibung dazu mit zu posten ("Typen unverträglich")!
Dann hätte ich Dir nämlich sofort sagen können, dass wohl in Deinen Zellen Text steht, und keine echten Zahlen, und Text kann nicht voneinander abgezogen werden.
Ein Tipp:
Du solltest als erste Zeile immer:
Option Explicit
stehen haben, dann bist Du gezwungen Deine Variablen auch zuerst zu deklarieren, und das sollte man IMMER machen.
Du hättest Deinen Code also begonnen mit:
Dim a1 as Double
Dim a2 as Double
usw.
DANN hättest Du die Fehlermeldung schon bei:
a1 = Cells
bekommen, und wärst vlt. eher hinter den Fehler gekommen.
Noch zwei Fehler in Deinem Code, die mir aufgefallen sind:
Warum nicht:
a = a1 - b1
Schließlich hast Du die Werte aus den Zellen schon diesen Variablen zugewiesen!
und:
If Gesamta > 0 Then. End If
Da Du der Variablen "Gesamta" keinen Wert zugewiesen hast, wird der komplette Code danach wohl NIE ausgeführt werden!
Auch t und y tauchen nirgendwo auf.
Falls Du diese Variablen schon woanders zugewiesen hast, solltest Du das in Deiner Beschreibung erwähnen.
SO lässt er sich schlecht nachvollziehen/ testen.
Am besten wäre es, wenn Du eine Beispieldatei bei einem Upload-Service (z.B. File-Upload.net - Ihr kostenloser File Hoster!) hochladen könntest

P.S.:
Ich habe noch eine Fehler entdeckt, durch Zufall, der wohl eher sachlich als programmiertechnisch ist:
Und zwar habe ich in alle Zellen eine 2 eingegeben ("klappt" aber wohl immer, wenn in allen Zellen die gleichen Zahlen stehen) und bekomme sowohl die Msg:
Die Funktionen haben einen Schnittpunkte und zwar bei
als auch anschließend:
Die Funktionen schneiden sich nicht.

allen für eure Mühe und Antworten aber ich habe es 5 Minuten später selbst herausbekommen und zwar habe ich für die Zellen falsche Angaben gemacht. Das mit dem Gesamta habe isch dank euch behoben. Nochmal.

☼
Und es wäre nett von Dir gewesen, wenn Du auch schon 5 Minuten später hier Bescheid gesagt hättest, dass das Problem gelöst ist.

Code:Private Sub CommandButton12_Click If d > 0 Then x1 = -t + Sqr / 2 * a x2 = -t - Sqr / 2 * a y1 = a1 * x1 * x1 + b1 * x1 + c1 y2 = a1 * x2 * x2 + b1 * x2 + c1 MsgBox "Die Funktionen haben zwei Schnittpunkte und zwar bei" & vbCr & _ "(" & x1 & "|" & y1 & ")" & vbCr & _ "und bei " & vbCr & "(" & x2 & "|" & y2 & ")" ElseIf d = 0 Then x3 = -b / 2 * a y3 = a * x3 ^ 2 + b * x3 + c MsgBox "Die Funktionen haben einen Schnittpunkte und zwar bei" & vbCr & "(" & x3 & "|" & y3 & ")" Else MsgBox "Die Funktionen schneiden sich nicht." End If End If If a = 0 And b = 0 And c = 0 Then MsgBox "Die Funktionen haben unendlich Schnittpunkte." End If End Sub

Welche Datentypen sind die Variablen?

Warum hast du die Messagebox-Antworten in eine Dummy-Variable gespeichert?

Laufzeitfehler 13 deutet auf einen Konvertierungsfehler hin. Stehen in Cells, Cells, Cells, Cells, Cells oder Cells evtl nicht Zahlen?

Hallo,
habe mir Microsoft Office 2013 H+B gekauft. Die Insallation erfolgte gut. Habe bei der Insallation meinen 25-stelligen Produktkey eingeben und dieser wurde auch angenommen und es kam keine Fehlermeldung. Wenn ich nun auf z.B. Word klicke fordert das Programm mich auf, dass ich das Produkt noch aktivieren muss. Man kann zwischen per Internet und per Telefon wählen. Sofern ich per Internet auswähle bekomme ich immer die Fehlermeldung:
"Ihre Kopie von MS Office kann nicht aktiviert werden. Für den angegebenen Produktkey wurde bereits die für die Softwarelizenz maximal zulässige Anzahl von Aktivierungen erreicht."
Ich habe das Produkt aber neu gekauft und noch auf keinem anderen Pc oder auf dem selben schon einmal aktiviert oder ähnliches. Das einzige Mal wo ich den Key schon einmal eingegeben habe war bei der Insallation und dort wurde mir kein Fehler angezeigt.
Kann hier jemand weiterhelfen?

Musste die nervige Telefon Aktivierung machen. Den Produkt Key bereit halten.

wo ist das problem? aktiviere über telefon.da wirst du dann auch gleich weitergeleitet wen was mit deinem key nicht stimmt.oder ist das eine raubkopie?

hallo, also ich habe als Antivirus Avira Free Antivirus. und wen ichs durchlaufe braucht es sehr sehr lange ist das normal?
und
ist Spybot Search and Destroy eine Firewall oder auch ein antivirus weil ich benutzte eign. beides
dankee ^-^

Spybot ist keine Firewall, sondern ein auf spyware spezialisiertes Antiviren Programm. Du brauchst nicht beides laufen zu lassen, Avira reicht.

Die Scandauer hängt von einigen Faktoren ab. Dazu gehören Hardwarekonfiguration des PCs, wie voll ist die Festplatte, wie groß sind einzelen Dateien, gibt es viele gepackte bzw. Archive auf dieser Festplatte, laufen viele Programme im Hintergrund mit.
Wenn du eineSuchlauf startes, am besten alle Programme im Vorder - und Hintergrund schließen und warten bis er fertig ist.

was heisst sehr sehr lange? 1-2std ist normal

aso ok weil ca. 10 minuten sind vorbei gegangen und das war immer noch ca. bei 1.2 %
aba

Die kannst Du parallel laufen lassen, die fressen sich nicht gegenseitigl Aber wenn Du mit AntiVir zum ersten Mal einen Scan machst, kann das schon mal eine halbe Stunden dauern.