答案Word文档格式.docx

答案Word文档格式.docx

《答案Word文档格式.docx》由会员分享，可在线阅读，更多相关《答案Word文档格式.docx（23页珍藏版）》请在冰点文库上搜索。

窗体命名。

1776

KeyPreview=-1'

True

keyPreview属性值设置。

1777

文件"

1

“文件”菜单标题。

1778

打开"

"

登录"

菜单标题。

1779

保存"

1780

退出"

1781

格式"

菜单标题。

1782

字体"

1783

BeginVB.MenuMfile

“文件”菜单名称。

1784

BeginVB.MenuMopen

菜单名称。

1785

BeginVB.MenuMsave

1786

BeginVB.MenuMexit

1787

BeginVB.MenuMformat

1788

BeginVB.MenuMfont

1789

UnloadMe或UnloadFrmmain

4

菜单代码。

1790

module1.bas

5

创建moduleFile.bas模块文件。

1791

submain

3

创建submain过程。

1792

FrmMain.show

在submain过程中调用FrmMain窗体。

1793

Form1.frm

n=Len（a$）或n=Len（a）

计算字符串长度函数

1794

b$="

n"

判断是否字符n

1795

s=s+1

统计字符n的个数

1796

Prints

窗体上输出字符n的个数

1797

Form2.frm

OptionBase1

指定数组的默认下界为1

1798

List1.Clear

清除列表框List1里面的内容

1799

a（i）=Int（33*Rnd）或a（i）=Int（Rnd*33）

随机整数取值

1800

List1.AddItems

将随机数序列添加到列表框

1801

Form3.frm

File1.Pattern="

*.frm"

文件列表框的过滤条件

1802

Dir1.Path=Drive1.Drive

关联驱动器列表框和目录列表框

1803

ForInput

文件打开模式

1804

NotEOF

（1）

Do循环语句

1805

VB考试试卷2

1806

1807

1808

1809

1810

1811

1812

1813

1814

1815

1816

1817

1818

1819

1820

1821

1822

1823

1824

1825

1826

1827

1828

Arr=Array

数组整体赋值

1829

pos=pos+Arr（k）或pos=Arr（k）+pos

计算正数之和

1830

neg=neg+Arr（k）或neg=Arr（k）+neg

计算负数之和

1831

Picture1.Printpos,neg

在图片框中输出计算结果

1832

StaticnAsInteger

定义静态整型局部变量

1833

n=n+1

n的累加表达式

1834

UnloadMe或UnloadFrmLogin

关闭窗体命令

1835

Text2.SetFocus

文本框text2获得焦点

1836

ForInputAs#1

读文件

1837

DoWhileNotEOF

（1）

没有到文件结尾

1838

Print#1,Text1或Print#1,Text1.Text

写文件

1839

Close#1

关闭文件

1840

VB考试试卷3

1841

1842

1843

1844

1845

1846

1847

1848

1849

1850

1851

1852

1853

1854

1855

1856

1857

1858

1859

1860

1861

1862

1863

设置默认下界

1864

Fori=1To100

循环变量终值

1865

Forj=1To10

1866

b（i,j）=a（10*（i-1）+j）或b（i,j）=a（（i-1）*10+j）或b（i,j）=a（j+（i-1）*10）或b（i,j）=a（j+10*（i-1））

数组赋值

1867

Image1.Stretch=True

图像框的伸缩属性设置

1868

使Dir1与Drive1同步改变

1869

File1.Path=Dir1.Path

File1与Dir1同步改变

1870

LoadPicture（Fname）

加载图片文件函数

1871

DoWhileNotEOF（Number）

DoWhile循环

1872

Text1.Text=Text1.Text+s+Chr（13）+Chr（10）

显示文件内容

1873

Open"

test2.txt"

ForOutputAsNumber

打开文件

1874

Print#Number,Text1或Print#Number,Text1.Text

保存文件内容

1875

VB考试试卷4

1876

1877

1878

1879

1880

1881

1882

1883

1884

1885

1886

1887

1888

1889

1890

1891

1892

1893

1894

1895

1896

1897

1898

fx=a

fx函数返回值

1899

fx（ByValaAsInteger）

按值传递

1900

fy（ByRefaAsInteger）或fy（aAsInteger）

按地址传递

1901

fy=a

fy函数返回值

1902

ConstN=7

符号常量定义

1903

Ifa（j）>

a（j+1）Then

If语句

1904

a（j）=a（j+1）

交换语句

1905

ForEachxIna

ForEach语句

1906

ForOutputAs#1或ForAppendAs#1

写方式打开文件

1907

IfKeyAscii=13Then

回车键ASC码

1908

IfUCase（Text1.Text）="

END"

Then

If语句后的结束条件

1909

保存文件

1910

VB考试试卷5

1911

1912

1913

1914

1915

1916

1917

1918

1919

1920

1921

1922

1923

1924

1925

1926

1927

BeginVB.MenuMf