magbox

2026-04-18 生活百科

vb中#是什么意思實際上是一種類型聲明的簡寫形式,#表示雙精度值
比如: 5#,說明5是一個雙精度值
而 j#,相當于
Dim J as Double后,對J的引用

vb中exit for什么意思？dim i as integer
for i=0 to 5
if i=3 then exit for
next
當i循環到3的時候就不在繼續循環了，
i=4,5都不執行了

VB的magbox什么意思？MSGBOX是消息提示框，用來在執行程序過程中提示消息

vb中48+vbokonly是什么意思是Msgbox里面的兩個參數， VbExclamation對應的值就是48，表示Msgbox顯示的圖標是“警告消息” ， Vbokonly是只顯示確定按鈕

Msgbox中按鈕Button參數的其他常見常量：
常量值說明

vbOKOnly0只顯示“確定”按鈕
VbOKCancel1顯示“確定”和“取消”按鈕
VbAbortRetryIgnore2顯示“終止”、“重試”和“忽略” 按鈕
VbYesNoCancel3顯示“是”、“否”和“取消”按鈕
VbYesNo4顯示“是”和“否”按鈕
VbRetryCancel5顯示“重試”和“取消”按鈕
VbCritical16顯示“關鍵信息”圖標
VbQuestion32顯示“警告詢問”圖標
VbExclamation48顯示“警告消息”圖標
VbInformation64顯示“通知消息”圖標

object 在VB里什么意思啊object 可以代表VB中的任何一個對象。在某些情況下你在代碼中要對一些并不是事先就能夠確定類型的對象進行操作就可以用object對象。例如，要遍歷一個窗體上的所有控件，并顯示出這些控件的名稱就要用到object對象了，因為窗體上的控件各種各樣，是不定的。例子代碼如下
dim objCtrl as object
for each objctrl in me.controls
msgbox objctrl.name
next

直接書寫沒有在VB IDE中調試，也許個別單詞有誤。自己試試就明白了。

inputbox函數到底怎么用?。?/h3>

文章插圖

1、InputBox函數作用顯示一個輸入框，并提示用戶在文本框中輸入文本、數字或選中某個單元格區域，當按下確定按鈕后返回包含文本框內容的字符串。2、InputBox函數語法InputBox(Prompt[,Title][,Default][,Xpos][,Ypos][,Helpfile,Context])參數說明：(1) Prompt ，必需的參數，作為輸入框中提示信息出現的字符串，其最大長度約為1024個字符，由所使用字符的寬度決定。如果Prompt包含多個行，則可在各行之間用回車符(Chr(13))、換行符(Chr(10))或回車換行符的組合(Chr(13)&Chr(10))來分隔。(2) Title ，可選的參數，作為輸入框標題欄中的字符串。若省略該參數，則在標題欄中顯示應用程序名稱。(3) Default，可選的參數，作為輸入框中默認的字符串，在沒有其它輸入時作為缺省值。若省略該參數，則文本框為空。(4) Xpos，可選的參數，為數值，成對出現，指定輸入框的左邊與屏幕左邊的水平距離。若省略該參數，則輸入框在水平方向居中。(5) Ypos ，可選的參數，為數值，成對出現，指定輸入框的上邊與屏幕上邊的距離。若省略該參數，則輸入框在屏幕垂直方向距下邊約三分之一的位置。(6) Helpfile，可選的參數，為字符串，表示幫助文件，用該文件為輸入框提供上下文相關的幫助。若有Helpfile，則必須有Context 。(7) Context，可選的參數，為數值，幫助文件中某幫助主題的上下文編號。若有Context，則必須有Helpfile 。解析：用InputBox函數輸入2個數據之后，把他們連接起來，用MsgBox函數顯示出來。擴展資料函數說明如果同時提供了Helpfile與Context，用戶可以按F1來查看與Context相應的幫助主題。某些主應用程序（支持使用Visual Basic for Applications的應用程序）。例如Microsoft Excel ，會在對話框中自動添加一個幫助按鈕。如果用戶單擊確定或按下回車，則InputBox函數返回文本框中的內容。如果用戶單擊取消，則此函數返回一個長度為零的字符串（""）。在VB中，如果沒有同時提供XPos和YPos ，不會提示語法錯誤，但單獨出現的XPos或YPos將被忽略，相當于省略了這兩個參數。但在VBS中，單獨出現的XPos或YPos會生效，但另一個沒有確定的參數將使用默認值。參考資料來源：百度百科—inputbox
inputBox函數和MsgBox函數MSGBOX主要功能是“提示”，用戶根據提示，點擊鼠標，程序接收這個用戶的選擇即INTEGER值（例如：VBYES,VBNO等等），程序根據用戶的選擇決定執行什么功能。而INPUTBOX主要功能是“接收”，接收一個STRING變量，當然可以給INPUTBOX指定一個默認值。另外，用戶點擊“取消”返回一個空值。程序對用戶輸入的值進行處理，INPUTBOX返回的結果是程序下一步運行的參數。切記：二者不可混為一談。
InputBox函數和MsgBox函數的語法格式及參數作用VBscript InputBox函數是接收用戶輸入信息的http://baike.baidu.com/view/1177973.htmMsgBox函數http://baike.baidu.com/view/563674.htm

