|
VBasic : MTEXT mit VBA
J.Becker am 26.07.2003 um 16:43 Uhr (0)
Hallo Heiko, ich habe es mal ausprobiert. Hier die Routine: Sub main() Dim einfuege As Variant Dim Bestxt As String Dim Besbreite As Double Dim objMText As AcadMText Besbreite = 50 Bestxt = "Zusatztext: " einfuege = ThisDrawing.Utility.GetPoint(, "Bitte den Einfügepunkt wählen") Set blockref = ThisDrawing.ModelSpace.AddMText(einfuege, Besbreite, Bestxt) ThisDrawing.Regen acAllViewports End Sub Dazu Folgendes. 1. Du brauchst nicht, wenn du im AutoCAD bist ein AutoCAD ...
| | In das Form VBasic wechseln |
|
VBasic : Microsoft DataLink *.udl
J.Becker am 26.07.2003 um 17:38 Uhr (0)
Hallo Frank, ich gehe immer einen anderen Weg um eine Verbindung zur Datenbank aufzubauen. Die UDL-Dateien haben nämlich den Nachteil, dass sie eben eine Datei sind, in der die Datenverbindung beschrieben ist. Ich benötige diese nicht. Gehe folgendermaßen vor. 1. Füge den Verweis auf Microsoft ActiveX Data Objekt 2.5 oder 2.6 ein 2. Erstelle eine Verbindung wie folgt. dim Connection as new adodb.connection dim Recordset as new adodb.recordset dim strConnString as String strConnstring = "Provide ...
| | In das Form VBasic wechseln |
|
VBasic : Programmierung von Seriellen Schnittstellen (COM1 und COM2)
J.Becker am 26.07.2003 um 20:09 Uhr (0)
SChau mal unter http://www.Planet-Source-code.com nach. Im Bereich Visual Basic findest du den folgenden Betrag: A Application for Serial Port Communication- RS232c Hier der komplette Link. http://www.planet-source-code.com/vb/scripts/BrowseCategoryOrSearchResults.asp?optSort=Alphabetical&lngWId=1&blnWorldDropDownUsed=TRUE&txtMaxNumberOfEntriesPerPage=10&blnResetAllVa riables=TRUE&txtCriteria=serial+interface Falls der nicht funktioniert bitte nach "serial interface" suchen, dann wird der Beitrag gef ...
| | In das Form VBasic wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |