RegisterActiveXController

基于CpuUsage的CPU空闲时工作构思,就是当CPU有空时,才能进行自己程序的大量数据处理命令,找了好久,找到这个,并加以10个时间的查询,如都是有空,才说有空.分享给有这方面需要的朋友,抛砖引玉.(CpuUsage the CPU idle time based on the idea work, free time is when the CPU can process large amounts of data for their own processing order, looking for a long time to find this, and make inquiries 10 hours, such as are available, only that there empty. to share a need, a friend, start a discussion.)

跳动字符 讲述一个个字符的起落，按时间的间隔均匀依次跳动，增带颜色的变化．(characters on a beating characters to the ups and downs by the time interval followed by beating uniform, increase with a change in color.)

值的研究的一个外挂程序(value of a plug)

用VC6实现的一个超级漂亮的编辑框。可以自己配置编辑框的颜色，美化界面。(A super nice with VC6 edit box. Can configure their own color of the edit box and beautify the interface.)

使用日期时间控件，VC++精选编程学习源码，很好的参考资料。(Use the date and time control, VC++ select learning programming source code, a good reference.)

average of numbers that implements with C# in visual basic. i wrote it

基于PARKER9000运动控制器的上位机程序开发，包括单轴点动以及多轴联动(Based on PARKER9000 motion controller host computer program development, including uniaxial jog, and multi-axis)

说明：  这是一个数据库访问技术方面的程序，是基于ODBC技术的数据库访问，显示数据库表中的所有记录。(This is a database access technical aspects of the procedure is based on ODBC database access technology, the database shows the table all records.)

74HC138驱动数码管程序，驱动4位共阳数码管，阳极全部高电平，138驱动段码(74HC138-driven digital control program)

测试com口程序Private Sub Form_Load() Dim I As Integer Dim Msg As String Me.Enabled = False Msg = 串行端口通讯测试 V & App.Major & . & App.Minor & App.Revision cboCommSettings.Text = GetSetting(App.EXEName, frmCommTest , CommSettings , 2400,N,8,1 ) Me.Show Me.Refresh With MSComm1 For I = 1 To 16 Me.Caption = Msg & - 测试通讯端口:COM & I & ... Me.Refresh Delay 100 On Error Resume Next .CommPort = I .Settings = 2400,N,8,1 .PortOpen = True .PortOpen = False If Err = 0 Then cboCommPort.AddItem COM & Trim(I) Next I End With cboCommPort.ListIndex = 0 optCommData(0).Value = True Me.Caption = Msg & (Programming by WJY) Me.Refresh If cboCommPort.ListCount = 0 Then MsgBox 程序检测不到可用的串行端口! Me.Enabled = True End Sub (test com port)