vb6.0中Inputbox$函數和Input$函數區別是？還有使用區別是？【magbox】InputBox Function：
Displays a prompt in a dialog box, waits for the user to input text or click a button, and returns a String containing the contents of the text box.
用于彈出一個輸入框讓用戶輸入數據。
Input Function：
Returns String containing characters from a file opened in Input or Binary mode.
用于從文件中讀取數據。

使用區別是前者通常這樣用：st = InputBox("請輸入數據！")’取返回值
后者通常這樣用：Input #11, st’填充變量

Msgbox函數和InputBox函數之間有什么區別？各自獲得什么值？InputBox 函數在一對話框來中顯示提示，等待用戶輸入正文或按下按鈕，并返回包含文本框內容的 String 。語法 InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])InputBox 函數的語法具有以下幾個命名參數：部分描述Prompt 必需的。作為對話框消息出現的字符串表達式。prompt 的最大長度大約是 1024 個字符，由所用字符的寬度決定。如果 prompt 包含多個行，則可在各行之間用回車符 (Chr(13))、換行符 (Chr(10)) 或回車換行符的組合 (Chr(13) & Chr(10)) 來分隔。Title 可選的。顯示對話框標題欄中的字符串表達式。如果省略 title，則把應用程序名放入標題欄中。Default 可選的。顯示文本框中的字符串表達式，在沒有其它輸入時作為缺省值。如果省略 default，則文本框為空。Xpos 可選的。數值表達式，成對出現，指定對話框的左邊與屏幕左邊的水平距離。如果省略 xpos，則對話框會在水平方向居中。Ypos 可選的。數值表達式，成對出現，指定對話框的上邊與屏幕上邊的距離。如果省略 ypos，則對話框被放置在屏幕垂直方向距下邊大約三分之一的位置。Helpfile 可選的。字符串表達式，識別幫助文件，用該文件為對話框提供上下文相關的幫助。如果已提供 helpfile，則也必須提供 context 。Context 可選的。數值表達式，由幫助文件的作者指定給某個幫助主題的幫助上下文編號。如果已提供 context ，則也必須要提供 helpfile 。說明如果同時提供了 helpfile 與 context ，用戶可以按 F1 來查看與 context 相應的幫助主題。某些主應用程序，例如，Microsoft Excel，會在對話框中自動添加一個 Help 按鈕。如果用戶單擊 OK 或按下ENTER ，則 InputBox 函數返回文本框中的內容。如果用戶單擊 Cancel，則此函數返回一個長度為零的字符串 ("") 。注意如果還要指定第一個命名參數以外的參數，則必須在表達式中使用 InputBox 。如果要省略某些位置參數，則必須加入相應的逗號分界符。InputBox 函數示例本示例說明使用 InputBox 函數來顯示用戶輸入數據的不同用法。如果省略 x 及 y 坐標值，則會自動將對話框放置在兩個坐標的正中。如果用戶單擊“確定”按鈕或按下“ENTER”按鍵，則變量 MyValue 保存用戶輸入的數據。如果用戶單擊“取消”按鈕，則返回一零長度字符串。Dim Message, Title, Default, MyValueMessage = "Enter a value between 1 and 3" ' 設置提示信息。Title = "InputBox Demo" ' 設置標題。Default = "1" ' 設置缺省值。' 顯示信息、標題及缺省值。MyValue = https://www.zaoxu.com/jjsh/bkdq/InputBox(Message, Title, Default)' 使用幫助文件及上下文 ?！皫椭卑粹o便會自動出現。MyValue = InputBox(Message, Title, , , , "DEMO.HLP", 10)'在 100, 100 的位置顯示對話框。MyValue = InputBox(Message, Title, Default, 100, 100)

編程語言中的函數是干什么用的？函數式編程語言有很多種定義，寬泛的認為支持高階函數（higher-order function）就算函數式語言的話，大多數現代語言都是支持函數式編程的，例如C/C++，java，C#，lua，python，JavaScript，Scala等等。收緊一下定義的話，加入函數式語言要求的模式匹配、無副作用等要求，那么剩下的就是純函數式語言，比較常見的有Haskell，Clean等。

哪些編程語言是函數式的c語言、c++、java、C#、lisp等語言是函數式的編程語言。

在學習編程語言中，搞明白函數這個概念都這么困難，學會有什么用它只能在編程中用到，函數你這樣理解：其實就是子程序，被主程序所調用的。它使程序更直觀，更方便編寫。

比如:
主函數
｛
調用函數abc；
｝

函數abc
｛
....一些代碼....
返回主函數
｝

C語言是函數式編程語言嗎函數式編程是種編程范式，它將電腦運算視為函數的計算。函數編程語言最重要的基礎是 λ 演算（lambda calculus）。而且λ演算的函數可以接受函數當作輸入（參數）和輸出（返回值）。和指令式編程相比，函數式編程強調函數的計算比指令的執行重要。和過程化編程相比，函數式編程里，函數的計算可隨時調用。
所以說JavaScript算是函數式編程語言。

