VB程式照著書上打下來的,執行時始終程式不對,求大神修改,萬分感謝!!急用

2021-05-28 14:25:29 字數 4208 閱讀 8785

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編寫關機程式

1全部glngwhichwindows32 mlngwindowsnt是對系統平臺作判斷,是否為nt系統 nt系統下使用adjusttoken獲得許可權驗證 shutdown 使用參shutdown 用法 shutdown i l s r a f m computername t xx c co m...

VB程式中的問題,VB程式中的一個問題

1 我建議你好好看看書,這是很基礎的 2 a 定義的是一個陣列 3 0 代表的是a 陣列中的第一元素,也可以說是陣列中第一個變數 這樣說不太準確,可以這麼理解吧 4 每一個陣列a x 後面只要是寫等號,就是給這個陣列進行賦值的 例如你提問的 a 0 1 意思就是把1這個數賦值給a 0 因為你前面已經...

用vb程式設計序實現

隨機數重複的做法 把text1 text3的multiline屬性設定為true dim a 100 as integerprivate sub command1 click k 1 if text2.text then exit subfor i 1 to 100 if a i text2.tex...