ASIC

我也新人

关联类型 （associated types）是一个将类型占位符与 trait 相关联的方式，这样 trait 的方法签名中就可以使用这些占位符类型： trait 的实现者会针对特定的实现在这个类型的位置指定相应的具体类型： 只能选择一次 Item 的类型，因为只能有一个 impl Iterator for Counter 。当调用 Counter 的 next 时不必每次指定我们需要 u32 值的迭代器。 当使用泛型类型参数时，可以为泛型指定一个默认的具体类型。如果默认类型就足够的话，这消除了为具体类型实现 trait 的需要。为泛型类型指定默认类型的语法是在声明泛型类型时使用 ·<PlaceholderType=ConcreteType>·： <RHS=Self> 语法叫做 默认类型参数 （default type parameters）， RHS 是一个泛型类型参数（“right hand side” 的缩写），它用于定义 add 方法中的 rhs 参数，如果实现 Add trait 时不指定 RHS 的具体类型， RHS 的类型将是默认的 Self 类型。 不带参数如下： 带参数如下： 默认参数类型主要用于如下两个方面： 一个 trait 与另一个 trait 拥有相同名称的方法： 可如下进行方法的区分： 但是 关联函数 是 trait 的一部分，但没有 self 参数，当同一作用域的两个类型实现了同一 trait，Rust 就不能计算出我们期望的是哪一个类型： 当调用 Animal::baby_name() 将报错， Animal::baby_name 是关联函数而不是方法，因此它没有 self 参数，无法计算出所需的是哪一个 Animal::baby_name 实现，此时需要使用 完全限定语法 （fully qualified syntax）： 通常，完全限定语法定义为： 只有当存在多个同名实现而 Rust 需要帮助以便知道调用哪个实现时，才需要使用这个较为冗长的语法。 如果想要在 Vec<T> 上实现 Display ，而孤儿规则阻止，因为 Display trait 和 Vec<T> 都定义于我们的 crate 之外。 一个绕开这个限制的方法是使用 newtype 模式 ：可以创建一个包含 Vec<T> 实例的 Wrapper 结构体，在 Wrapper 上实现 Display 并使用 Vec<T> 的值： 此方法的缺点是，因为 Wrapper 是一个新类型，它没有定义于其值之上的方法，必须直接在 Wrapper 上实现 Vec<T> 的所有方法，这样就可以代理到 self.0 上，如果希望新类型拥有其内部类型的每一个方法，可为封装类型实现 Deref trait，并返回其内部类型是一种解决方案；如果不希望封装类型拥有所有内部类型的方法，则必须只自行实现所需的方法。

有用的呀啊。。

Oracle提供了一下几种类型的表压缩方法：1、Basic Compression：压缩等级High，CPU开销较小2、OLTP Compression：压缩等级High，CPU开销较小3、Warehouse Compression：压缩等级Higher，CPU开销较大（取决于压缩参数是Low还是High，默认是HIGH）4、Archive Compression：压缩等级Highest，CPU开销很大（取决于压缩参数是Low还是High，默认是LOW）当使用Basic Compression，warehouseCompression，Archive Compression类型的压缩时，尽在发生批量数据导入时才会执行压缩。OLTP Compression被用于联机事务处理系统，可以对任意的SQL操作执行数据压缩。Warehouse Compression和Archive Compression可以获得很高的压缩等级，因为它们采用了Hybrid Columnar（混合列）压缩技术，Hybrid Columnar采用一种改良的列的存储形式替代一行为主的存储形式。Hybird Columnar技术允许将相同的数据存储在一起，提高了压缩算法的效率。当使用混合列压缩算法时，将导致更多的CPU开销，因此这种压缩技术适用于更新不频繁的数据。之前未压缩的表可以通过alter table ... compression ... 语句进行压缩。在这种情况下，压缩启用前的记录不会被压缩，只有新插入或更新的数据才会进行压缩。同样，通过alter table ... nocompression ...语句解除对一个表的压缩，表内已压缩的数据还会继续保持压缩的状态，新插入的数据就不再被压缩。表压缩语法：CREATE TABLE table_name (column_defination...)COMPRESS FOR [OLTP]|[QUERY|ARCHIVE[LOW|HIGH]];ALTER TABLE table_name COMPRESS FOR [OLTP]|[QUERY|ARCHIVE [LOW|HIGH]];

　　一、 int PASCAL FAR setsockopt( SOCKET s, int level, int optname, const char FAR* optval, int optlen);　　设置套接口的选项。　　s：标识一个套接口的描述字。　　level：选项定义的层次；目前仅支持SOL_SOCKET和IPPROTO_TCP层次。　　optname：需设置的选项。　　optval：指针，指向存放选项值的缓冲区。　　optlen：optval缓冲区的长度。　　setsockopt()的使用是十分复杂的，其功能是很丰富的。setsockopt()函数用于任意类型、任意状态套接口的设置选项值。有两种套接口的选项：一种是布尔型选项，允许或禁止一种特性； 另一种是整形或结构选项。允许一个布尔型选项，则将optval指向非零整形数； 禁止一个选项optval指向一个等于零的整形数。 对于布尔型选项，optlen应等于sizeof(int) ； 对其他选项，optval指向包含所需选项的整形数或结构，而optlen则为整形数或结构的长度。　　返回值： 若无错误发生，setsockopt()返回0。否则的话，返回SOCKET_ERROR错误，应用程序可通过WSAGetLastError()获取相应错误代码。 错误代码：　　WSANOTINITIALISED：在使用此API之前应首先成功地调用WSAStartup()。　　WSAENETDOWN：WINDOWS套接口实现检测到网络子系统失效。　　WSAEFAULT：optval不是进程地址空间中的一个有效部分。　　WSAEINPROGRESS：一个阻塞的WINDOWS套接口调用正在运行中。　　WSAEINVAL：level值非法，或optval中的信息非法。　　WSAENETRESET：当SO_KEEPALIVE设置后连接超时。　　WSAENOPROTOOPT：未知或不支持选项。其中，SOCK_STREAM类型的套接口不支持SO_BROADCAST选项，SOCK_DGRAM类型的套接口不支持SO_DONTLINGER 、SO_KEEPALIVE、SO_LINGER和SO_OOBINLINE选项。　　WSAENOTCONN：当设置SO_KEEPALIVE后连接被复位。　　WSAENOTSOCK：描述字不是一个套接口。　　具体使用如下：　　1.closesocket（一般不会立即关闭而经历TIME_WAIT的过程）后想继续重用该socket：　　BOOL bReuseaddr=TRUE;　　setsockopt(s,SOL_SOCKET ,SO_REUSEADDR,(const char*)&bReuseaddr,sizeof(BOOL));　　2. 如果要已经处于连接状态的soket在调用closesocket后强制关闭，不经历 TIME_WAIT的过程：　　BOOL bDontLinger = FALSE;　　setsockopt(s,SOL_SOCKET,SO_DONTLINGER,(const char*)&bDontLinger,sizeof(BOOL));　　3.在send(),recv()过程中有时由于网络状况等原因，发收不能预期进行,而设置收发时限：　　int nNetTimeout=1000;//1秒　　//发送时限　　setsockopt(socket，SOL_S0CKET,SO_SNDTIMEO，(char *)&nNetTimeout,sizeof(int));　　//接收时限 setsockopt(socket，SOL_S0CKET,SO_RCVTIMEO，(char *)&nNetTimeout,sizeof(int));　　4.在send()的时候，返回的是实际发送出去的字节(同步)或发送到socket缓冲区的字节 (异步);系统默认的状态发送和接收一次为8688字节(约为8.5K)；　　在实际的过程中发送数据和接收数据量比较大，可以设置socket缓冲区，而避免了send(),recv()不断的循环收发：　　// 接收缓冲区　　int nRecvBuf=32*1024;　　//设置为32K　　setsockopt(s,SOL_SOCKET,SO_RCVBUF,(const char*)&nRecvBuf,sizeof(int));　　//发送缓冲区 int nSendBuf=32*1024;//设置为32K　　setsockopt(s,SOL_SOCKET,SO_SNDBUF,(const char*)&nSendBuf,sizeof(int));　　5. 如果在发送数据的时，希望不经历由系统缓冲区到socket缓冲区的拷贝而影响程序的性能：　　int nZero=0;　　setsockopt(socket，SOL_S0CKET,SO_SNDBUF，(char *)&nZero,sizeof(nZero));　　6.同上在recv()完成上述功能(默认情况是将socket缓冲区的内容拷贝到系统缓冲区)：　　int nZero=0;　　setsockopt(socket，SOL_S0CKET,SO_RCVBUF，(char *)&nZero,sizeof(int));　　7.一般在发送UDP数据报的时候，希望该socket发送的数据具有广播特性：　　BOOL bBroadcast=TRUE;　　setsockopt(s,SOL_SOCKET,SO_BROADCAST,(const char*)&bBroadcast,sizeof(BOOL));　　8.在client连接服务器过程中，如果处于非阻塞模式下的socket在connect()的过程中可以设置connect()延时,直到accpet()被呼叫(本函数设置只有在非阻塞的过程中有显著的作用，在阻塞的函数调用中作用不大)　　BOOL bConditionalAccept=TRUE;　　setsockopt(s,SOL_SOCKET,SO_CONDITIONAL_ACCEPT,(const char*)&bConditionalAccept,sizeof(BOOL));　　9.如果在发送数据的过程中(send()没有完成，还有数据没发送)而调用了closesocket(),以前我们一般采取的措施是"从容关闭"shutdown(s,SD_BOTH),但是数据是肯定丢失了，如何设置让程序满足具体应用的要求(即让没发完的数据发送出去后在关闭socket)？　　struct linger　　{　　u_short l_onoff;　　u_short l_linger;　　};　　linger m_sLinger;　　m_sLinger.l_onoff=1;//(在closesocket()调用,但是还有数据没发送完毕的时候容许逗留) 如果m_sLinger.l_onoff=0;则功能和2.)作用相同;　　m_sLinger.l_linger=5; //(容许逗留的时间为5秒)　　setsockopt(s,SOL_SOCKET,SO_LINGER,(const char*)&m_sLinger,sizeof(linger));　　二、 int PASCAL FAR getsockopt( SOCKET s, int level, int optname, char FAR* optval, int FAR* optlen);　　s：一个标识套接口的描述字。　　level：选项定义的层次。支持的层次仅有SOL_SOCKET和IPPROTO_TCP。　　optname：需获取的套接口选项。　　optval：指针，指向存放所获得选项值的缓冲区。　　optlen：指针，指向optval缓冲区的长度值。　　返回值： 若无错误发生，getsockopt()返回0。否则的话，返回SOCKET_ERROR错误，应用程序可通过WSAGetLastError()获取相应错误代码。　　错误代码：　　WSANOTINITIALISED：在使用此API之前应首先成功地调用WSAStartup()。　　WSAENETDOWN：WINDOWS套接口实现检测到网络子系统失效。　　WSAEFAULT：optlen参数非法。　　WSAEINPROGRESS：一个阻塞的WINDOWS套接口调用正在运行中。　　WSAENOPROTOOPT：未知或不支持选项。其中，SOCK_STREAM类型的套接口不支持SO_BROADCAST选项，SOCK_DGRAM类型的套接口不支持SO_ACCEPTCONN、SO_DONTLINGER 、SO_KEEPALIVE、SO_LINGER和SO_OOBINLINE选项。 WSAENOTSOCK：描述字不是一个套接口。　　例如：获取recv的缓冲区大小　　int optval = 0;　　int optlen = sizeof(optval);　　getsockopt(socket, SOL_SOCKET, SO_RCVBUF, (char*)&optval, &optlen);　　temp.Format("SOCKET接收的缓冲区大小：optval:%d, optlen:%d", optval, optlen);　　AfxMessageBox(temp);