函數式編程語言會不會淘汰目前編程語言函數式編程語言不會淘汰目前編程語言
計算機編程語言是在不斷地更新過程，而更新的過程都是對現有編程語言的基礎上不斷進行完善。目前編程語言是完善編程語言的基礎，所以不會淘汰，只是會根據專業性質的需要細分編程語言。

vb什么意思Visual Basic是一種由公司開發的結構化的、模塊化的、面向對象的、包含協助開發環境的事件驅動為機制的可視化程序設計語言。從任何標準來說，VB都是世界上使用人數最多的語言——不管是盛贊VB的開發者還是抱怨VB的開發者的數量。它源自于BASIC編程語言。VB擁有圖形用戶界面（GUI）和快速應用程序開發（RAD）系統，可以輕易的使用DAO、RDO、ADO連接數據庫，或者輕松的創建ActiveX控件。程序員可以輕松的使用VB提供的組件快速建立一個應用程序。

VB中 +str(s),0 是什么意思？在字符跟字符之間進行連接，比如你要吧字符a ，和字符b，兩個通過編程，來寫成ab，那么表達式就應該是“a”+“b”或者“a”&“b” 。
0是MSGBOX里面的參數，也就是說當運行到MSGBOX時，出現一個對話框，里面就只有一個OK按鈕， 1的時候是OK 及 Cancel 按鈕，以此類推，你可以試試看。

“WQ VB”是什么意思？在五筆輸入法里面，“WQ VB”是“你好”的意思 ?！皐q vb us ep r”是什么意思？在五筆輸入法里面是“你好親愛的”
vb中的Str(s)什么意思str(x)是一個將數值型量轉換為相應字符串的函數。

例：str(-8.987)="-8.987"
str(5.56)=" 5.56"
len(str(5.56))=5

注意正數前面帶著空格轉為字符串。

VB:msgboxMsgBox是函數，而函數都是有返回值的。當你想利用MsgBox的返回值來進行下一步的操作時，就要使用返回值調用，如：
a = MsgBox("要繼續嗎？", vbYesNo)'對話框會出現“是”和“否”兩個按鈕
If a = vbYes Then'如果點了“是”
'繼續
Else'如果點了“否”
'退出
End If

如果你用MsgBox的目的只是為了顯示一條提示信息，不需要用它的返回值來進行分支選擇，則可以用不使用返回值調用的方式，如：
MsgBox "你好，歡迎光臨！"'這時候對話框只有一個“確定”按鈕，點了它對話框就關閉了

關于msgbox語句的問題該題目的答案為：C，第一個參數必選。

VB中關于msgbox的代碼s=MsgBox("確定要刪除用戶帳號嗎？", vbYesNo + 32 + vbDefaultButton2) = vbYes

這樣就可以了，然后判斷S是否為true

vbYesNo，就是啟動一個yes和一個no按鈕
vbDefaultButton2，就是默認選中第二個按鈕，這里表示NO按鈕
32不知道是啥= =
= vbYes就是“是否選擇YES鍵”
s=MsgBox("確定要刪除用戶帳號嗎？", vbYesNo + 32 + vbDefaultButton2) = vbYes
結果是點了確定鍵S=true，否則就是false

PS.大部分是猜的，不過這樣解釋對于自我摸索的我來說，已經盡力了
最好去翻書看看MSGBOX的參數設置，會有詳解的

關于Msgbox函數的問題DIM XX AS INTEGERXX=msgbox( "你明白了嗎",vbyesno,"提示")IF XX=6 THENform1.HIDEform2.SHOWEND IF

以下關于MsgBox的敘述中，錯誤的是錯誤的是：D
還可以設置圖標

VBA中關于MsgBox的問題：Private Sub Command1_Click()
Dim i As Integer
i = Int(Val(MsgBox("只顯示OK按鈕", vbOKOnly)))
MsgBox i
End Sub
試試呢

pocomaker.電子雜志能在網上發布么就是能在線閱讀么名編輯效果：以下POCO效果你所給的網址是電子雜志制作軟件名編輯電子雜志大師做出來的案例。光看效果看完上面的圖片你覺得有可比性嗎。。你想用POCO跟它比，這根本沒法比啊，名編輯就是一個企業級的，專業做電子雜志、電子書刊書籍的軟件；而POCO就是業余主要弄相冊的東東。POCO你只能直接發布到它的官網去，可以在網頁閱讀。但是你如果說要像名編輯那樣的看起來專業的像樣的，既要精致精美又要可以電腦在線看本地看，又能手機平板在線看又能發布到微信的話，POCO沒法做到。
有誰知道mac有沒有類似于POCOmaker制作電子雜志的軟件iebook最實用！

我想用pocomaker做電子雜志，哪里有模版下載？貌似POCO確實很少的模版，至少我目前是找不到的。因為我都是用PS處理好照片后，才弄上去的，只能很簡單的做下效果~

