<span id="1jbx9"></span>
<strike id="1jbx9"><dl id="1jbx9"></dl></strike>
<strike id="1jbx9"></strike>
<strike id="1jbx9"></strike>
<span id="1jbx9"></span>
<ruby id="1jbx9"></ruby><strike id="1jbx9"><i id="1jbx9"></i></strike>
<ruby id="1jbx9"></ruby>
<strike id="1jbx9"><dl id="1jbx9"><cite id="1jbx9"></cite></dl></strike><span id="1jbx9"></span><strike id="1jbx9"><i id="1jbx9"></i></strike>
問答題庫

當前位置: 計算機等級考試題庫 > BASIC題庫

問題描述:

[單項選擇題] 執行下列程序后,變量a的值為( )。 Dim i As Integer Dim a As Integer a=0 For i=1 To 100 Step 2   a=a+1 Next i


A.1
B.10
C.50
D.100

窗體上有一個名稱為CD1的通用對話框,一個名稱為Command1的命令按鈕,相應的事件過程如下: Private Sub Command1_Cick() CD1. Fiher = "All File | *. * | Text File | *. txt | Word | *. Doc" CD1. FilterIndex = 2 CD1. FileName = "E: Test. ppt" CD1. InitDir = "E: " CD1. ShowOpen End Sub 關于上述程序,以下敘述中正確的是( )。 在窗體上畫兩個文本框,其名稱分別為Text1和Text2,然后編寫如下事件過程:Private Sub Form_Load()ShowText1.Text=""Text2.Text=""Text2.SetFocusEnd SubPrivate Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer)Text1.Text=Text1.Text+Chr(KeyCode-4)End Sub 程序運行后,如果在Text2文本框中輸入“efghi”,則Text1文本框中的內容為 【11】 。 在窗體上畫一個通用對話框,其名稱為CommonDialogl,然后畫一個命令按鈕,并編寫如下事件過程: Private Sub Command1_Click()CommonDialogl.Flags=cdlOFNHideReadOnlycommonDialogl.Filter="All Files(*.*)|*.*| Text Files"&_ "(*.txt)|*.txt|Batch Files(*.bat)|*.bat"CommonDialogl.Filterlndex=1CommonDialogl.ShowOpenMsgBox CommonDialogl.FileName End Sub 程序運行后,單擊命令按鈕,將顯示一個“打開”對話框,此時在“文件類型”框中顯示的是 ______。 面向對象的程序設計主要的優點包括與人類習慣思維方法一致、穩定性好、可重用性好、 【2】 和可維護性好等5個方面。 以下程序代碼使用二維數組A表示矩陣,實現單擊命令按鈕Command1時使矩陣的兩條對角線上的元素值全為1,其余元素值全為0,請補充完該程序。 Private Sub Command1_click()Dim A(4,4)For I=1 To 4 For J= 1 To 4 【12】 =1 Next I 【13】 【14】 Next J For i=1 To 4 For j=1 To 4 Print A(i,j): Next j Print Next I End Sub

點評難度:

      

您覺得難度如何呢?請反饋給我們,謝謝!

參考答案:

C

試題分享:

相關考題

窗體上有一個名稱為CD1的通用對話框,一個名稱為Command1的命令按鈕,相應的事件過程如下: Private Sub Command1_Cick() CD1. Fiher = "All File | *. * | Text File | *. txt | Word | *. Doc" CD1. FilterIndex = 2 CD1. FileName = "E: Test. ppt" CD1. InitDir = "E: " CD1. ShowOpen End Sub 關于上述程序,以下敘述中正確的是( )。
在窗體上畫兩個文本框,其名稱分別為Text1和Text2,然后編寫如下事件過程:Private Sub Form_Load()ShowText1.Text=""Text2.Text=""Text2.SetFocusEnd SubPrivate Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer)Text1.Text=Text1.Text+Chr(KeyCode-4)End Sub 程序運行后,如果在Text2文本框中輸入“efghi”,則Text1文本框中的內容為 【11】 。
在窗體上畫一個通用對話框,其名稱為CommonDialogl,然后畫一個命令按鈕,并編寫如下事件過程: Private Sub Command1_Click()CommonDialogl.Flags=cdlOFNHideReadOnlycommonDialogl.Filter="All Files(*.*)|*.*| Text Files"&_ "(*.txt)|*.txt|Batch Files(*.bat)|*.bat"CommonDialogl.Filterlndex=1CommonDialogl.ShowOpenMsgBox CommonDialogl.FileName End Sub 程序運行后,單擊命令按鈕,將顯示一個“打開”對話框,此時在“文件類型”框中顯示的是 ______。
面向對象的程序設計主要的優點包括與人類習慣思維方法一致、穩定性好、可重用性好、 【2】 和可維護性好等5個方面。
以下程序代碼使用二維數組A表示矩陣,實現單擊命令按鈕Command1時使矩陣的兩條對角線上的元素值全為1,其余元素值全為0,請補充完該程序。 Private Sub Command1_click()Dim A(4,4)For I=1 To 4 For J= 1 To 4 【12】 =1 Next I 【13】 【14】 Next J For i=1 To 4 For j=1 To 4 Print A(i,j): Next j Print Next I End Sub
国产精品国产三级国产专区,大屁股大乳丰满人妻,中文字幕 日韩 无码 在线,日本不卡高清免费中文AV