先说说前者吧，GT-2000 2是ASICS 亚瑟士今年推出的GT-2000 第二代跑鞋，定位于次顶级稳定，曾荣获美国权威杂志《跑鞋世界》（Runner‘s World）编辑推荐与最佳减震大奖，更适合中等体重的跑者穿着。GT-2000 2跑鞋，集合了跑步必备的缓冲性、轻量性、舒适性等功能，被认为是最实用的跑步装备。初代GT-2010在科技方面使用了Gel缓震胶、EVA材质中底、DuoMax双密度防倾斜装置等关键技术，随着技术的发展，而这款GT-2000 2在中底使用的是与Nimbus 15相同的FluidRide 双层泡棉，中足稳定片Guidance Trusstic System、动态双密度防倾斜装置Dynamic DuoMax、以及最主要的前后掌避震Gel（前掌部分采用的是隐藏式设计），可以看出科技元素越发丰富。再看看美津浓的，Mizuno WAVE PARADOX 是美津浓2014年最新发布的旗舰款支撑型跑步鞋，是之前顶级nirvana版的替代款，而且单支重量上要比nirvana又轻了15g，并且中底采用了全新改良的全掌扇形WAVE，且美津浓在高端产品线上都普及了U4ic超回弹缓震中底和热贴补强鞋面；表层结构采用了DYNAMOTION FIT动态贴合系统，无论是在静止还是运动时都增强了其贴合性；另外AIRmesh透气性技术使得其在穿着时提供了更为舒适的脚感。前掌处Smoothride结构，使得跑步时脚掌的过渡更为流畅，+X10橡胶大底都是不可缺少的配置。相信楼主已经有一个比较明确的判断了吧。

题主是否想询问“atthemostbasic和atitsmostbasic的区别”吗？意思不同、用法不同、侧重点不同。1、atthemostbasic意思：最多，atitsmostbasic意思：之多。2、atthemostbasic作名词时常与介系of连用，放在其他名词前作限定用法(该名词前应有my，our，the等限定词)，atitsmostbasic构成最高级时，通常指两者以上的“最”，但有时也可以表示两者之间的“最”。3、atthemostbasic与形容词连用构成最高级时，前面通常要加定冠词，尤其是在有明确的比较范围时。atitsmostbasic用作副词时是many和much的最高级，可与部分两个或两个以上音节的形容词或副词构成最高级。以上就是atthemostbasic和atitsmostbasic的区别。

basic的英语意思是adj. 基本的；基础的。n. 基础；要素basic副词1.基本的，基础的；根本的2.首要的，主要的3.最简单的；初级的；初步的4.必需的；基本需要的5.基本的；没有附加成分的6.(工资)不含加班费(或津贴)的；最低标准额的；基本标准的7.【化学】碱性的；强碱的；碱的；含碱的8.【地质学】基性的，(火成岩)氧化硅含量低于52%的，含氧化硅较少的9.【口】起码的；初步的；梗概的n.1.[常用复数] 基本因素，基本部分；基本原则，基本原理，基本规律单词分析这些形容词均有“基本的，基础的”之意。basic普通用词，指明确、具体的基础或起点。essential语气比basic和fundamental强，强调必不可少，暗含某物如缺少某部分，则失去本质特征的意味。fundamental书面用词，不如basic使用广泛，侧重指作为基础、根本的抽象的事物。radical着重指事物的根本或其来源。vital正式用词，侧重指维持生命、活力必不可少的，或生死攸关的。

basic的英语意思是adj. 基本的；基础的。n. 基础；要素basic副词1.基本的，基础的；根本的2.首要的，主要的3.最简单的；初级的；初步的4.必需的；基本需要的5.基本的；没有附加成分的6.(工资)不含加班费(或津贴)的；最低标准额的；基本标准的7.【化学】碱性的；强碱的；碱的；含碱的8.【地质学】基性的，(火成岩)氧化硅含量低于52%的，含氧化硅较少的9.【口】起码的；初步的；梗概的n.1.[常用复数] 基本因素，基本部分；基本原则，基本原理，基本规律单词分析这些形容词均有“基本的，基础的”之意。basic普通用词，指明确、具体的基础或起点。essential语气比basic和fundamental强，强调必不可少，暗含某物如缺少某部分，则失去本质特征的意味。fundamental书面用词，不如basic使用广泛，侧重指作为基础、根本的抽象的事物。radical着重指事物的根本或其来源。vital正式用词，侧重指维持生命、活力必不可少的，或生死攸关的。

MNG是服饰品牌。MNG是西班牙服饰品牌。以时尚，摩登，具都会感的服装设计成功赢得全球女性的一致青睐，同时，也迅速传递西班牙时装的形象语言。MANGO的提供种类齐全的女性时装饰品，有内衣，泳衣，鞋履，手袋，皮带，服装，皮具，人造首饰以至MANGO品牌香水等，应有尽有。

