vb等級(jí)考試題目與評(píng)析22-資料下載頁(yè)
2024-09-04 10:05本頁(yè)面
【導(dǎo)讀】在名稱為Form1的窗體上畫(huà)一個(gè)命令按鈕，名稱為C1，標(biāo)題為“顯示”；再畫(huà)一個(gè)文本框，名稱為Text1。請(qǐng)編寫(xiě)適當(dāng)?shù)氖录^(guò)程，使得在運(yùn)行時(shí)，序中不得使用任何變量。名稱為C1，標(biāo)題為“復(fù)制”。新建一個(gè)名為Form1的窗體，點(diǎn)擊工具箱中的CommandButton控件圖標(biāo)，然后在窗體上拖拉出一個(gè)命令按鈕，通。按要求保存文件即完成本題。時(shí)，文本框允許接受和顯示多行文本；取值為False時(shí)，文本框中的文本限制在一行中。ScrollBars屬性用來(lái)在設(shè)計(jì)期間返回或設(shè)置文本框是有水平滾動(dòng)條還是有垂直滾動(dòng)條?？梢匀?、1、2、3四種。MultiLine屬性為True，ScrollBars屬性為3。改為正確的內(nèi)容，使其實(shí)現(xiàn)上述。功能，但不能修改程序中的其他部分，也不能修改控件的屬性。修改后的文件以原來(lái)的文件名存盤。鈕中心有一個(gè)圓點(diǎn)；取值為False時(shí)，單選按鈕是“關(guān)閉”的，按鈕是一個(gè)圓圈。控件數(shù)組是一組具有共同名稱和類型的控件。只能在最前面插入文字，不能修改原有文字。Open文件名[for存取方式][Access操作方式][鎖定]As[#]文件號(hào)[Len=記錄長(zhǎng)度]
【正文】 Lock Write 不允許其他進(jìn)程寫(xiě)該文件 Lock Read Write 不允許其他進(jìn)程讀寫(xiě)該文件 “文件號(hào)”是 1到 511之間的某個(gè)整數(shù)，對(duì)打開(kāi)文件的各種操作要靠文件號(hào)來(lái)與文件發(fā)生關(guān)系。 “記錄長(zhǎng)度”對(duì)于隨機(jī)方式打開(kāi)的文件，指記錄長(zhǎng)度；對(duì)于順序文 件，指緩沖字符數(shù)。 Input 語(yǔ)句 用來(lái)讀取順序文件的數(shù)據(jù)。語(yǔ)法為： Input 文件號(hào)，變量列表 Print 語(yǔ)句 用來(lái)把數(shù)據(jù)寫(xiě)入順序文件。語(yǔ)法為： Print 文件號(hào)， [[Spc(n)|Tab(n)] [表達(dá)式列表 ] [。|,]] Spc(n)函數(shù)用來(lái)在當(dāng)前的輸出位置加入 n個(gè)空白； Tab(n)函數(shù)用來(lái)設(shè)置在第 n個(gè)位置寫(xiě)入數(shù)據(jù)。 分號(hào)表示后續(xù)寫(xiě)入的數(shù)據(jù)將接著當(dāng)前的數(shù)據(jù)尾部寫(xiě)入；逗號(hào)表示在當(dāng)前寫(xiě)入的數(shù)據(jù)后換行。 Close語(yǔ)句 用來(lái)關(guān)閉一個(gè)被打開(kāi)的文件。語(yǔ)法為： Close 文件號(hào) 文本框的 MultiLine屬性 MultiLine屬性用來(lái)在設(shè)計(jì)期間設(shè)置文本框能否接受和顯示多行文本?？梢匀?True和 False兩種值，取值為 True 時(shí)，文本框允許接受和顯示多行文本；取值為 False時(shí)，文本框中的文本限制在一行中。 解題方法： 新建一個(gè)窗體，點(diǎn)擊工具箱中的 CommandButton控件圖標(biāo)，然后在窗體上拖拉出一個(gè)命令按鈕，通過(guò)屬性窗口設(shè)置其 Name屬性為“ C1”， Caption屬性為“存盤”。 點(diǎn)擊工具箱中的 TextBox控件圖標(biāo)，然后在窗體上拖拉出一個(gè)文本框 ,通過(guò)屬性窗口設(shè)置文本 框的 MultiLine屬性為 True。 打開(kāi)代碼窗口，輸入如下的代碼： Private Sub C1_Click() Open amp。 \ For Output As 2 Print 2, Close 2 End Sub Private Sub Form_Load() Open amp。 \ For Input As 1 Do While Not EOF(1) Input 1, mystring = + mystring Loop Close 1 = 計(jì)算機(jī)等級(jí)考試 + End Sub 按要求進(jìn)行操作并保存文件即完成本題。
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1