我用pocomaker做電子雜志做了一半，想換臺電腦做，為什么前面做的圖片都不見了？怎么辦？可能pocomaker是置入的鏈接圖片，你看看原來的圖片位置放在你電腦的什么地方，然后把文件考到另一臺電腦上的相同位置。比如你的圖片都在D盤的photo文件夾下，你就把photo文件夾拷貝到另外一臺電腦的O盤里，存放位置一定要一致。文件夾名稱也不能更改。
一般你做雜志的時候，把你的所有文件都放到一個文件夾，如果想在另一臺電腦繼續編輯做的話就把整個文件夾都考過去就好了。
祝順利。

pocomaker制作的電子雜志轉換成可播放的視頻用超級轉霸Total Video Converter試試. 。

vb作業，幫做下問題 11 分保存
下面書寫消息框的命令哪個是錯誤的？
a = MsgBox("注意：你有新到的郵件。","vbInformation ", "消息")

問題 21 分保存
語句Print "aa" & "bb";-5*6;Not 2＜=3的結果是
aabb-30 false

問題 31 分保存
在表達式 y = msgbox ( a, , c ) 中， c 為輸入函數對話框的( )
標題

問題 41 分保存
在表達式 y = msgbox ( a, , c ) 中， a 為輸入函數對話框的( )
消息

問題 51 分保存
msgbox函數返回值的類型為( )
數值

問題 61 分保存
語句pritn format(123.236,"-000.000")的輸出結果是（）
-123.236

問題 71 分保存
在窗體上畫一個命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click()
Dim a as Integer, b As Integer
a = InputBox("Enter the First integer")
b = InputBox("Enter the Second integer")
Print b + a
end sub
程序運行后，單擊命令按鈕，先后在兩個輸入對話框中分別輸入456和123 ，則輸出結果是（）
579

問題 81 分保存
在表達式 y = InputBox ( a, b, c ) 中，b 為輸入函數對話框的( )
標題

問題 91 分保存
執行下面的語句后，所產生的信息框的標題是（）
a=MsgBox("AAAA" ，，"BBBB"，""，5)
BBBB

問題 101 分保存
執行語句print format(1234.567,"####0.00")后，輸出結果是( )
1234.57

執行語句x=inputbox(“您好”,1,“2013”)所產生的對話框標題是個人深度覆蓋

哪位好心的VB編程高手，幫助看看這些題，本人從未接觸過VB，所以這些題都不會做，謝謝。一、單選題（共40分，每題2分）
1、（ A）是對象的性質或是描述對象的數據。
A、屬性B、方法C、事件D、事件過程
2、改變控件在窗體中的左右位置應修改該控件的（B ）屬性。
A、top B、leftC、widthD、ritht
3、窗體文件的擴展名為(D) 。
A、.frxB、.basC、.vbpD、.frm
4、在VB中打開屬性窗口的快捷鍵是（C ）。
A、F2B、F5C、F4D、F8
5、語句“form1.print spc(10)”的作用是在當前窗體中輸出（A ）。
A、10個空格B、第10列輸出C、第11列輸出D、9個空格
6、當文本框的（ D）屬性設置為true時，文本可以自動換行。
A、enableB、lockedC、visibleD、multiline
7、下列關于“select case ”的敘述中，錯誤的是（ D）
A、case 10 to 100 表示判斷is是介于10到100之間
B、case“abc” ，“ABC”表示IS是否和“abc”,“ABC”兩個字符中的一個相同
C、case “X”表示IS是否為大寫字母“X”
D、case-7，0，100表示IS是否等于字符串“-7，0，100”
8、在窗體上有一個Text1的文本框和一個名為command1 的命令按鈕，然后編寫事件過程，程序運行后，單擊命令按鍵，文本框消失。以下能實現上述操作的事件過程是（ C）
A、prinvate sub text1_change()B、prinvate sub command1_click()
Command1.enabled=trueenabled=true
End subend sub
C、prinvate sub command1_clickD、prinvate sub command1_click()
Text1.visible=click()command1.enabled=true
End subend sub
9、設a=2,b=3,c=4,d=5，表達式3>2*b or a=c and bc or c>d的值是（C ）
A、1B、trueC、falseD、2
10、設a$=”microsoftvisualbasic”，則使變量b的值為“basic”的語句是(B)
A、b$=left (a , 10)B、b$=mid (a,16,5)C、b$=right (a，10)D、b$=mid(a,10,11)
11、標簽控件的標題由（C）屬性來決定。
A、wordwrapB、autosizeC、captionD、style
12、將命令按鈕設置為窗體的默認按鈕，可修改控件的（B ）屬性。
A、enableB、valueC、defaultD、cancel
13、下列（ A）屬性是用來改變文本框的內容的。
A、textB、captionC、leftD、name
14、設計訪問鍵時，應在caption 屬性中的字母前輸入（ C）符號。
A、@B、$C、&D、*
15、以下能在窗體form1的標題欄中顯示“第一個窗體”的語句是（ C）
A、form1.name=“第一個窗體”B、form1.title=“第一個窗體”
C、form1.caption=“第一個窗體”D、form1.text=“第一個窗體”
16、執行下面的語句后，所產生的信息框的標題是（ D）
a=inputbox(“請輸入一個正整數”，“1”，“示例”)
A、請輸入一個正整數B、1
C、示例D、出錯，不能產生信息框
17、int (100*rnd+10)產生的隨機整數的區間是（ D）
A、[1，100]B、[1，99]C、[10，100]D、[10 ， 109]
18、將窗體加載到內存的事件是（ C）
A、hideB、unloadC、loadD、show
19、如果X的值小于或等于Y的平方，則打印“OK”，表達這個功能的IF語句是（A ）
A、IFx<=y^2then print “OK”B、ifx≤Y*Ythenprint “OK”
C、IFx<=y2then “OK”D、ifx<Y*Ythen“OK”
20、在VB中，要使標簽的標題欄居中，應將alignment的值設為(A)
A、2B、0C、1D、3