使用过Windows Vista 的用户都会对Vista窗口的磨砂玻璃效果印象深刻，而如果你在Windows Vista 下使用过 Windows Media Player 11 更会发现微软把这种效果扩展至WMP11的底部区域，使得WMP的底部按钮区域成为一条“玻璃带”，如图:事实上，Vista窗口的磨砂玻璃效果不仅限于窗体的边框(非客户区域)，他可以任意的延伸，甚至铺满整个窗口，下面我们就来看看怎么用的vb6来实现这种扩展。Vista实现磨砂玻璃效果主要依靠一组叫做 Desktop Window Manager (DWM) 的API来实现，该组API均以dwm打头，存在于dwmapi.dll中(该文件为Vista特有)，顾名思义，这些API是专门用来实现Vista窗口的特效的。由于篇幅所限，这里仅介绍和本文关系最密切的两个函数:DwmIsCompositionEnabled 和 DwmExtendFrameIntoClientArea。第一个函数DwmIsCompositionEnabled是用于判断系统的磨砂玻璃合成效果是否已经开启，因为该效果可以由用户关闭，尽管你可以在用户关闭合成效果的情况下在程序中单独使用合成效果。DwmIsCompositionEnabled的原型为:HRESULT DwmIsCompositionEnabled( BOOL *pfEnabled )其中pfEnabled为一个输出参数，告诉后面的程序合成效果是否被打开。该函数的VB声明为:Public Declare Function DwmIsCompositionEnabled Lib "dwmapi.dll" (ByRef enabledptr As Long) As Long这里要注意C++里的BOOL类型必须译成vb中的Long而不是Boolean，否则你将得到错误的结果。DwmExtendFrameIntoClientArea函数则用于将磨砂边框扩展至窗体客户区，使得整个窗体看上就像一张卡片(sheet)。该函数原型为:HRESULT DwmExtendFrameIntoClientArea(HWND hWnd,const MARGINS *margins)其中hWnd 为目标窗口句柄，margins为一个MARGINS结构体指针MARGINS结构体定义为:typedef struct _MARGINS{int cxLeftWidth;int cxRightWidth;int cyTopHeight;int cyBottomHeight;} MARGINS, *PMARGINS;该函数的vb引用为:Public Declare Function DwmExtendFrameIntoClientArea Lib "dwmapi.dll" (ByVal hwnd As Long, margin As MARGINS) As LongMARGINS的vb形式定义:Public Type MARGINSm_Left As Longm_Right As Longm_Top As Longm_Button As LongEnd Type其中MARGINS中的各个成员为需要扩展的边框大小(单位:像素)，如果要把磨砂玻璃效果铺满整个边框(本文以此为例)，全部成员可设置为-1知道了这些，我们现在就可以动手了。我们在窗体的Form_Load事件里写上:Dim mg As MARGINS, en As Longmg.m_Left = -1mg.m_Button = -1mg.m_Right = -1mg.m_Top = -1DwmIsCompositionEnabled enIf en ThenDwmExtendFrameIntoClientArea Me.hwnd, mgEnd If然后运行(先确保系统使用Aero界面且合成效果被打开)，结果发现窗体依然如故。原来，DwmExtendFrameIntoClientArea扩展后的边框并不会在客户区的前景显示(它其实是一个背景，你会发现，此时边框其实已经被扩展了，因为原来的客户区的凹陷边界已经消失)，磨砂玻璃的效果被窗体默认画上去的前景覆盖了，所以我们得自己给窗体画个“透明”的前景。幸运的是，在RGB调色版中，黑色black (0x00000000)刚好就是ARGB(short for Alpha, Red, Green and Blue)的100%透明(这刚好可以解释为什么用Windows 画图板打开一个png图片时透明背景会变成纯黑)。所以，第一个方法，我们可以在窗口的Form_Paint事件(是的，Form_Paint就足够了，不用去子类化窗体。当然，如果要实现更高级功能，还是子类化吧)中给窗口的前景用纯黑(RGB(0,0,0))填充，用的是经典的GDI，主要就是CreateSolidBrush和FillRect两个API工作，代码:Dim hBrush As Long, m_Rect As RECT, hBrushOld As LonghBrush = CreateSolidBrush(RGB(0, 0, 0))hBrushOld = SelectObject(Me.hdc, hBrush)GetClientRect Me.hwnd, m_RectFillRect Me.hdc, m_Rect, hBrushSelectObject Me.hdc, hBrushOldDeleteObject hBrush ‘别忘了删除对象现在再按一次F5，恩.很好!#p#副标题#e#效果如下:但是接着问题就来了，当你在窗体上放上几个控件之后会发现，控件的黑色部分(一般就是文字)也带上了磨砂玻璃的“特效”如图:注意到上面的Text1文字了吗?这种效果可不是我们想要的。怎么办呢?上帝说:要有更好的办法于是，就有了第二种实现方法。其实这个问题的关键是画出透明的客户区，那么，别忘了，还有一个API可以做成此事，记得.NET里面那些控件和窗口有的有个TransparentKey属性么?没错了，就是用它—— SetLayeredWindowAttributesSetLayeredWindowAttributes可以提供这样的一个功能:给一个窗口设定一个透明色，然后窗口显示的时候指定颜色的区域将变成透明。这样，只要我们给窗口指定一种没有用到的颜色(反正不是黑色就行，这里我用RGB(255,255,1))，就可以“画”出“透明”的区域了。我们在使用之前要先对SetLayeredWindowAttributes做做手脚，将其声明为:Public Declare Function SetLayeredWindowAttributesByColor Lib "user32" Alias "SetLayeredWindowAttributes" (ByVal hwnd As Long, ByVal crey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long为什么要这么干呢?留意函数第二个参数，本来有人将其声明为Byte类型(用于窗体半透明时没有问题)，但是这里要传一个RGB值，所以要改成Long代码如下，相关的API和常量不再敷述，声明和值请读者自行补齐Form_Load事件:(先声明m_transparencyKey全局变量，Long类型)m_transparencyKey = RGB(255, 255, 1) ‘多少没所谓SetWindowLong Me.hwnd, GWL_EXSTYLE, GetWindowLong(Me.hwnd, GWL_EXSTYLE) Or WS_EX_LAYEREDSetLayeredWindowAttributesByColor Me.hwnd, m_transparencyKey, 0, LWA_COLORKEYDim mg As MARGINS, en As Longmg.m_Left = -1mg.m_Button = -1mg.m_Right = -1mg.m_Top = -1MsgBox "1"DwmIsCompositionEnabled enIf en ThenDwmExtendFrameIntoClientArea Me.hwnd, mgEnd If再在Form_Paint事件中画图:Form_Paint代码:Dim hBrush As Long, m_Rect As RECT, hBrushOld As LonghBrush = CreateSolidBrush(m_transparencyKey)hBrushOld = SelectObject(Me.hdc, hBrush)GetClientRect Me.hwnd, m_RectFillRect Me.hdc, m_Rect, hBrushSelectObject Me.hdc, hBrushOldDeleteObject hBrush再按F5，效果嘛#p#副标题#e#顺便提一下，此代码在WindowsVista以下版本，2000及以上Windows版本运行时会产生一个很有趣的效果(除控件外窗体客户区背景完全透明!)如图:#p#副标题#e#

　　摘 要：根据职业类学校学生的特点，结合计算机专业课程的发展方向，探讨和研究适合《Visual Basic》课程的教学方法，如项目教学法和任务驱动教学方法。使学生能更全面深入的掌握《Visual Basic》课程的教学内容，注重培养学生创新和团队合作能力。 　　关键词：Visual Basic 教学方法 任务驱动法 项目教学法 　　 　　vb是Visual Basic的简称，是由美国微软公司于1991年开发的一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言，它是许多职业类学校计算机专业的基础课程，对于学生来说，程序设计的思维方式和概念都是全新的，学生接受起来很困难，因此必须研究程序设计的教学方法。那么在职业学校中如何有针对性的做好该门课程的有效课堂教学，切实培养学生的技能水平和理论水平，寻找一个好的教学方法是非常重要的，这也成为当代职业类学校教师VB教学工作的不可忽视的环节。下面我就从Visual Basic这个软件来谈谈适合的教学方法。 　　一、课程教学的整体设计以及 教学计划 和目标 　　本课程一般要分为两个阶段来讲解，第一个阶段是Visual Basic基本功能的介绍，窗体的了解，各种控件的使用，在这个阶段的教学目标是让学生熟练的掌握Visual Basic各种控件的使用，尽可能多的了解Visual Basic各种控件的作用。第二个阶段是利用Visual Basic进行简单程序的编写，在这个阶段的教学目标是使学生能独立完成一些Windows应用程序编写，例如：一些常用应用软件的登录窗口，这些设计在我们的生活中很常见，学生了解这些知识可以为以后系统的编程提供更大的空间。这两个阶段的教学可以放在1个学期来完成，为了使学生能更好的完成各个阶段的教学目标，教师采取的教学方法是十分重要的，课程采取的教学方法不仅要符合职业类学校学生的实际情况，更要在最大限度上提高学生的学习兴趣，使学生能在轻松的环境下完成对课程的学习。因此要根据课程各个阶段的知识特点，采用不同的教学方法。 　　二、课程第一阶段采用教学方法 　　第一阶段的教学目标是Visual Basic基础操作的训练，为了避免枯燥的讲解控件使用方法，又能使学生理解工具箱中控件的的作用并能熟练使用，在这个阶段可以使用任务驱动教学法。所谓“任务驱动”就是在学习课程的过程中，学生在教师的帮助下，紧紧围绕一个共同的任务活动中心，在强烈的问题动机的驱动下，通过对学习资源的积极主动应用，进行自主探索和互动协作的学习，并在完成既定任务的同时，引导学生产生一种学习实践活动。在这个阶段教师可以精心设计一些制作实例，由浅入深，通过每一个实例的制作来掌握控件的使用，教师先利用多媒体设备给学生讲解实例的制作步骤，分析实例中用到的控件，学生再利用上机课完成实例的制作，并且总结用到控件的特点，探索这些控件有没有其它方面的作用。教师最后检查每一个学生任务完成的情况，并做出评价性总结。通过这样的方法进行教学，使学生既有完成实例的兴趣和动力，又有教师最后检查任务完成情况的压力。最终可以使学生顺利完成第一阶段的教学目标。 　　三、课程第二阶段采用教学方法 　　第二阶段的教学目标是使学生利用Visual Basic能独立完成一些常用软件与小游戏的编写，由于在这个阶段学生要独立完成一些程序的编写，学生有自己的设计思路，因此教师只需要补充一些使用软件时不同的语言设计可以得出不同效果的理念和方法。在这个阶段学生是课堂的主体，教师可以使用项目教学法进行教学，所谓项目教学法是学生在教师的指导下亲自处理一个项目的全过程，教师将需要解决的问题或需要完成的任务以项目的形式交给学生，在教师指导下，以个人或小组工作方式，由学生自己按照实际工作的完成程序，共同制定计划，共同或分工完成整个项目。在使用项目教学法进行课程教学时可以分以下几个步骤： 　　1．确定目标 　　由教师提出一个设计的项目，然后同学生一起讨论，最终确定项目的目标和任务。学生可根据需要提前准备，以利于项目教学的实施。 　　2．制定要求： 　　项目要求是在该项目训练中要达到的训练目的，也是学生评价的准绳。 　　3．项目实施 　　在这个阶段中，学生明确自己的目的任务，然后按照确立的工作步骤和程序工作，实施过程中，可及时得到教师的指导。结束后将项目实施的步骤简单的记录下来，以利于与复习、总结与提高。 　　对于需要设计的项目，则要通过绘制草图的方式促进项目的更好实施，同时要注明设计说明。 　　4．评估总结 　　这个阶段是整个项目活动的总结，是对项目活动结果的检查与评估。评价的方式在项目完成以后，先由学生个人进行自我评价，再由教师点评，让学生明确在项目学习中自己的优点，更好的激发学生的学习积极性，同时了解存在的问题，完善以后的项目学习。 　　四、教学方法的比较 　　任务驱动法和项目教学法两者都是通过具体的任务来激发学生的学习兴趣，达到预期的教学目标，但它们的区别在于任务驱动法可以更大地激发学生的求知欲望，逐步形成一个感知心智活动的良性循环，从而培养出独立探索、勇于开拓进取的自学能力。项目教学法更注重培养学生分析问题和解决问题的能力及团队精神和合作能力，这一点在现在的IT行业中是很重要的，要完成IT企业中的一个项目，一般需要一个团队来共同完成，一个人即使能力再强，也不可能独立完成整个项目。 　　总之，对于Visual Basicc这样实践操作性非常强的课程，采取传统的教学方法是不能完成课程的教学任务的，采用任务驱动法和项目教学法为此类课程的教学提供了有力的补充，采用这两种新型的教学方法教学，课堂气氛会更活跃，学生参与更积极主动，学生的创新和团队合作能力会更强。教师只有以激发学生学习动机为目的，以就业为导向，不断的探讨和研究适应中职学生现状的教学模式才能培养出更多的高素质劳动者。 　　 　　【参考文献】 　　[1] 邱崇光.《“教学结构”和“教学模式”辨析［J］》，电化教育研究,2002年第9期. 　　[2] 李力 浅析探究性学习在中职计算机教学中的运用《中等职业教育》2008年12期 　　[3] 张睿 浅析项目教学法 济南电子机械工程学校

