第四章-數(shù)據(jù)、表達(dá)式與簡單程序設(shè)計(jì)-資料下載頁
2025-08-09 15:38本頁面
【正文】 ()的值是多少？徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室注意 CInt(x)與 CLng(x)函數(shù)的運(yùn)算規(guī)則：四舍五入取整，但是若小數(shù)部分等于 ，結(jié)果為與 X最接近的偶數(shù)；如： Cint()=4 Cint()=4 Clng()=4 Clng()=4 CStr(x)與 Str(x)函數(shù)的區(qū)別： 若 x為正數(shù)， CStr(x)會(huì)刪去 X前面的表示正號(hào)的符號(hào)位；而 Str(x)函數(shù)不會(huì)刪除符號(hào)位。如： CStr(12) 結(jié)果為： ″12″ Str(12) 結(jié)果為： ″□12″徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室 格式化函數(shù) Format用格式輸出函數(shù) Format$可以使數(shù)值或日期按指定的格式輸出。一般格式為：Format$(數(shù)值表達(dá)式，格式字符串 )? 數(shù)值格式符：0: 顯示一數(shù)字，若此位置沒有數(shù)字則補(bǔ) 0 : 顯示一數(shù)字，若此位置沒有數(shù)字則不顯示, + $ ( ) :原樣打出 如： Print Format(, ) Print Format(, ,.) 當(dāng)格式字符串為常量時(shí)，必須放在雙引號(hào)中 。徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室 InputBox、 MsgBox函數(shù) InputBox函數(shù) MsgBox函數(shù)徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室 InputBox函數(shù) InputBox函數(shù)用來接受用戶通過鍵盤輸入的數(shù)據(jù)。 InputBox函數(shù)使用的形式： A = InputBox(Prompt[,title][,defsult][,x,y][,helpfile,context])Prompt：提示用的文字信息；title：對(duì)話框標(biāo)題（字符型），缺省時(shí)，為工程名；default：顯示在用戶編輯框中的缺省值，缺省時(shí)，返回空值；特別注意 ： InputBox函數(shù)返回的是一個(gè) 字符類型數(shù)據(jù)徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室程序示例Private Sub Cmd1_Click()Dim N As String N= InputBox(請(qǐng)輸入你的學(xué)號(hào)： , 程序示例 , 230001) If Left(N, 2) = 23 Then Print 你是工程系的學(xué)生！ Else Print 你不是工程系的學(xué)生！ End IfEnd Sub 徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室 MsgBox函數(shù)MsgBox函數(shù) 用于向用戶發(fā)布提示信息，并要求用戶作出必要的響應(yīng)。MsgBox函數(shù) 的形式是： MsgBox(Prompt[,button][,title][,helpfile,context]) 徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室MsgBox函數(shù)中各個(gè)參數(shù)的說明 Prompt：提示用的文字信息； button：這是一個(gè)由 4個(gè)數(shù)值常量組成的式子，形式為 c1+c2+c3+c4，用于決定信息框中按鈕的個(gè)數(shù)和類型以及出現(xiàn)在信息框中的圖標(biāo)類型，各個(gè)參量的可選值及其功能見表 410（凡有 0值的參量， 0值為缺省值）； title：信息框標(biāo)題（字符型），缺省時(shí)，為空白；徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室Dim Msg, Style, Title, Help, Ctxt, Response, MyString Msg = “Do you want to continue ?” ‘ 定義信息。Style = vbYesNo + vbCritical + vbDefaultButton2 ‘ 定義按鈕。Title = “MsgBox Demonstration” ‘ 定義標(biāo)題。 Help = “” ‘ 定義幫助文件。 Ctxt = 1000 ‘ 定義標(biāo)題 ’ 上下文。 ‘ 顯示信息。Response = MsgBox(Msg, Style, Title, Help, Ctxt) 徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室MsgBox函數(shù)的返回值按鈕名 內(nèi)置常量 取值OK（確定） vbOK 1Cancel（取消） vbCancel 2Abort（終止） vbAbort 3Retry（重試） vbRetry 4Ignore（忽略） vbIgnore 5Yes（是） vbYes 6No（否） vbNo 7徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室MsgBox函數(shù)的使用方法使用賦值語句 ：ans = MsgBox(“非法數(shù)據(jù)！ ”,48,”提示信息 ”) 使用 Print方法：Print MsgBox(“非法數(shù)據(jù)！ ”,48,”提示信息 ”)也可以把它等同為一個(gè)方法使用：MsgBox “非法數(shù)據(jù)！ ”,48,”提示信息 ”第二種方法先顯示信息框，點(diǎn)擊按鈕后再將返回值顯示在窗體上；第三種方法沒有返回值，只顯示信息框徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室例題 Private Sub Form_Click () msg1$ = 要繼續(xù)嗎 ? msg2$ = Operation Dialog Box r = MsgBox(msg1$, 34, msg2$) Print r End Sub徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室練習(xí)題 *5 Mod 28\8的值是（ ?。?。 A. 0 B. 1 C. 2 D. 3 *5= 28\8=3 mod 3=2小數(shù)在 mod運(yùn)算時(shí)， vb會(huì)先將前后的兩個(gè)數(shù)四舍五入取整（就是全部轉(zhuǎn)化成 long型），然后再取余數(shù)。 也就是說 a mod b=clng(a) mod clng(b)。計(jì)算步驟：徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室2．執(zhí)行下面語句后， Len函數(shù)值最大的是Dim IA As Integer, B As double, S As String *5, Ch As StringIA=32767 : B= : S=”A” :Ch=”abcd” A． Len(IA) B． Len(B) C． Len(S) D． Len(Ch) Len(string | varname)：獲取包含字符串內(nèi)字符的數(shù)目，或是存儲(chǔ)一變量所需的字節(jié)數(shù)。 徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室設(shè) a = 5， b = 10，則執(zhí)行 c = Int((b a) * Rnd + a) + 1 后， c值的范圍為 A） 5～ 10 B） 6～ 9 C） 6～ 10 D） 5～ 9 設(shè) a=5,b=4,c=3,d=2，下列表達(dá)式的值是 32*b Or a=c And bc Or cd A) 1 B) True C) False D) 2為了生成某個(gè)范圍內(nèi)的隨機(jī)整數(shù)，可使用以下公式：Int((upperbound lowerbound + 1) * Rnd + lowerbound) 徐州醫(yī)學(xué)院 VB教程公共教育學(xué)院 計(jì)算機(jī)教研室設(shè) a=”MicrosoftVisualBasic”, 則以下使變量 b的值為”VisualBasic”的語句是 A)b=Left(a,10) B)b=Mid(a,10) C)b=Right(a,10) D)b=Mid(a,11,10) Val(“”)的結(jié)果是多少？A) B)C) D) 1234670
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1