level 1
BASIC语言历史悠久,近年来发展迅速。BASIC语言的结构化程度高,易于理解,很适合广大的编程人员使用。而第三代BASIC语言的功能更是日臻完善、强大,使用人员更多。本文意在向编程经验不十分丰富的读者介绍用BASIC语言设计Windows风格的图形用户接口,起一点抛砖引玉的作用,不妥之处望不吝赐教。程序在VGA(用Screen12语句设置)方式下运行,可在QuickBASIC、MSBASIC或VisualBASICforMS-DOS下编译。另外需要说明的是程序中设置颜色使用的都是调色板位置号,一个调色板位置号并不固定代表某种特定颜色,而是可以由编程者通过PALETTE语句或PALETTEUSING语句自行指定的。当然,一般情况下我们使用系统缺省的调色板颜色。1.读点阵字模交叉显示汉字及ASCII字符。这里要用到UCDOS3.1的HZK16和ASC16两个字模文件,该功能模块的代码如下:SUBDispHz(HzCol,HzRow,Color,HzStr$)DIMi1,i2,i3,I,c1,c2,f,g,HzChar,AscCharASINTEGERDIMHzByASSTRING*32DIMAscByASSTRING*16DIMl,HzRecASLONGOPEN"HZK16"FORBINARYAS#1`打开汉字库文件OPEN"ASC16"FORBINARYAS#2`打开ASCII码字库文件HzLen=LEN(HzStr$)`计算字符串长度HzPos=1`置字符串的首字节为当前字节WHILEHzPos＜=HzLen`字符串显示完前一直循环I=ASC(MID$(HzStr$,HzPos,1))`获取当前字符的ASCII值IFI＞&HA0THEN`判断是否为汉字内码IFf=0THEN`f为零则该字节为汉字区码.....详见：http://www.d8sun.com/html/44/n-79244.html
2008年05月06日 06点05分
1