1000 basic english words（1000个基本英语单词）是针对小学六年级的。这1000个基础单词也是小升初必考的内容。同时，也是初一和初二的基础单词，十分实用。这1000个单词包含地理方位、自然现象、家庭与人物称呼、家庭用具、电器及文具、玩具、服装与颜色、体育等分类。英语单词释义：英语单词(English words)的产生是汉英两种语言双向交流的产物，一些带有中国特色的名称和概念进入了英语词汇，同时还有一些英语词汇进入了汉语，在文化环境中衍生出新的含义，形成了英语词汇的语义文化特征。

most perfectmore perfect不是没有比较级和最高级是单词没有变化

歌曲：Game【中文歌词】歌手：GPBasic所属专辑：GameGPBasic-GameLRC制作&翻译:痛``心ゆQQ:932579599A-yowhowannagetthetalk为了给你的两个面孔crow非常温柔的我的你faxaction已经开始myshowletsgo因为有了你我为了你为什么看到你的踪迹这么的寒心像个小孩子一样总是问我问我所以现在你选择gogogo进入我的眼睛Prettyboyboyboy稍微再坦率一点说Myboy你看window那里面你迷了路nowcomeinupback你在dontstopit说话hesay你的方式onestoptwostop你在mystop心扑通扑通的跳不要害怕dontstopboy时间tictoctictoc紧紧mytalk我的眼睛和心被偷onetwothreegetbackGOGOGOGO那样的boy我的boy试着坐下biggame已经开始我自私的你已经我的我的你的你的我的双眼只能看着对面gogogo进入我的眼睛Prettyboyboyboy稍微再坦率一点说MYboy你看window那里面你迷了路nowcomeinupbackdontstopit说话hesay你的方式onestoptwostop你在mystop心扑通扑通的跳不要害怕dontstopboy时间tictoctictoc紧紧mytalk我的眼睛和心被偷onetwothreegetbackLRC制作:痛``心ゆQQ:932579599GOGOGOGOLet"splaymycuty,pretty,likeit,justmyquickplan你一个人来biggame你的眼神missing你的脸颊kissing我全部的光download你的手放在我的肩膀everybodylistenbackupdon"ttouchmytoy(gameovernow)comeon你的方式onestoptwostop你在mystop心扑通扑通的跳不要害怕dontstopboy时间tictoctictoc紧紧mytalk我的眼睛和心被偷123getbackNaNaNaNaNaNaNaNa

美津浓的稍好一些，不过这两款都不是很实用，你的体重如果不大那就更不能选这两款了，推荐ASICS的GT系列和kayano系列，比金星便宜不少

PADI潜水证书一共分9个等级，OW是潜水的入门级，进入潜水殿堂的必考等级。1、OPEN WATER DIVER（开放水域初级潜水员）习惯上，简称OW，是最基本的潜水课程，受训学员可以学习到潜水技巧、与潜伴潜水时的潜水安全知识。OW参加学员必须年满15岁，潜水员的标准下潜深度是去18米。2、ADVANCED OPEN WATER DIVER（开放水域进阶潜水员）简称AOW，课程提供学员不同的专长潜水训练，如深潜、船潜、水中导航及夜潜...等。参加学员必须具有开放水域初级潜水员或其他同等级之资格。 潜水员的标准下潜深度是28米。3、EMERGENCY FIRST ACTION（第一紧急反应）医疗紧急训练是一个独立的紧急救援及心肺复苏术课程，此课程主要为医疗训练，没有潜水课程，所以参加人员不须具备任何潜水资格；课程时数约8小时。在PADI系统中，如果学员已经通过了国际红十字会的CPR（心肺复苏）训练，可以不学习EFR。4、RESCUE DIVER（救援潜水员）救援潜水员课程是学习潜水中第一次要求潜水员必须将注意力集中在另一名潜水员的课程。学员在课程中将学习如何避免危险及意外的发生，并能随时应付水中的紧急状况。参加学员必须具有开放水域进阶潜水员或其他同等级资格。5、SPECIAL COURSES（潜水专长课程）潜水专长课程属于短期的特殊专长课程，课程安排通常为1～2天，主要是2～4次的专长潜水训练。参加学员资格则因各专长潜水的难易程度而有所不同。6、MASTER SCUBA DIVER（名仕潜水员）当潜水员完成了PADI的五项专长潜水课程并具有救援潜水员资格时，即可申请名仕潜水员执照。名仕潜水员是休闲潜水员的最高荣誉。7、DIVER MASTER（潜水长）潜水长是进入潜水教学训练的第一站，持有潜水长执照之潜水员可以从事潜水导游或协助潜水教学的训练工作。潜水长课程包含有三个主要内容∶潜水理论与知识、潜水技巧及实际海洋实习经验。8、ASSISTANT INSTRUCTION（助教）助教课程是提供学员更深入的了解潜水教学训练的专业知识及技巧。课程内容包含有在教练的监督下与学员实际的海洋实习课程，是最好的潜水教练养成教育。参加学员必须具有潜水长资格。9、INSTRUCTOR DEVELOPMENT COURSE IDC（教练培训课程）当学员完成教练培训课程时，即可从事教练之工作，并可培训学员至助教之资格，但不能从事专业潜水训练之教学。教练培训课程提供了潜水教学之技巧及专业知识，课程包含至少18堂的课程，涵盖了所有教学的的理论及实际潜水的技巧。 通过教练培训课程之学员则可以参加教练检定考试。