求vb編程習題，txt格式的最好，VB編程習題
班級姓名學號
一、填空題
1、下列哪些可以作為變量?
12fdx13r2a223a2

2、下列哪些可以作為常量？并說明是數值型還是字符型、邏輯型、日期型？
“asdf” asdf"1234"1234#2008/11/10#truefalsea3

3、把下列數學式子寫成VB表達式

4、計算下列VB表達式的值(要求寫出步驟)
5*3*6\2
8/4*2.5/1.25*(3.7+2.5)
18\4*4.0^2/1.6
25\3 Mod 3*2
26\3 Mod 0.4*Sqr(25)
8/4*5/2.5*(3.25+6.75)
3*7\2
14/5*2
15\5*2
27^1/3
27^(1/3)
sqr(100)\4*2
5、按下列要求寫出賦值語句
(1)把數值234賦給變量a
(2)把字符串abc賦給變量z1
(3)把表達式2sin15°的值賦給變量ss
(4)把標簽Lblts的內容改為姓名
(5)把框架Frm1的背景色改為黑色(#000000)
6、寫出下列函數的值
Int(-3.14159)
Sqr(sqr(16))
7、產生a-b范圍內(包括b)整數的公式：_______________________
8、寫出輸入輸出語句
輸入對話框：要求使用圖標，標題為：”輸入對話框” ，對話框中的內容是”請輸入你的姓名”
___________________________________
輸出對話框：要求使用圖標，標題為：”輸出對話框” ，對話框中的內容是”你輸錯了”
___________________________________
二、選擇題
1、 Visual Basic集成開發環境中不包括下列哪些窗口？（D）
A. 工具箱窗口B. 工程資源管理器窗口
C. 屬性窗口D. 命令窗口
2、 “一輛小客車在正常行進過程中被一輛大型貨車撞壞了”，在這句話中， “客車”，“小” ， “行進”和“被一輛大型貨車撞壞了”分別對象Visual Basic中的哪些術語？（B）
A. 對象、屬性、事件、方法B. 對象、屬性、方法、事件
C. 屬性、對象、事件、方法D. 屬性、對象、方法、事件
3、對象的特征和狀態特征稱為？（C）
A. 事件B. 方法C. 屬性D. 類
4、下面哪一個屬性用來標識對象的名稱？（D）
A. CaptionB. ValueC. TextD. Name
5、下列哪個符號是合法的變量名?（A）
A. VB123B. AbsC. 99JiD. x\y
6、數學式子10sin25o寫成Visual Basic表達式是？（D）
A. 10sin25B. 10*sin(25)C. 10*sin(25o)D. 10*sin(25*3.14/180)
7、Visual Basic中不存在下列哪一種數據類型？（D）
A. 字符串類型B. 日期類型C. 邏輯類型D. 指針類型
8、表達式Left(“Visual”,3)+Lcase(“AB”)的值是？（C）
A. visABB. VisABC. VisabD. ualab
9、表達式6+10 Mod 4*2+1的值是？（B）
A. 9B. 11C. 1D. 3
10、把數值型轉換為字符串型需要使用下列哪一種函數? （B）
A. Val()B. Str()C. Asc()D. Chr()
11、VB中窗體文件的擴展名是______ 。
(A)VBP(B)FRM(對)(C)VBW(D)PDM
12、在設計應用程序時，通過______窗口可以查看到應用程序工程中的所有組成部分。
(A)代碼窗口(B)窗體設計窗口(C)屬性窗口(D)工程資源管理器窗口(對)
13、在VisualBasic中，所有的窗體和控件都必定具有的一個屬性是______ 。
(A)Name(對)(B)Font(C)Caption(D)FillColor
14、對變量名說法不正確的是______ 。
(A)必須是字母開頭，不能是數字或其他字符
(B)不能是VB的保留字
(C)可以包含字母、數字、下劃線和標點符號(對)
(D)不能超過255個字符
15、以下變量名中，______是不符合VisualBasic的命名規范的。
(A)Abc901(B)_mnu_Open_234(對)(C)price_(D)K
16、在窗體上畫一個命令按鈕（名稱為Command1），然后編寫如下事件過程：
PrivateSubCommand1_Click()
DimbAsInteger
b=b+1
EndSub
運行程序，三次單擊命令按鈕后，變量b的值是：______ 。
(A)0(B)1(對)(C)2(D)3
17、下列程序段的執行結果為______ 。
X=5:Y=-20
IfNotX> 0The
X=Y-3
Else
Y=X+3
Endif
PrintX-Y;Y-X
(A)-33(對)(B)5-8(C)3-3(D)25-25
18、當x為偶數時，則在窗體上顯示“偶數”，否則顯示“奇數”，不能實現該代碼段功能的是
(A)ifx\2=x/2thenprint"偶數"elseprint"奇數"
(B)ifxmod2=0thenprint"偶數"elseprint"奇數"
(C)ifnotxmod20thenprint"偶數"elseprint"奇數"
(D)ifx\2=int(x/2)thenprint"偶數"elseprint"奇數"(對)
19、若要執行下列程序段后窗體上顯示”紅”字，則x可取的值為：
selectcaseint(x/10)
case2,4,6,8
print"黃"
case1,3,5,7,9
print"綠"
caseelse
print"紅"
endselect
(A)27(B)38(C)10(D)5(對)
20、在程序代碼中將圖片文件mypic.jpg裝入圖片框Picture1的語句是______ 。
(A)Picture1.Picture="mypic.jpg"
(B)Picture1.Image="mypic.jpg"
(C)Picture1.Picture=LoadPicture("mypic.jpg")(對)
(D)LoadPicture("mypic.jpg")
21、大部分控件都沒有的屬性是______ 。
(A)Top(B)Name(C)Enabled(D)Interval(對)
22、下列屬于正確的字符串常量的是____________
(A)#ABC"(B)$ABC$(C)'ABC'(D)"ABC"(對)
23、設a=8,b=10，則以下表達式的值為真的是____________
(A)(-3+5>a)and(b>0)(B)a>=bandb>12(C)not(b>0)(D)(a>b)or(b>0)(對)
24、語句Z=y+1代表________
(A)將變量Z存入變量y中，再加上1的表達式
(B)變量Z取得y+1的值(對)
(C)變量Z取得變量y的值，然后再加上1的一個表達式
(D)將變量Z存入變量y+1中
25、執行下面的語句后，所產生的信息框的標題是___________ 。A=MsgBox("AAAAA",3,"BBBBB")
(A)BBBBB(對)(B)AAAAA(C)空(D)出錯，不能產生信息框
26、執行下列代碼，分別輸入12和89，輸出結果是_____ 。
PrivateSubForm_Click()
a=InputBox("D")
b=InputBox("E")
Printa+b
EndSub
(A)101(B)DE1289(C)DE(D)1289(對)
27、為了暫時關閉計時器，應把該計時器的某個屬性設置為False ，這個屬性是_______ 。
(A)Enabled(對)(B)Visible(C)Timer(D)Interval
28、下列表達式，哪一個可以產生1到6之間的隨機整數（包括1和6）___ 。
(A)Int(Rnd*7)(B)Int(Rnd(6)+1) (C)Int(Rnd*6)(D)Int(Rnd*6+1)(對)
29、執行下列程序，從鍵盤輸入10，運行結果是_________ 。
PrivateSubCommand1_Click()
S=InputBox("請輸入一個數字：")
SelectCaseS
CaseIs>0
Print">0"
CaseIs>3
Print">3"
CaseIs>5
Print">5"
EndSelect
EndSub
(A)>0(對)(B)>3(C)>5(D)>0
29、在窗體上畫一個命令按鈕和一個文本框,名稱分別為Command1和Text1,然后編寫如下程序:
PrivateSubCommand1_Click()
a=InputBox("請輸入日期(1~31)")
SelectCasea
CaseIs=31
t=t+"有誤"
caseIs<=10,20
t=t+"北京"
caseIs<=20
t=t+"大連"
caseIs<=31
t=t
(A)假期的旅游路線：北京大連
(B)假期的旅游路線：大連北京
(C)假期的旅游路線：北京(對)
(D)假期的旅游路線：大連

三、程序填空
順序結構
1、加法運算.三個文本框的名稱分別是 text1text2text3

清除按鈕
Private Sub Command1_Click()
______________________________
End Sub
加法運算按鈕
Private Sub Command2_Click()
______________________________
End Sub
退出按鈕
Private Sub Command3_Click()
______________________________
End Sub
2、編程序，由鍵盤輸入小時、分、秒后，轉換成共有多少秒？(界面參考如下),三個文本框的名稱分別是：text1text2text3轉換結果內的標簽名稱為label1

計算按鈕程序編寫如下
Private Sub Command1_Click()
______________________________
End Sub

3、編寫一個計算2個整數相除后的商與余數程序。運行后參考界面如下：兩個文本框名稱分別是：text1 text2，除數標簽label1余數標簽label2

計算按鈕代碼編寫
Private Sub Command1_Click()
______________________________

_______________________________
End Sub

條件語句
1、寫出條件語句的格式
行if語句結構

塊if語句結構

Select語句結構

1、倒計時程序：當a倒數到0時，就輸出時間到；當沒有到0時，就減1
Dim a As Integer‘全局變量定義
開始計時按鈕代碼編寫：
Private Sub Command1_Click()
a = 10
________________________________‘開始計時
Command1.Visible = False
End Sub

時間控件timer1 代碼編寫：
Private Sub Timer1_Timer()
If a = 0 Then
_____________________________ ‘_輸出時間到
_________________________________’計時停止
Command1.Visible = True
Else
Label1.Caption = a
__________________________’倒計時
End If
End Sub

2、成績等級評定
90分以上的是優秀，80－90的是良好，70－80的是一般， 60－70的是及格， 60分以下的是不及格

Private Sub Command1_Click()
Dim x As Single
x = Val(Text1.Text)
Select Case______' 使用Select…Case語句
Case _________
Text2.Text = "優秀"
Case Is > 80
Text2.Text = "良好"
Case Is > 70
Text2.Text = "中等"
Case Is > 60
Text2.Text = "及格"
Case Else
Text2.Text = "不及格"
________________

End Sub
3、飛機票的標準價格是1000元／張，1月或3－6月，每張打6折。9－11月每張打7折，7,8兩個月每張打8折。其他月份每張打9折。要求設計程序，輸入月份和張數，能計算出應付的金額。
提示：select語句

Private Sub Command1_Click()
______________________________________定義 m,n,z為整型變量
m = Val(Text1.Text)
N = Val(Text2.Text)
Select Casem' 根據月份進行選擇
Case_____________' 1月或3～6月
z = 0.6
Case _____________' 9月～11月
z = 0.7
Case 7, 8
z = 0.8
Case Else
z = 0.9
End Select
MsgBox "您共需要付款：" & 1000 * N * z, , "結算"
End Sub
四、寫程序題
1、奇偶判斷
判斷奇偶,被2整除余數是0的是偶數，否則的話就是奇數。文本框名稱：text1 ,text2

Private Sub Command1_Click()
Dim int1 As Integer, int2 As Integer
int1 = Val(Text1.Text)
int2 = int1 Mod 2'整除2取余數
If int2 = 0 Then'判斷是否為偶數
Text2.Text = "這是一個偶數!"
Else
Text2.Text = "這是一個奇數!"
End If
2、星期計算程序文本框名稱：text1text2

Private Sub Command1_Click()
Dim Rq As Date, x As Integer
Rq = Text1.Text
x = Abs(Rq - #1/1/1900#) Mod 7' 當前日期與1/1/1900相減取7的余數
Select Case x
Case 0' 余數為0則當天是星期一
Text2.Text = "星期一"
Case 1' 余數為1則當天是星期二
Text2.Text = "星期二"
Case 2
Text2.Text = "星期三"
Case 3
Text2.Text = "星期四"
Case 4
Text2.Text = "星期五"
Case 5
Text2.Text = "星期六"
Case Else
Text2.Text = "星期日"
End Select
End Sub
3、比較大小程序文本框分別為text1text2標簽是 label1

Private Sub Command1_Click()
Dim xAs Integer, y As Integer
x = Val(Text1.Text): y = Val(Text2.Text)
If x y是否為真如果為真執行下面程序
Label1.Caption = "<"
ElseIf x > y Then
Label1.Caption = ">"
Else
Label1.Caption = "="
End If
End Sub

有沒有VB高手來幫忙解答這些選擇題啊，，，要是有歷年湖南省關于VB的選擇題發給我也行。。拜托?。。?/h3>1.B2A 3A4B5C 6 D 7D 8A9C 10D 11 A 12C 73 D 74 D 75D76C77C 78D

有沒有在電腦上看雜志的軟件zcom很好而且免費的多更新還算及時

有什么在電腦看雜志的軟件嗎網上有各種各樣的電子雜志?。?下載直接就可以看了，百度一下

有什么免費看電腦雜志的軟件？http://www.zcom.com/?uid=9999-0這個網站有，你還可以下個雜志訂閱器，然后期期都可以免費下載

有沒有什么軟件可以看雜志？這類太多了。一艘一大把，就是沒有免費的。
有沒有一款軟件能在電腦上作出雜志效果的用photoshop 雜志封面版報之類用ps都能做

《大學風》電子雜志是用什么軟件做的？制作電子雜志哪個軟件模板多？可以用zinemaker，這個軟件做電子雜志很好的，而且也不復雜。模版和特效都很多，我一直在用。

電子雜志是用什么軟件制作的？1. 電子雜志軟件目前主要有IEBOOK和ZMAKER兩種是主流，你選擇其中一個就可以。
2. 電子雜志在官方非官方都有很多模版，你可下載一些套用。最好有一些PHOTOSHOP基礎，對處理圖片很有幫助。
3. 要想做一本比較不錯，又不想因為模版雷同而沒有特色的話，最好還要有FLASH基礎，可以修改模版，或自己制作模版。
4. 電子雜志軟件本身掌握并不是很難，難得是同時掌握PHOTOSHOPFLASH兩個軟件。
當然要求不高的話，只會IEBOOK或ZMAKER電子雜志軟件本身，也完全可完成工作，因為本身它們有簡單的圖片處理功能，同時它們也屬于FLASH軟件的衍生品。

目前最好用的電子雜志制作軟件是哪個？名編輯電子雜志大師，你說的這些要求這款軟件都能滿足，我都用了一年多了，除了可以插入視頻、超鏈接、flash、聲音以外，最重要的是還支持導入圖片和導入PDF ，其他國內的軟件都只支持導入圖片，不能導入PDF 。還支持手機、平板瀏覽器瀏覽,支持微信瀏覽,也就是可以做成微雜志。最關鍵的是做出來的電子雜志效果一流，精美時尚、高檔大氣，高清，可以做到放大也能高清的效果。
電子雜志制作用什么軟件好一、用PPT制作電子雜志結構，建議選擇頁面大小為A4紙的大小，再添加一些精美的背景圖片作為PPT頁面，然后添加雜志內容，具體操作如下：

END
二、生成PDF 。這個功能在PPT里面有，具體操作如下：

END
三、使用名編輯電子雜志大師，把PDF導入進去，再設置一下效果，在頁面上添加一些效果，轉換成電子雜志。

（一）打開名編輯電子雜志大師，點擊“新建”按鈕，選擇需要導入的PDF（題外話：名編輯可以同時導入單個或者多個PDF具體官網有教程，也可以導入圖片的哦），最后點擊“導入” 。

（二）點擊“設計設置”面板下的“Neat模板”按鈕，就會彈出“選擇模板”界面。
“我的模板”下就是一些不同風格的模板，而這些不同風格的模板下，就是各種各樣的主題。
特別指出的是，“Slide”模板是一個左右滑動翻頁的模板，所以這個軟件不但可以有仿真翻頁效果，還可以制作左右滑動翻頁效果（下圖第三張圖就是這個效果）。
我們選擇一個適合的主題，最后點擊“確定” 。（題外話：官方有別的主題模板可以下載哦）。
這里要注意一下， “預覽”按鈕，是每設置完一項或者幾項，想看下設置后的效果的話，需要點擊一下“預覽”按鈕。

（三）模板設置——設置電子雜志的功能按鈕和展示效果。
END

1．“設計設置”面板：
（提醒下，如果明明已經設置完了，但是點擊了“預覽”按鈕后，設置無效依然是之前的效果，那你重新設置之后，按一下鍵盤上的Enter就好了）
比如“頁面厚度”可以設置整本書的厚度；“頁面陰影”可以設置頁面之間的陰影的深淺；“封面硬皮設置”可以設置硬皮的封面；“密碼”可以給電子雜志設置密碼保護，限定瀏覽權限。
除了這些還可以設置logo（以及點擊logo就跳轉到某個網站），設置“主頁”按鈕，設置多國語言瀏覽界面，分享給別人的按鈕，背景音樂，自動播放，工具欄的顏色，工具欄上的按鈕或者文字的顏色，隱藏按鈕，文字復制，下載功能，古書的從后到左翻頁模式，頁面放大時是單頁放大還是雙頁放大，等等功能。
下圖第一張圖片中看起來厚厚的跟字典一樣的厚度，就是設置了“頁面厚度”，選擇了“很厚”的效果，第二張圖片就是設置了硬皮封面的效果，并且封面設置了綠色的邊框，第三張圖展示的是各個面板，下面會一一介紹：

2．“書簽”面板：
設置電子雜志的書簽功能。

3．“助手”面板：
我們可以設置在電子雜志的窗口顯示卡通人物解說員助手，可以直接插入錄制好的音頻、或者輸入中文/英文系統即可自動錄制聲音給解說員在相應的頁面配音。

4．“插件”面板：
我們可以在電子雜志的瀏覽窗口插入廣告、視頻、音頻、圖片幻燈片播放器，等等。

5．“背景”面板：
設置電子雜志窗口的圖片背景，可以選擇系統自帶的背景圖片或者自定義自己添加背景圖片。

6．“場景”面板：
設置電子雜志窗口的flash動態背景，可以選擇系統自帶的flash動畫或者自定義自己添加flash作為背景。
7．“目錄”面板：
設置電子雜志的目錄跳轉功能。

8．“頁面管理器”面板：
通過這個面板，可以增加、刪除、上下移動頁面。

哪個軟件做電子雜志比較好一點，要能編輯文檔，且有好看的模板的軟件哦PocoMaker（魅客）是一款完全免費的電子雜志制作工具。他可以制作電子相冊、電子雜志、電子讀物等多種個性電子讀物。

運用他，花上5分鐘，你可以將自己的精美相片整理成冊，加上炫酷的動態效果，展現你獨一的美麗，表達你獨特的思想；
更可以將個人雜志發布至MyPOCO個人空間主頁，讓更多朋友認識了解特別的你，分享你的喜怒哀樂。

而且，只要你愿意，你完全可以制作一本內容更的電子雜志，當一個大主編，做一本人人贊賞的精彩電子雜志。

上一篇：imagex

下一篇：hdtune硬盤檢測工具