当前位置:编程学习 > VB >>

谁能看懂这个QBASIC程序

--------------------编程问答-------------------- 早期的basic
如果你懂得VB,照道理你能看懂,VB保留了早期basic的大部分特性
每行前面的数字是行号,早期的VB必须,在VB中,你仍然可以这样用,只是已经不再是必须的
Private Sub Form_Load()
10 Me.ScaleHeight = 1000
20 Me.ScaleWidth = 1000

End Sub

:用于在一行中写多个语句,在VB中,仍然有很多人这样用
Open "com1:9600,n,8,1,cs0,ds0,cd0 " For Random As #1
open打开文件,事实上,串口等效于一个文件,在VB中也可以这样使用,只是大家习惯使用mscomm控件

locate是字符环境下,定位输出位置,行列定位print输出位置

gosub调用子程序,只是那时候的basic代码不是组织为一个函数或者过程,而是一行行组成,gosub 行号
调用,然后遇到return则返回

你将代码的行号全部去掉,将gosub的行号开始到return组成一个函数,给个函数名,gosub换成call 函数名
这样,估计你就能看懂了 --------------------编程问答--------------------
引用 1 楼 worldy 的回复:
早期的basic
如果你懂得VB,照道理你能看懂,VB保留了早期basic的大部分特性
每行前面的数字是行号,早期的VB必须,在VB中,你仍然可以这样用,只是已经不再是必须的
Private Sub Form_Load()
10 Me.ScaleHeight = 1000
20 Me.ScaleWidth = 1000

End Sub

:用于在一行中写多个语句,在VB中,仍然……


多谢大神,S$是字符串呢,VB里面不要定义的吗?上面那段程序好像没有初定义的吧,还有VB里面有 LOCATE 函数吗,按您的方法修改,可以运行吗?我用得是VB6.0可以吗? --------------------编程问答--------------------
引用 1 楼 worldy 的回复:
早期的basic
如果你懂得VB,照道理你能看懂,VB保留了早期basic的大部分特性
每行前面的数字是行号,早期的VB必须,在VB中,你仍然可以这样用,只是已经不再是必须的
Private Sub Form_Load()
10 Me.ScaleHeight = 1000
20 Me.ScaleWidth = 1000

End Sub

:用于在一行中写多个语句,在VB中,仍然……


我下了个win7 64位的QBASIC ,运行时出现
大神能给解释一下吗? --------------------编程问答-------------------- QBASIC 我能看懂些,VB串口调试也看了一些。
VB中写成Open "com1:9600,n,8,1,cs0,ds0,cd0 " For Random As #1
也能实现通信? --------------------编程问答--------------------
引用 4 楼 fuzimango 的回复:
QBASIC 我能看懂些,VB串口调试也看了一些。
VB中写成Open "com1:9600,n,8,1,cs0,ds0,cd0 " For Random As #1
也能实现通信?
学习了…… --------------------编程问答-------------------- 不知道还有“win7 64位的QBASIC”呢 --------------------编程问答--------------------
引用 2 楼 fuzimango 的回复:
………… S$是字符串呢,VB里面不要定义的吗?上面那段程序好像没有初定义的吧,还有VB里面有 LOCATE 函数吗,按您的方法修改,可以运行吗?我用得是VB6.0可以吗?

印象中BASIC中所用的变量都不用事先定义的吧。

LOCATE 应该是‘光标定位’函数吧?
在VB中,窗体和PictureBox用 .CurrentX、.CurrentY属性 来实现‘光标定位’。

--------------------编程问答--------------------
引用 6 楼 bcrun 的回复:
不知道还有“win7 64位的QBASIC”呢


可以百到的。。 --------------------编程问答--------------------
引用 7 楼 Chen8013 的回复:
引用 2 楼 fuzimango 的回复:
………… S$是字符串呢,VB里面不要定义的吗?上面那段程序好像没有初定义的吧,还有VB里面有 LOCATE 函数吗,按您的方法修改,可以运行吗?我用得是VB6.0可以吗?
印象中BASIC中所用的变量都不用事先定义的吧。

LOCATE 应该是‘光标定位’函数吧?
在VB中,窗体和PictureBox用 .CurrentX、.CurrentY……


要定义的吧,第一行 Dim D(200): k = 0: m = 199 是定义啊,
我是想请教在VB中字符串变量要不要定义的。。 --------------------编程问答-------------------- 不用定义。。。 --------------------编程问答-------------------- 垃圾代码,不屑于看,如果你有什么不会的,在关键字上按F1自己看就好了。QBasic本身有一个详细的在线帮助。
补充:VB ,  API
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,