1樓：數學王子他
vb已不再支援read/data語句了
可直接用賦值語句
'read n, m, h
'read x(0), ip
'for i = 0 to m - 1
' read y(0, i)
'next i
'data 50, 5, 0.5
'data 0#, 10
'data 1#, 0#, 0#, 0#, 0#n = 50: m = 5: h = 0.5x(0) = 0#: ip = 10
y(0, 1) = 1#: y(0, 2) = 0#: y(0, 3) = 0#: y(0, 4) = 0#: y(0, 5) = 0#
2樓：匿名使用者
缺少子程式read、data等
如果你打得是dos下的basic程式，則需要修改read、data，可以試用列舉。
3樓：網海1書生
for i = 0 to m - 1: read y(0, 1): next i
改為for i = 0 to m - 1: read y(0, i): next i
vb試題求答案，萬分感謝！
4樓：匿名使用者
1.開啟屬性視窗的熱鍵是（ d ）
a、f1 b、f2 c、f3 d、f4
2.在vb6.0的整合開發環境有幾種工作狀態（ c ）
a、1種 b、2種 c、3種 d、4種
3.下面四個選項，不是窗體屬性的是（d ）
a、minbutton b、maxbutton c、caption d、load
4.用來設定窗體背景**的屬性是（b ）
a、moveable b、picture c、forecolor d、windowsstate
5.修改控制元件屬性，一般可以使用屬性視窗，也可以通過（d ）為屬性賦值。
a、命令 b、物件 c、方法 d、**
6.不能開啟屬性視窗的操作是（d ）
a、單擊工具欄中的“屬性視窗”按鈕
b、選取“檢視”選單中的“屬性視窗”子選單項
c、在物件上單擊右鍵，從彈出的快捷選單中選擇“屬性視窗”選取項
d、選取“工程”選單中的“屬性視窗”子選單項
7.vb6.0整合開發環境有3種工作狀態，工作狀態顯示在（ a ）
a、狀態列的最左方 b、狀態列的最右方
c、狀態列的方括號內 d、標題欄的方括號內
8.m,n是整數，且n>m,在下面四個語句中，能將x賦值為一個m-n之間（含m,n）的任意整數，即滿足m<=x<=n的是（ a ）
a、x=int(rnd*(n-m+1))+m b、x=int(rnd*n)+m
c、x=int(rnd*m)+n d、x=int(rnd*(n-m))+m
9.vb6.0表示式log(1)+abs(-1)+int(rnd(1))的型別是（a ）
a、算數表示式 b、關係表示式 c、錯誤表示式 d、邏輯表示式
10.下面四個語句中，能列印顯示20×30字樣的是（ a ）
a、print “20*30” b、print 20*30
c、print chr$(20)+”*”+chr$(30) d、print val(“20”)*val(“30”)
11.下列事件過程
private sub command1_click()
print format(123.456,”###.##%”)
end sub
12.執行後輸出結果是（ d ）
a、123.46% b、123.45% c、123.456% d、12345.6%
13.下列事件過程
private sub command1_click()
a$=”bird”
c$=”fly”
print a$ & “can” & c$ & “1”
end sub
14.執行後輸出結果是（a ）
15.可以用inputbox函式產生“輸入對話方塊”，若執行下列語句：st$=inputbox(“請輸入字串”，“字串對話方塊”，“字串”)，當使用者輸入完畢，按“確定”按鈕後，st$變數的內容是（ a ）
a、字串 b、請輸入字串 c、字串對話方塊 d、使用者輸入內容
16.下列程式
private sub command1_click()
x1=inputbox(“請輸入”)
print x1+123
end sub
17.執行時，若輸入123，將輸出（b ）
a、123123 b、246 c、123 d、顯示出錯資訊
18.以下vb6.0控制元件中，有caption屬性的是（d ）
a、組合框 b、列表框 c、計時器 d、單選按鈕
19.能作為容器使用的物件是（a ）
a、**框 b、影象框 c、標籤框 d、文字框問題補充：
20.下面選項中，不能使控制元件得到焦點的操作是（d ）
a、在程式執行期間，用滑鼠單擊物件
b、在程式執行期間，用快捷選擇物件
c、在程式執行期間，按tab建
d、在程式執行期間，按回車鍵
21.下面的程式執行時，若從鍵盤輸入3和4，則輸出為（b ）
private sub form_click()
a=val(inputbox(“請輸入a”))
b=val(inputbox(“請輸入b”))
c=aif b>c then c=b
c=c*c
print c
end sub
a、14 b、16 c、18 d、20
22.在程式執行中，要想使可操作的按鈕變成看不見，則應設定為false的屬性是（ a ）
a、visible b、enabled c、default d、cancled
23.若要設定標籤的背景顏色，使用的屬性是（ b ）
a、forecolor b、backcolor c、fontbold d、color
24.下面選項中，不能將影象裝入**框和影象框的方法是（ a ）
a、在介面設計時，手工在**框和影象框中繪製圖形
b、在介面設計時，通過picture屬性裝入
c、在介面設計時，利用剪貼簿吧影象貼上上
d、在程式執行期間，用loadpicture函式把圖形檔案裝入
5樓：匿名使用者
看看書嗎 很詳細的
五道vb程式分析題，答案有，求大神給分析一下程式過程，急! 40
6樓：金華阿呆
8、輸入一個數x，如果x>=0，則y=1-2*x，bai否則的du話y=1+x
9、迴圈，直到i大於
zhi7，每次迴圈i增加3，x增加5
10、rnd函式是返dao回一個0—1之間的隨機數專，屬所以取整後x為4（只取整數部分），輸出結果必為good
11、迴圈，每一次迴圈x=(x+3)*(x+4)，n為迴圈次數，迴圈直到x>=60為止，輸出n,x及和
12、x為字元框內數字，a為x除10求餘，b為x除10求餘後再除以10，c為x除100，因為均為整數型，所以最後結果都必須取整（四捨五入）
vb加法運算程式,VB加法運算程式
這個 中 private sub mand1 click dim n1,n2 as integern1 val text1.text n1 val text2.text label4.caption n1 n2end sub 第4行的n1顯然應該是n2 要知道一個vb與眾不同規定 dim n1,n2...
vb怎麼強制退出程式， VB 怎麼強制退出程式
用end命令即可。示例 private sub command1 click end 關閉程式 end sub 不管程式在執行什麼，點下後，程式直接關閉。如果已經在電腦上執行了，開啟工作管理員中的應用程式點你要關閉的那個結束任務就可以了 如果是退出的方法一般 end 就可以 如果你在sub過程中建立...
vb加密程式
不知道我是不是半桶水，問問題保持心平氣和的，不然誰願意來回答！如果不考慮加密演算法的話，也就是最簡單的用符號遮住密碼，可以用下面的方式 新建工程，新增兩個文字框，和兩個按鈕 private sub command1 click text2.text text1.texttext2.passwordc...