basic["beisik]adj.基本的, 基础的

英语楠姐。英语楠姐是北京985大学本硕，有16年英语教龄，剑桥MSE考试口语考官和国际英语教师TKT认证，她的Unlock Basic课程使用全新英语教材，与国际接轨，内容新，表达与时俱进。使用高频话题词汇，即学即用。

1、baisc 是很老的语言了，是在 DOS 里运行的，如果想在 windows 里运行的话，建议使用 basic 的后续系列，比如： visual baisc。2、Visual Basic 6.0 | VB 是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。从任何标准来说，VB都是世界上使用人数最多的语言——不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。3、VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。

不能用

有用，现在的是可视化的vb，盖茨发明的东西，不会让他退休的。

要为锻炼自己的编程能力还可以一学,否则就不必了.因为毕竟没有什么软件是用它编的,它还是个解释性的语言.它要是编译语言也许还可以考虑

不同的basic有不同的保存方式：如果你使用F-basic，在模拟器中利用模拟器保存程序。如果你使用gwbasic，输入save "c:123.bas",回车保存。如果你使用qbasic通过文件菜单里的保存来保存程序。如果你使用vba，保存当前文件，也就保存了程序。还有其它的basic,大同小异，不再一一举例。

QBasic不是很难 看看书，不知你们考试的难度如何，如果是简单的话那就看看书，如果涉及到比较难的东西的话那就要看书加练习了，一定要理解编程的主要思想。FoxBasic就是数据库，这个更简单，说白了就是记忆，只要把里面的命令记述了，用起来是很容易的，不需要怎么动脑子。至于微机原理这个就有点困难了，我们也准备要学这个东西，这属于计算机硬件方面的知识，要有基础，不能仅仅靠看书，况且有的时候看书不一定能看懂，需要有人讲解。求采纳

是从你的主板蜂鸣器输出而不是音响。很多主板没有蜂鸣器。

下载QBASIC，解压后运行QB.EXE即可编辑、调试BASIC程序。http://www.s0575.net/soft/1306.htmhttp://www.uhq.cn/soft/qxdown_com349/6984.htm

CLS INPUT "How many?", cc IF cc MOD 2 = 0 THEN 333 dd = cc 2 + 1 CLS RANDOMIZE TIMER PRINT "1:ROCK", "2:SISSOR", "3:PAPER" DO UNTIL x = dd OR y = dd i = INT(RND * 3) SELECT CASE i CASE 0 a$ = "r" CASE 1 a$ = "s" CASE 2 a$ = "p" END SELECT DO UNTIL c$ = "1" OR c$ = "2" OR c$ = "3" c$ = INKEY$ LOOP SELECT CASE c$ CASE "1" b$ = "r" CASE "2" b$ = "s" CASE "3" b$ = "p" END SELECT c$ = "" IF a$ = b$ THEN PRINT "TIE", ELSEIF a$ = "r" AND b$ = "s" THEN PRINT "FAILED", : x = x + 1 ELSEIF a$ = "s" AND b$ = "p" THEN PRINT "FAILED", : x = x + 1 ELSEIF a$ = "p" AND b$ = "r" THEN PRINT "FAILED", : x = x + 1 ELSEIF (a$ = "r" AND b$ = "p") OR (a$ = "p" AND b$ = "s") OR (a$ = "s" AND b$ = "r") THEN PRINT "WIN", : y = y + 1 END IF IF a$ = "r" THEN a$ = "ROCK" ELSEIF a$ = "s" THEN a$ = "SISSOR" ELSE a$ = "PAPER" END IF IF b$ = "r" THEN b$ = "ROCK" ELSEIF b$ = "s" THEN b$ = "SISSOR" ELSE b$ = "PAPER" END IF PRINT "You:"; b$, PRINT "Com:"; a$ LOOP PRINT y; ":"; x IF x = dd THEN PRINT "You lose" ELSEIF y = dd THEN PRINT "You win" END IF PRINT TAB(30); :PRINT "Do you want to play again?" PRINT TAB(30); : PRINT "1:YES 3:NO" DO UNTIL g$ = "1" OR g$ = "3" g$ = INKEY$ IF g$ = "1" THEN g$ = "": x = 0: y = 0: GOTO 333 ELSEIF g$ = "3" THEN END END IF LOOP 回答者： xingyun789789 - 举人 四级 3-15 19:47

引号“”表示原样输出

clsinput"diyigeshu=";ainput"diergeshu=";binput"disangeshu=";c以上语句是输入三个数max=-999ifa>maxthenmax=aifb>maxthenmax=bifc>maxthenmax=c以上语句是找出最大数：先设最大数是max,设最大数的值为-999，当a,b,c中的任意一个比最大数大，就让最大数max等于它。print"zuidashu=";max以上语句输出最大数end

C解释程序

CLS DIM a(8) INPUT k FOR i = 1 TO k a(i) = i + 1 s = s + a(i) v = v + 1 IF s >= k THEN EXIT FOR NEXT i s = 0 FOR i = 1 TO v a(i) = i s = s + a(i) NEXT i x = ABS(s - k) i = v FOR j = 1 TO x a(i) = a(i) + 1 i = i - 1 NEXT j FOR i = 1 TO v PRINT a(i); NEXT i

BASIC QBASIC Visual Basic VB.net 图形编程，这本书已经出版，作者获得的100本书已经申请当当网和天猫网有上架，本书引用了本帖子作为参考文献。请支持。谢谢。

　　找个QBASIC,运行QBASIC后，打开这个文件，然后运行即可。如果想生成可以独立运行的EXE文件，要用QUICK BASIC编译。　　BASIC(Beginners" All-purpose Symbolic Instruction Code，又译培基)，意思就是"初学者通用符号指令代码"，是一种设计给初学者使用的程序设计语言。BASIC是一种直译式的编程语言，在完成编写后不须经由编译及连结等手续即可执行，但如果需要单独执行时仍然需要将其建立成执行档。　　BASIC由Dartmouth学院JohnG.Kemeny与ThomasE.Kurtz两位教授在1965年5月研制出来的。1975年，比尔·盖茨把它移植到PC上。

包括

如果是优酷上的视频教程，你最好安装优酷客户端，安好后刷新一下页面，再单击下载按钮就可以启动客户端下载视频教程了。

for 变量= 初值（任意一个数）to 终值（任意一个数）step 步长（任意一个数）（如果初值大于终值，步长为负数）……next（可以不写一开始for 后面的变量，但我建议要写）

不是呀

basic啊， 人称5分钟语言我是说basic比较简单

最简单的换win7 32位操作系统

以下程序已在qbasic环境中运行成功！！1,clsdo input a$loop until len(a$)=3l=len(a$)s=0for i=1 to l s=s+val(mid$(a$,i,1))next i? send2.clsinput "a,b,c=",a,b,cif a>b then max=a else max=bif max<c then max=c? (a+b+c-max)/2end3.clss=0for i=1 to sqr(100) if 100 mod i=0 then ? i;100/i; s=s+1next i? send

凡事都要靠自己，不能那个老依靠别人，我有个网址，没事去走走！http://ent.daqi.com/bbsnew/01/42925.html

我们先可以设全部是兔，就有三十五乘四有140只脚，再求出多出的是140减94等于46只，这是多出的，再用4减2等于2是没只鸡多两只脚，再用46除于2等于23，这是兔的只数，在用35减23就是12只鸡。所以兔23只，鸡12只。

abs(3-5)*abs(sin(3.14))8*(5/3)/(10.2-5.4)-4.2*5(3*tan(3))*log(5*exp(1)^2)sin(2)/tan(4)*(1/tan(3))绝对值需要用一个函数abs(x)，结果是x的绝对值。sin(30)这里的30用的是角度单位，但是qb里用的是弧度单位（rad），需要换算，换算方法如下：1角度=pi/180弧度，2角度=pi*2/180弧度，（这里pi是圆周率，可以在编写程序时近似的赋值为3.141593）比如30角度=pi/6弧度

log:LOG(x)e:EXP(x)

LOG(X)以e为底X的对数

我想可能是应该把if放到for循环结构里。

先用勾股定理计算另一条边(b)的长度，然后再使用反正切函数ATN() b=sqr(c*c-a*a) atn(b/a) 51.75度左右 对于其他语言，直接用反余弦函数acos()就好

把输入的数排序后输出，可以用冒泡排序、选择排序等"输入FOR I=1 TO 10 INPUT A(I)NEXT I"选择排序FOR I=1 TO 9 FOR J=I+1 TO 10 IF A(I)<A(J) THEN SWAP A(I),A(J) NEXT JNEXT I"输出FOR I=1 TO 10 PRINT A(I);NEXT I

在cmd模式下可运行，但由于屏幕显示模式的限制，许多语句会出错，甚至不运行。32位xp、win7存在同样的问题。完美的解决办法，只有安装虚拟机了。比如微软的Virtual PC。可以到“虚拟机之家”查询相关信息。

you

rem是注释语句表示后面是注释语句，执行的时候不执行他。

1、把（*.txt）里的程序复制2、打开qb3、右击标题栏，选择粘贴就ok了

现在还有人学QBASIC真少见，QusetionSramoc ( K , M ) 表示用数字0、1、2…、K-1组成的自然数中能被M整除的最小数。给定 K、M，求Sramoc ( K,M )。例如 K=2，M=7的时候，Sramoc( 2 , 7 ) = 1001。输入文件（sramoc.in）第一行为两个整数K、M满足2<=K<=10、1<=M<=1000。输出文件（sramoc.out）：输出sramoc(K,M) 。输入样例：2 7输出样例：1001===========================把这个问题转换成进制问题，K代表进制由0到K-1组成的自然数等同于K进制的数比如0到2-1组成的自然数等同于2进制的各个数0,1, 10, 11, 100,101这样按K进制的递增进行。然后把K进制的数，看成10进制的数，得到10进制的值比如，1001，如果是2进制，值为9；如果看成10进制，值为一千零一========所以整个算法就是，K进制的数N，从1开始递增，每次加1，开始循环 把N转换成十进制数D，除7是否余0， 余0则为整数，终止循环，输出N

判定一个数N是否为整数常用表达式为：INT（N）=N或FIX（N）=N 上两式值为真时N是整数,为假时不是整数. 判定一个整数N是奇数常用有三种方法： 1）N MOD 2=1 （N除以2所剩的佘数为1） 2）INT（N/2）N/2 3）FIX(N/2)N/2

音标[kjubeisik]，即q单独念，basic单独念

都基于古老的BASIC语言语法。QBASIC是面向过程的编程环境，不是可视化的，现在几乎已经没人用了；而VB是面向对象的编程环境，是微软推出的一种可视化IDE。

几乎被淘汰了一种很基本的语言 入门很简单但是 性能与现在流行的语言没法比建议 如果是编程入门可以学一下不建议 作为发展方向

http://xiazai.zol.com.cn/detail/14/132311.shtml下载压缩文件后解压即可。

m=5print 3+mm=3+mprint m典型的

QBASIC是BASIC（Beginner"s All-purpose Symbolic Instruction Code，初学者通用指令代码）语言的一个变种，由美国微软公司开发，1991年随MS-DOS 5.0推出。不能被编译成独立的可执行文件，源代码在集成开发环境（IDE）中先被编译成中间代码，然后中间代码在IDE中被解释执行。QBASIC被设计用来代替GW-BASIC，并被集成在MS-DOS 5.0及其更高版本（包括Windows 95）中。QBASIC基于微软稍早推出的QuickBASIC 4.5，但去掉了后者的编译和连接部分。微软在较新版本的Windows中不再集成QBASIC。不过Windows 98的用户可以在光盘的TOOLSOLDMSDOS目录中找到QBASIC，在Windows 95的光盘中，QBASIC存放在OTHEROLDMSDOS目录中。目前QBASIC已经很少被使用了，取而代之的是可视化basic语言VB。

首先，我纠正一下你们两个人，QBAISC和C都是编程语言，不是“软件”。C语言诞生于美国的贝尔实验室，由丹尼斯·里奇（Dennis MacAlistair Ritchie）以肯·汤普森（Kenneth Lane Thompson）设计的B语言为基础发展而来，在它的主体设计完成后，汤普逊和里奇用它完全重写了UNIX，且随着UNIX的发展，c语言也得到了不断的完善。为了利于C语言的全面推广，许多专家学者和硬件厂商联合组成了C语言标准委员会，并在之后的1989年，诞生了第一个完备的C标准，简称“C89”，也就是“ANSI C”，截至2020年，最新的C语言标准为2018年6月发布的“C18”。QBASIC语言是Microsoft公司开发的，MS-DOS 5.0自带的一种计算机程序设计语言。它是由BASIC语言发展而来的一种模块化和结构化的BASIC语言版本，它不但继承了BASIC语言版本的易学、易用等特点，而且扩充了其功能，主要表现在：扩充了变量和常量的类型；提供了新的选择结构； 改进了循环结构；提供了作为单独模块的子程序和函数；不再需要行号； 具有良好的编辑环境；提供联机帮助；提供“分步执行”、“跟踪”等调试工具；采用先进的解释执行方式等几个方面。两者没有什么关系。

运行时！可以通过screen 语句来时现啊，默认是80*25的字符模式，可以通过screen 1就变成了40*12的模式，字大多了（个人感觉不好看呢）可以自己看帮助里的screen的详细说明楼上各位说的那个不行的，不是qb运行后的状态。因为qb是dos程序，所以又有一套屏幕规则。

vb应用更广

功能：演奏由给定的字符串所表示的音乐 格式：PLAY [命令字符串] 说明：[命令字符串]是一种音乐语言单个字符命令组成，用以表示音符的音高、音长、速度及演奏方式等。 乐谱中的音符CDEFGAB(当1=C时相当于简符1234567)在BASIC中仍然是这7个字母，“#”(或“+”)号与“-”号分别表示乐谱中的升半音(#)和降半音(b)，字符“.”代表延长前面音符的一半时长(用来表示附点音符)，其他字符命今如下： 1、O命令 功能：用来设置要演奏的音符所在的八度，即音阶。 格式：On 说明：命令中n的取值为0-6。比如．使计算机在演奏完音阶3的CD之后，再演奏一个高八度的C，即音阶4中的c调，可以用PLAY “O3CDO4C”来实现。普通中音是指音阶3中的音符。 2、L命令 功能；用来设置要演奏的每个音符的长度(亦称音符的时值)。 格式：Ln 说明：n的取值1-64，L1表示以全音符，L2表示半音符，L4表示四分音符，L8表示八分音符…… 一个音符的时值也可以直接写在该音符后面，而不用L命令。如L8A与A8等效，C4E4D4A4等效于L4CEDA，而L4CDEFC2AB2则表示音符后面不带数字的按L设定的四分音符演奏，后面带数字的G2和B2按数字指定的音值演奏，显然用L命令更简洁方便。 3、P命令 功能：表示休止符的长度 格式：Pn 说明：n的取值1-64，P1表示全休止符．P2表示半休止符，P4表示四分休止符…… 4、T命令 功能；用来设置演奏的节拍速度。 格式：Tn 说明：n为每分钟演奏四分音符的数量，取值32-255，缺省是T120 注意：除了T命令外还可以用以下三个命令来控制演奏的速度： (1)MN(音乐标准)：它使每个音符以L设定的音值的7/8来演奏，使得两两音符之间有短暂的停顿。 (2)ML(音乐连奏)；使演奏时两两音符间不停顿，每个音符将演奏足L规定的音长。 (3)Ms(音乐断音)：使每个音符更短一些，以L给出的音值的3/4来演奏，以此来延长音符间的停顿。 另外．QB演奏音乐时有两种方式供选择：前台音乐和背景音乐。由MF和MB来确定。当“命令字符串”中出现MF时，表示在前台插放音乐．即QB要等到执行完PLAY语句后才能继续往下执行程序，在播放音乐时不能做其它的事情。而出现MB时，则表示在后台播放音乐，QB可以将最多32个音符或休止符保存在缓冲区，然后继续执行下面程序，而无需等待把这些音符全部演奏完。这样，MB允许QB在演奏的同时做一些其它的事情，如运算、绘图等等。 现在，在了解了PLAY语句使用方法的基础上我们编制一个简单的程序，来演奏《友谊地久天长》的片断，其相应的简谱如下： 我们把这段乐曲分四部分，每部分单独用一字符串表示，为使两部分间有短暂停顿，在每一部分的末端都用MN演奏。乐曲中连线处用ML连贯演奏。 A$="O2MNG O3C.C16CE D.C16DE C.C16EG MNA4." B$="A G.E16EC D.C16DE C.O2A16AG O3MNC4." C$="A MLG.E16EC D.C16MNDA MLG.E16EG MNA4." D$="O4C O3G.E16EC D.C16DE C.O2A16AG O3C4." PLAY "T60 L8"+A$+B$+C$+D$ END 为清晰起见，程序中各小节的音乐编码之间以空格分开，这样编码与乐谱之间的对应关系一目了然。

dim n=0 ,i=0,j=0 , mySwitch=0input "请输入数的个数(n<=30000)" ndim myArray(n)for s=1 to ninput"请输入要排序的数" myArray(n)nextfor i=0 to n for j=i to n if myArray(i)>myArray(j) then mySwitch=myArray(i) myArray(j)==mySwitch endif nextprint"排序为" myArraynext老长时间没玩过了，试吧，算法没有错，忘了怎样定义了

运算精度不同造成的，这种例子挺多的，还有水仙花数时也有这样的现象。

区别大了，从语法，应用都不一样

QBASIC的几个问题 悬赏分：30 - 离问题结束还有 14 天 23 小时 1、完善下列程序，使其能求出从键盘输入的任意一个非负数的算术平方根。INPUT XIF X>=0 THENLET S= sqr (s)PRINT SELSEPRINT X;"没有实根"ENDIFEND3、写出下列程序运行结果。LET A=36LET B=4LET C=SQR(A)+BPRINT CEND运行结果: 104、完善下列程序，使其能求出12+10+8+……+2之和。 LET S=0 FOR I=12 TO 2 STEP -2 LET S= S+I NEXT I PRINT S END7、写出下列程序运行结果。LET A=9.6LET B=2LET B= INT(A/3)PRINT BEND运行结果: 38、完善下列程序，使其能求出1+2+3+……+20之和。 LET S=0 FOR I=1 TO 20 LET S= S + I NEXT I PRINT S END11、写出下列程序运行结果。LET A=3.2LET B=4.6LET C=INT(A+B)PRINT CEND运行结果: 712、完善下列程序，使其能求出10+8+6+……+2之和。 LET S=0 FOR I=10 TO 2 STEP -2 LET S= s+I NEXT I PRINT S END13、完善下列程序，使其能求出1+1.1+1.2+1.3+……+100之和。LET S=0FOR I= 1 TO 100 STEP 0.1LET S=S+INEXT IPRINT SEND16、求N+(N-1)+(N-2)+……+3+2+1，完善下面的程序LET S=0INPUT NFOR I=N TO 1 STEP -1LET S= S+INEXT IPRINT SEND17、写出下列程序运行结果。S=0FOR X=1 TO 5LET S=S+1NEXT XPRINT SEND运行结果: 5 18. 写出下列程序运行结果。S=0FOR X=10 TO 2 STEP -4LET S=S+XNEXT XPRINT S/XEND运行结果: -919、完善下列程序，该程序的功能是：从键盘上任意输入的两个数,求最大数。INPUT A , BIF A>B THEN MAX= AELSEMAX=BENDIFPRINT “MAX=” ; MAXEND20、完善下列程序，该程序的功能是：从键盘输入一个数，如果这个数不等于零，那么输出它的倒数，否则不显示。INPUT XIF X<>0 THENLET Y= 1/XPRINT YEND IFEND 第三题中SQR是求平方根！不可能是负数的！第四题的确是 -2 我少打了负号！第七题INT是求整函数！意思是A/3之后等于3.2 再用INT对其取整！十七题是对S进行累加！FOR 循环几次就累加几次！十八题是让一个变量S对X进行取数相加！X等于多少！S就将其累加！例如X进行FOR 循环之后依次是10 6 2 S就将这三个数相加！最后一个S/X 要注意X的值并不是2 而应该是 负二因为当FOR进行了三次递减之后，X是2，在程序看来并没有破出循环条件！所以最后还进行了一次减法，但进行最后一次递减之后循环条件破出了！所以下面就没有再执行！运行依次是：10+6+2 / -2

建议使用Free Basic虽然有个别地方和QBasic有些许不同不过大部分都是相同的...而且貌似是可以在64位系统里用的...

楼上正解。估计会的人基本上都已经忘记完了。

QBASIC有四类运算符，分别是算术运算符、字符运算符、关系运算符和逻辑运算符,没有C中的逻辑位移运算符。QBASIC因为没有二进制数据类型，所以就没有位移运算。不过可以用其它方法来做：左移一位乘2，右移一位整除2例：Upper8 = X And &HFF00 "去掉低八位 Lower8 = X And &HFF "去掉高八位 Upper8 = Upper8 / 256 "等于右移8位

qbasic小学组的基本语句及语法1、输入语句：INPUT “提示内容” ；变量1，变量2，变量3 …规则：（1）输入的值是具体的常量；（2）提示内容必须加双引号；（3）可以给多个变量赋值，中间用“，”隔开。例：求学生数学、语文、英语三门课的平均成绩。2、输出语句：PRINT “提示内容” ；表达式规则：（1）提示内容必须加双引号；（2）可以一次完成输出多个表达式的功能。阅读以下程序，理解屏幕输出语句的格式：屏幕输出如下：3、赋值语句：变量 = 表达式规则：（1）赋值号左边只能是变量名字，右边可以是一个常量，变量或含变量的运算式；（2）赋值号的左右两边不能对换；（3）表达式最终结果是个数值．赋值语句先计算出表达式的结果，然后把这个结果赋给“=”左边的变量；（4）在一个赋值语句中只能对一个变量赋值；（5）对于同一个变量可以多次赋值。例：程序1输出的结果是______； 程序2输出的结果是________。4、条件语句：例：输入x的值，计算函数 的函数值。5、循环语句：直到型循环结构和当型循环结构，如下：例：输入n的值，计算1+2+3+…+n的值。6、其它语句：清屏语句：CLS 屏幕语句：SCREEN 12音乐语句：PLAY “C D E F G A B” 结束语句：END

可以装个DOSbox软件，然后在Dosbox窗口里运行。或者用VMwork虚拟机安装个DOS操作系统。最简单的是用windows的CMD命令来执行。以上三种方法各有优缺点：CMD命令方式操作简单，但消耗资源大，而且兼容性差，VMwork虚拟机方式兼容性最好，因为它本来就虚拟了一个安装DOS的PC机，跟真正的实际PC机一模一样，如果编程是与硬件高度相关，采用这种方式最好，缺点是占用CPU资源太大，几乎100%。DosBox兼顾了以上两种方式的优点，占用CPU资源少而且兼容性也很好（大多数知名的DOS游戏可以很顺畅的运行），并且可以调整运行速度，高度推荐！！！

rnd函数公式 int(rnd*(b-a+1))+a b 大数,A 小数

定义C语言是一种计算机程序设计语言。它既有高级语言的特点，又具有汇编语言的特点。它可以作为系统设计语言，编写工作系统应用程序，也可以作为应用程序设计语言，编写不依赖计算机硬件的应用程序。因此，它的应用范围广泛。 C语言对操作系统和系统使用程序以及需要对硬件进行操作的场合，用C语言明显优于其它解释型高级语言，有一些大型应用软件也是用C语言编写的。 C语言具有绘图能力强，可移植性，并具备很强的数据处理能力，因此适于编写系统软件，三维，二维图形和动画。它是数值计算的高级语言。 常用的C语言IDE（集成开发环境）有Microsoft Visual C++，Borland C++，Watcom C++ ,Borland C++ ，Borland C++ Builder,Borland C++ 3.1 for DOS,Watcom C++ 11.0 for DOS,GNU DJGPP C++ ，Lccwin32 C Compiler 3.1,Microsoft C,High C,Turbo C等等..QB即Quick Basic语言.QBasic语言是Quick Basic语言的子集，它只有解释执行功能。属DOS平台下的编程语言，其精髓是当前VB及VB.NET编程语言的基础，只能说QBASIC编的程序不能在WIDOWS平台上运行。DOS发展到后期,出现了Quick Basic语言,它将BASICA,LINK以及DEBUG等软件合并在一起,在同一环境下对用户的源程序自动进行处理--编辑,进行语法检查,编译连接,执行,调试等,最终生成在DOS下的可执行EXE文件.Quick Basic兼容以往的Basic,大多以往Basica开发的源程序不作修改就可在Quick Basic环境下运行或编译.但要注意必须是Basica下以ASCII码存盘的源文件. Visual Basic是可视化Basic编程语言,有4.0,5.0和6.0,发展到现在有.NET BASIC,其中Visual Basic 6.0是应用最广泛的初学者编程语言,它基本兼容大多数BASIC下的源代码或稍加改动就能应用于Visual Basic的代码内,Visual Basic是编译型语言,所生成的EXE文件能在具有VB同版本运行库文件的WINDOWS环境下运行. 学好QBASIC语言对学好VB或C语言都有帮助，就象古汉语现在不用，但古汉语是学习现代汉语的基础一样。

QBASIC是第三代BASIC语言，Visual Basic是第四代。相比之下，最明显的区别是VB是可视化语言（Visual 就是“可视的”的意思）。窗体上的控件（文本框、按钮、复选框等）一般地直接“画”就可以了。同时，VB是面向对象的。现在人用QBASIC一般是为了进行计算（鲁教版高中数学要学QBASIC，很多工程师也要学），而不是为了做软件。

LET （赋值语句）格式：[LET] 变量=表达式功能：先计算右边表达式，然后将结果赋给左边的变量SWAP （变量值交换语句）格式：SWAP 变量1，变量2功能：将变量1和变量2的值进行交换PRING （显示或输出语句）格式：PRING [表达式表][，|；]功能：将指定的数据显示在屏幕上LPRING （打印语句）格式：LPRINT [表达式表][，|；]功能：将指定的数据用打印机打印出来REM （注释语句）格式1：REM 注释内容格式2：" 注释内容功能：在程序中加以解释来说明该程序段的作用END （结束语句）格式：END功能：结束一个程序CLS （清屏语句）格式：CLS功能：清除屏幕上显示的信息PRING USING （自选显示格式语句）格式：PRING USING 〈“格式字符串”〉；〈表达式表〉 [；]功能：根据格式字符串规定的格式，将表达式表中的数据显示在屏幕上LPRINT USING （自选打印格式语句）格式：LPRINT USING 〈“格式字符串”〉；〈表达式表〉[；]功能：根据格式字符串规定的格式，将表达式表中的数据打印在打印机纸上STOP （暂停语句）格式：STOP功能：暂停程序的执行SLEEP （定时暂停语句）格式：SLEEP [数值表达式]功能：暂停执行程序，时间为数值表达式所指定的数值（以秒为单位）INPUT （键盘输入语句）格式：INPUT [；][“注释内容”][；|，]变量[，变量]功能：通过键盘给INPUT语句中的各个变量依次提供数据LINE INPUT （行输入语句）格式：LINE INPUT [；][“注释内容”；]字符串变量功能：将键盘上输入的字符串（最长为255个）赋给字符串变量READ/DATA（读数/置数语句）格式：READ 变量 [，变量]… … … DATA 常量 [，常量]…功能：READ语句将DATA语句中提供的数据依次赋给指定的变量RESTORE （恢复数据区语句）格式：RESTORE [行号|行标号]功能：从指定的DATA语句行中读入常量数值函数SIN （正弦函数）格式：SIN （X）功能：求X的正弦函数值COS （余弦函数）格式：COS（X）功能：求X的余弦函数值TAN （正切函数）格式：TAN（X）功能：求X的正切函数值ATN （反正切函数）格式：ATN（X）功能：求X的反正切函数值SQR （平方要函数）格式：SQR（X）功能：求X的算术平方根值，其中X必须大于或等于零EXP （指数函数）格式：EXP（X）功能：求以e为底的X次幂，e=2.718282LOG （对数函数）格式：LOG（X）功能：求以e为底的自然数值，即In x 的值SGN （符号函数）格式：SGN（X）功能：求自变量X的符号ABS （绝对值函数）格式：ABS（X）功能：求自变量X的绝对值，即|X|INT （取整函数）格式：INT（X）功能：取不大于X值的最大整数FIX （截取整数函数）格式：FIX（X）功能：把一个带有小数的数去掉小数部分，不进行舍入，直接截取整数部分。自变量X可以是任意数值表达式CINT （转为整数函数）格式：CINT（X）功能：把一个带有小数的数转换成整数，对小数部分四舍五入CLNG （转为长整数函数）格式：CLNG（X）功能：把自变量X转变为长整数CSNG （单精度函数）格式：CSNG（X）功能：把数值X转变为单精度数，其中自变量X是一个数值表达式，使用该函数它将被转换成单精度数CDBL （双精度函数）格式：CDBL（X）功能：把数值X转变为双精度数，自变量X可以是任意数值表达式RND （随机函数）格式：RND（X）功能：产生一个0与1之间的随机数TIMER （？函数）格式：TIMER功能：从午夜开始计算秒数ASCII （ASCII码函数）格式：ASC（X$）功能：返回字符串 X$ 第一个字符的ASCII代码VAL （字符串转数值函数）格式：VAL（X$）功能：将字符串 X$ 转换成数值LEN （测长函数）格式：LEN（X$）功能：测量字符串的长度，即字符串的字符个数INSTR （子字符串检索函数）格式：INSTR（[N，] X$，Y$）功能：返回字符串 Y$ 在字符串 X$ 中第一次出现的位置屏幕显示格式中常用的三个函数TAB （？函数）格式：TAB（X）功能：在指定位置X上显示或打印所需要的信息SPC （？函数）格式：SPC（X）功能：空X个空格SPACE$ （？函数）格式：SPACE$（N）功能：返回一个字符串，该字符串由N个空格组成输入函数INKEY$ （？函数）格式：INKEY$功能：从键盘上读一个字符INPUT$ （？函数）格式：INPUT$ （N[，[#] 文件号]）功能：返回从键盘或指定文件中读出的N个字符组成的字符串CSRLIN （光标行座标函数）格式：CSRLIN功能：返回当前光标行座标位置POS （光标列座标函数）格式：POS（N）功能：返回当前光标列座标位置UBOUND；LBOUND （测试下标上、下界函数）格式：UBOUND（数组[，维]） LBOUND（数组[，维]）功能：返回一个已定义数组中指定维的上、下界FRE （测试空字节函数）格式：FRE（X）功能：返回空闲内存节数GOTO格式：GOTO 行标识符功能：改变程序的执行顺序，无条件地转去执行GOTO后面所指的行标识符去执行ON/GOOT格式：ON 表达式 GOTO 行标识符表功能:先计算ON后面的表达式的值,再根据计算结果,将程序转移到GOTO所指行标识符表中的某个行标识符去执行关系运算= （等于）> （大于）>=（大于或等于）< （小于）<=（小于或等于）<>（不等于）AND（与）OR （或）NOT（非）表： A B | NOT A | NOT B | A AND B | A OR B 1 1 | 0 | 0 | 1 | 1 1 0 | 0 | 1 | 0 | 1 0 1 | 1 | 0 | 0 | 1 0 0 | 1 | 1 | 0 | 0逻辑运行顺序： NOT—AND—OR （）—算术—关系—逻辑IF （条件语句）单行 IF 条件语句格式：IF 条件 THEN 语句序列1 [ELSE 语句序列2]功能：首先计算条件的值，如果为真则执行THEN后的语句序列1，否则执行ELSE后面的语句序列2块结构 IF 条件语句格式：IF 条件1 THEN [语句块1] [ELSEIF 条件2 THEN [语句块2] …… [ELSE [语句块n]] END IFCASE （条件语句）格式： SELECT CASE 测试表达式 CASE 表达式表1 [语句块1] [CASE 表达式表2 [语句块2]] …… [CASE ELSE [语句块N]] END SELECT功能：根据表达式的值，从多个语句块中选择符合条件的一个语句块执行FOR/NEXT（循环语句）格式：FOR A=E1 TO E2 STEP E3 循环体 NEXT A说明: FOR 语句为循环说明语句,它说明了循环的次数FOR TO STEP 为语句定义符 A--循环控制变量,可以用任一简单变量表示 E1--循环控制变量的初值 E2--循环控制变量的终值 E3--循环控制变量的增值,也称步长 NEXT 语句为循环终端语句,它与FOR语句必须成对出现 NEXT语句中的循环控制变量必须与FOR语句中的一致 循环体由一条或多条语句构成,是被重复执行的部分WHILE/WEND (循环语句)格式: WHILE <条件> 循环体 WEND说明: WHILE是循环的起始语句又称说明语句,它的作用是给出循环条件 WEND是循环的终止语句. <条件>代表一个逻辑条件,它可以是一个关系表达式也可以是一个逻辑表达式,还可以是一个变量或常数DO/LOOP (循环语句)格式1: DO[(WHILE 或 UNTIL)条件] 循环体 [EXIT DO] LOOP格式2: DO 循环体 [EXIT DO] LOOP[(WHILE 或 UNTIL)条件]说明: 如果条件永远成DO-LOOP循环可能陷入"死循环"这时可用EXIT DO 来退出循环 DO循环可以嵌套,其规则与FOR-NEXT循环相同字符串函数CHR$ (字符函数)格式:CHR$ (N)功能:将ASCII码值N转换成它所表示的字符MID$ (取中间字符串函数)格式:MID$ (A$, N [,M])功能:从字符串A$中,第N个字符起,取出M个字符STRING$格式1:STRING$(N, X)功能: 产生N个ASCII码X所对应的字符.通常用在无法从键盘按输入的字符格式2:STRING$(N, X$)功能: 产生N个字符串X$中的第一个字符OCT$ (十进制转八进制函数)格式:OCT$ (X)功能:将十进制数值转换成八进制字符串STR$ (数值转换成字符串函数)格式:STR$ (X)功能:将数值数据转换成字符串数据LTRIM$ (删除字符串左边空格函数)格式:LTRIM$ (X$)功能:删除字符串X$左边的空格RTRIM$ (删除字符串右边空格函数)格式:RTRIM$ (X$)功能:删除字符串数据X$右边的空格LCASE$ (小写函数)格式:LCASE$ (A$)功能:将A$中所有大写字母改成小写UCASE$ (大写函数)格式:UCASE$(A$)功能:将A$中所有小写字母改成大写TRIM$ (两头截空函数)格式:TRIM$ (A$)功能:截去字符串A$的头尾所有空格LEFT$ (左取函数)格式:LEFT$(A$,N)功能:得到字符串A$最左边的N个字符RIGHT$ (右取函数)格式:RIGHT$(A$,N)功能:得到字符串A$最右边的N个字符HEX$(十进制数转换十六进制字符串)格式:HEX$(N)功能:将十进制数N转换成十六进制字符串MKI$ (把整数转换为字符串)IKL$ (把长整数转换为字符串)MKS$ (把单精度数转换为字符串)DATE$/TIME$ (取得系统的日期/时间)GOSUB/RETURN (调用子程序语句和返回语句)GOSUB (调用子程序)格式: GOSUB<标号1>功能:用于转移到子程序的入口语句去执行RETURN (子程序返回语句)格式:RETURN [<标号2>]功能:用于子程序执行完毕从子程序返回,作为子程序的结束语句DEF FN (用户自定义函数)格式1: DEF FN <函数名>[(参数表)]=<表达式>格式2: DEF FN <函数名>[(参数表)] 语句块 FN <函数名>=<表达式> END DEF功能: 定义一个用户自己的函数SUB (过程定义)格式: SUB 过程名[(参数表)][STATIC] 语句序列 END SUB功能: 定义一个SUB过程FUNCTION (过程定义)格式: FUNCTION 过程名[(参数表)][STATIC] 语句序列 过程名=表达式 END FUNCTION功能: 定义FUNCTION函数过程DECLARE (过程说明语句)格式: DECLARE [RUNCTION/SUB] 过程名[(参数表)]功能: 对被调用的过程进行说明,对传递的自变量进行检查DIM SHARED / COMMON SHARED (定义全局变量)格试: DIM SHARED 变量名表 / COMMON SHARED 变量名表功能: 将变量名表中的变量定义为全局变量STATIC (定义局部变量)格式: STATIC 变量表功能: 在DEF FN 函数、FUNCTION 或 SUB 过程中把变量定义为局部变量SHARED (共享变量)格式: SHARED 变量[AS类型][,变量[AS类型]…功能: 使主程序与某个过程共享变量DIM (数组定义)格式: DIM[SHARED] 变量 [(下标)][AS类型][,变量[(下标)][AS类型]]…功能:说明变量或数组并分配存储空间REDIM (改变分配给数组的空间)格式: REDIM[SHARED] 变量 (下标)[AS类型][,变量(下标[AS类型]……功能: 改变分配给动态数组的空间OPTION BASE (?)格式: OPTION BASE n功能: 指定数组下标的缺省下界OPEN (打开或建立文件)格式1: OPEN 文件说明[FOR 方式1] AS [#] 文件号 [LEN=记录长度]格式2: OPEN 方式2,[#] 文件号,文件说明[,记录长度]说明: 1.在格式1中,"方式1"指定文件的输入/输出有以下几种方式: OUTPUT 指定顺序输出方式 INPUT 指定顺序输入方式 APPEND 指定顺序添加方式 RANDOM 指定随机存取方式,也是缺省方式 2.格式2中的"方式2"指的是以下几种字符 O 指定顺序输出方式 I 指定顺序输入方式 R 指定随机读/写方式 A 指定顺序添加方式CLOSE (结束文件的读/写操作)格式:CLOSE [[#] 文件号 [, [#] 文件号 ]……]功能: 结束文件的读/写操作FREEFILE格式:FREEFILE功能:产生一个尚未使用的最小文件号LOC格式:LOC(N)功能: 返回文件号为N的指定文件的当前位置LOF格式:LOF(N)功能: 返回文件长度PRINT#格式:PRINT# 文件号,[USING 格式字符串;] 表达式[{,|;}]功能: 把数据写入顺序文件中WRITE#格式:WRITE# 文件号,表达式表功能: 把数据写入顺序文件中INPUT#格式:INPUT# 文件号,变量名功能:从顺序文件中读出数据,并把读出的数据赋给相应的程序变量LINE INPUT#格式: LINE INPUT# 文件号,字符串变量功能: 从顺序文件中读取一整行的数据,并赋给其后的字符串变量EOF格式: EOF(文件号)功能:检查文件是否已读完CLS格式:CLS[0|1|2]功能:清除部分或全部屏幕信息说明: CLS 0 清除整个屏幕,系统缺省值 CLS 1 如果利用VIEW语句设置过图形视见区,则清除该区,否则清除整个画面 CLS 2 清除文本视见区,但屏幕的最底行仍保持不变WIDTH格式: 1. WIDTH 宽度 2. WIDTH LPRINT 宽度功能: 语句格式1的功能是改变屏幕显示行的宽度,2的功能是改变打印机输出行的宽度SCREEN格式: SCREEN [模式][,颜色][,当前页][,可见页]功能: 设置屏幕显示方式PSET格式:PSET [STEP](X,Y)[,颜色号]功能:在指定的坐标位置上,以指定的颜色画一个点PRESET格式: PRESET [STEP](X,Y)[,颜色号]功能:在屏幕的指定位置(X,Y)上画一个点LINE格式: LINE[[STEP](X1,Y1)]-[STEP](X2,Y2)[,[颜色号],[,B[F]][,类型符]功能:在屏幕上画线段或矩形框CIRCLE格式: CIRCLE[STEP](X,Y)半径[,颜色][,起始角][,终止角][,纵横比]功能: 以(X,Y)为圆心,用给定的半径画圆 椭圆或圆弧DRAW格式: DRAW 字符串功能: 按语句中的字符串,逐步描绘出图形COLOR格式: 1. COLOR [前景色][,背景色][,边框色] 2. COLOR [背景色][,调色板]PAINT格式: PAINT [STEP](X,Y)[,颜色号][,边框色]功能:给一个封闭的图形,涂上指定的颜色和边框色VIEW格式: VIEW [[SCREEN](X1,Y1)-(X2,Y2)[,[颜色号][,边框色]]]功能:定义输出图形的屏幕尺寸VIEW PRINT格式: VIEW PRINT [顶行 TO 底行]功能: 在屏幕上定义一个文本输出区域WINDOW格式: WINDOW[[SCREEN](X1,Y1)-(X2,Y2)功能:定义当前视见区的逻辑尺寸GET格式: GET [STEP](X1,Y1)-[STEP](X2,Y2),数组名[(下标)]功能:把屏幕上指定区域的图形映象存放到"数组"中PUT格式: PUT[STEP](X,Y),数组名[(下标)][,显示方式]功能: 将GET语句所存入数组中的图形映象在屏幕所指定的区域重新显示出来BEEP格式: BEEP功能: 使电脑喇叭发出"嘟"的一声SOUND格式: SOUND 频率,音长功能: 使喇叭发出一定频率延时的声音PLAY格式: PLAY 命令字符串功能: 用给定字符串表示的音乐演奏

过时了，

/"kju: "beisik/