佳礼资讯网

 找回密码
 注册

ADVERTISEMENT

查看: 1416|回复: 7

怎样才可以让visual basic跟parallel port联系

[复制链接]
发表于 22-9-2007 11:31 PM | 显示全部楼层 |阅读模式
请问高手:
本人现在做着pc-based oscilloscope这个project的software part,
而在这方面面临了不少难题,
就是要怎样以visual basic这个programming来跟hardware的parallel port联系
谢谢~
回复

使用道具 举报


ADVERTISEMENT

发表于 23-9-2007 08:06 AM | 显示全部楼层

回复 #1 山西豆腐 的帖子

参考:(很详细的资料)
http://www.lvr.com/parport.htm

也可以参考:(VB 源码, 作Parallel port 8bit Output)
http://chinese3.cari.com.my/myforum/viewthread.php?tid=447773

Parallel port 只有5bit可以input, 也有8bit bi-directional, 但不是所有的PC都相容的。

PC Scope 用Parallel port的, 在网上可以找到很多例子。

[ 本帖最后由 pic 于 23-9-2007 08:12 AM 编辑 ]
回复

使用道具 举报

 楼主| 发表于 23-9-2007 10:01 PM | 显示全部楼层
谢谢你版主~~
很厉害叻!!!
回复

使用道具 举报

 楼主| 发表于 27-9-2007 01:18 AM | 显示全部楼层
请问哪里可以找到PC Based Oscilloscope
visual basic 的sample code 呢?
谢谢~
回复

使用道具 举报

发表于 27-9-2007 08:23 AM | 显示全部楼层
原帖由 山西豆腐 于 27-9-2007 01:18 AM 发表
请问哪里可以找到PC Based Oscilloscope
visual basic 的sample code 呢?
谢谢~

源码应该找不到的。。。
你要自己写啊。。。。

显示波形, 你可以用Picture box, line command.
其他的自己研究吧。。。


  1. Dim yAxis, xAxis
  2. Function MyPlot(ByVal ADCIn As Integer, xScale As Integer)
  3.     xAxis = xAxis + xScale
  4.     If xAxis > 500 Then
  5.         xAxis = 0
  6.         Picture1.Cls
  7.     Picture1.Line (xAxis, yAxis)-(xAxis, yAxis), QBColor(10)
  8.    
  9.     End If
  10.    
  11.     yAxis = ADCIn
  12.    
  13.     Picture1.Line -(xAxis, yAxis), QBColor(10)
  14.     txtTime = xAxis
  15. End Function
复制代码
回复

使用道具 举报

 楼主| 发表于 28-9-2007 03:40 AM | 显示全部楼层
再次谢谢pic版主!
回复

使用道具 举报

Follow Us
 楼主| 发表于 28-9-2007 03:43 AM | 显示全部楼层
请问line command是什么呢?
回复

使用道具 举报

发表于 28-9-2007 09:14 AM | 显示全部楼层
原帖由 山西豆腐 于 28-9-2007 03:43 AM 发表
请问line command是什么呢?

顾名思义, line command 是用来画line的。

你有MSDN吗? search Picture Box, 有example。
不然就Google。
回复

使用道具 举报


ADVERTISEMENT

您需要登录后才可以回帖 登录 | 注册

本版积分规则

 

ADVERTISEMENT



ADVERTISEMENT



ADVERTISEMENT

ADVERTISEMENT


版权所有 © 1996-2023 Cari Internet Sdn Bhd (483575-W)|IPSERVERONE 提供云主机|广告刊登|关于我们|私隐权|免控|投诉|联络|脸书|佳礼资讯网

GMT+8, 24-1-2025 08:55 AM , Processed in 0.099716 second(s), 21 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表