For other VB varieties, including Visual
Basic 2008, please visit our classroom. More
samples can be found there
Along with the installation of UltimaSerial ActiveX
control, the following VB sample programs are placed under the C:\UltimaSerial\VB
directory (Delphi, LabView, VC, TestPoint and Excel
programs are covered in other pages).
Click here to learn how to use these serial
devices to study the frequency domain in real time
Click here to see the FAQs regarding Dataq serial
devices and programming issues.
AnalogInput
LimitLine
AnalogWaveform
AnalogWaveformTimer
AnalogWaveformWithSnapShot
AnalogTrigger
DigitalInput
DigitalWaveform
EventCounter
DigitalTrigger
EventCounterTrigger
LevelEnabledWave
GenerateCalculatedWaveform
Temperature
SmoothAnalogWaveform
UltimaPanel
Note: Microsoft Visual Basic 5.0 or higher is needed to use these sample
programs.
Sample AnalogInput: reads from analog channel 1 and
converts it into voltage for display (a +/- 10V device is assumed in the conversion). The
reading speed is paced by a Timer Click here for a screen shot!
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, and UltimaSerial.AnalogInput
Sample Temperature: reads the thermister connected to
analog channel 1 of DI-151RS and converts it into temperature for display. If you
need more accurate reading, please refer to DI-151RS User's Manual for more info. The
reading speed is paced by a Timer Click here for a screen shot!
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, and UltimaSerial.AnalogInput
Sample LimitLine: sets the LimitLine at when analog channel
1 below 0V. LimitLine event will be fired when the input signal on analog channel 1 goes
below 0V.
Click here for a screen shot!
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.LimitLine
and UltimaSerial.SetLimitLine
Sample AnalogWaveform: acquires and displays the data as a
scrolling waveform. Click here for a screen shot!
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.GetData, UltimaSerial.NewData, and UltimaSerial.EventLevel
Sample AnalogWaveformTimer: Use
timer as pacer to acquires and displays the data as a scrolling waveform
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.AvailableData, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, and UltimaSerial.GetData,
Sample SmoothAnalogWaveform:
acquires and displays the data as a scrolling waveform using the smooth-scrolling feature
(This sample should be compiled and run outside of VB IDE due to the restriction of VB
IDE).
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.GetData, UltimaSerial.NewData, UltimaSerial.EventLevel,
and UltimaSerial.SmoothScrolling
Sample AnalogWaveformWithSnapShot:
acquires and displays the data as a scrolling waveform. While the waveform is scrolling,
pushing a key will take a snapshot of the waveform
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.GetData, UltimaSerial.GetDataFrame,
UltimaSerial_DriverError, UltimaSerial.NewData, and UltimaSerial.EventLevel
Sample AnalogTrigger: acquires
data when the analog channel 1 crosses a specified trigger level. 184 samples will be
acquired before and after the trigger point. Click here for a screen shot!
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.TriggerChannel, UltimaSerial.AcquisitionMode, UltimaSerial.TriggerLevel, UltimaSerial.PreTriggerLength, UltimaSerial.PostTriggerLength, UltimaSerial.TriggerStatus, UltimaSerial.MapErrorMessage, UltimaSerial.GetData, UltimaSerial.GetDataFrame,
UltimaSerial_DriverError, UltimaSerial.NewData, UltimaSerial.EventLevel
Sample DigitalInput: reads
digital channels. The reading speed is paced by a Timer
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, and UltimaSerial.DigitalInput
Sample DigitalWaveform: acquires
and displays the digital channel 1 in a scrolling waveform. Click
here for a screen shot!
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.MaskOutDigitalBits, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.GetData, UltimaSerial_DriverError, UltimaSerial.NewData, UltimaSerial.EventLevel
Sample DigitalTrigger: acquires
data when the digital channel 1 goes from low to high. 184 samples will be acquired before
and after the trigger point.
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.TriggerChannel, UltimaSerial.AcquisitionMode, UltimaSerial.TriggerLevel, UltimaSerial.PreTriggerLength, UltimaSerial.PostTriggerLength, UltimaSerial.TriggerStatus, UltimaSerial.MapErrorMessage, UltimaSerial.GetData, UltimaSerial.GetDataFrame,
UltimaSerial_DriverError, UltimaSerial.NewData, UltimaSerial.EventLevel
Sample EventCounter: reads and
displays event counters and digital channels. The reading speed is paced by a Timer.
Click here for a screen shot!
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.TransitionCounter,
UltimaSerial.ResetCounter, UltimaSerial_DriverError, UltimaSerial.NewData, UltimaSerial.EventLevel
Sample EventCounterTrigger:
acquires data on the fourth low-to-high transition on digital channel 1. 184 samples will
be acquired before and after the trigger point.
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.TriggerChannel, UltimaSerial.AcquisitionMode, UltimaSerial.TriggerLevel, UltimaSerial.PreTriggerLength, UltimaSerial.PostTriggerLength, UltimaSerial.TriggerStatus, UltimaSerial.MapErrorMessage, UltimaSerial.GetData, UltimaSerial.GetDataFrame,
UltimaSerial_DriverError, UltimaSerial.NewData, UltimaSerial.EventLevel
Sample LevelEnabledWave: only
acquires data when the analog channel 1 goes above reading 13000 (about 3.9V for a +/-10V
input device)
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.TriggerChannel, UltimaSerial.AcquisitionMode, UltimaSerial.TriggerLevel, UltimaSerial.PreTriggerLength, UltimaSerial.PostTriggerLength, UltimaSerial.TriggerStatus, UltimaSerial.MapErrorMessage, UltimaSerial.GetData, UltimaSerial.GetDataFrame,
UltimaSerial_DriverError, UltimaSerial.NewData, UltimaSerial.EventLevel
Sample GenerateCalculatedWaveform:
acquires data from analog channel 1 and calculate the rate of change of it and post it as
second waveform . Both waveform will be displayed and stored in a WinDaq file. Click
here for a screen shot!
Properties/methods/events:
UltimaSerial.Device, UltimaSerial.CommPort, UltimaSerial.ChannelCount, UltimaSerial.SampleRate, UltimaSerial.Start,
UltimaSerial.Stop, UltimaSerial.GetDataEx, UltimaSerial_DriverError, UltimaSerial.NewData, UltimaSerial.EventLevel
Sample UltimaPanel: is the ultimate sample
program which uses almost all properties, methods and events. It has a trigger enabled
scope, and a continuous scrolling waveform, along with readings from all analog, digital,
and event counter channels. Take a look at this one if you are an experienced VB
programmer.
Click here for a screen shot!
Last update: 02/29/12
Copyright: 2000-2005 www.UltimaSerial.com
|