The modem controls signals don't seem to be exposed by either UsbSerial or UsbSerial3. You can try using reflection which should work but I haven't tested it as I don't have an FTDI device.
Dim UART AS USbSerial3
UART.Open(9600)
Dim R as Reflector
R.Target = UART
R.Target = R.getField("driver")
R.RunMethod2("setDTR", true, "java.lang.boolean")
If this works you may already know that the driver supports
getCD(), getCTS(), getDSR(), getDTR() and getRI() which all return a Boolean
as well as setRTS(Boolean).