急!再線等,一道簡單的VB程式設計題

時間 2023-09-08 11:54:01

1樓:砍侃看

做好了,把你郵箱給我,我給你發過去 。這是**和截圖。

dim s as string

dim a as integer

private sub command1_click(index as integer)

if len( >20 then

m = msgbox("所撥數字已經達到最大", vbexclamation, "警告")

end if

if = then

str(index)

str(index)

end if

end sub

private sub command2_click()a = 0s =

trueend sub

private sub command3_click()=

end sub

private sub form_load()=false

end sub

private sub timer1_timer()dim p as integer

left(s, a)

a = a + 1

if a = len(s) +1 then= false

p = msgbox("重撥完畢", vbinformation)end if

end sub

一道vb程式設計題

2樓:匿名使用者

出生看減去今年不就行了。

求解:兩道計算機vb程式設計題目

3樓:波盡天下

2、(1)

窮舉法,列出從1000到9999所有的4位數,分別測試其是否等於所分兩個兩位數和的平方。

2)計算結果:

3)**如下:

private sub command1_click()

for i = 1000 to 9999

if ((i \ 100) +i mod 100)) 2 = i then

print i; "i \ 100; "i mod 100; "2"

end if

next i

end sub

窮舉法,列出從1001到29999所有的自然數,分別測試其是否能同時被32和47整除。

2)由於47是質數,所以判斷這個數是否能被32和47的最小公倍數1504整除,如果能整除那麼這個數能同時被32和47整除。

**如下:for i = 1001 to 29999

a = 32 * 47

if i mod a = 0 then

print i

end if

next i

3)計算結果:

希望對你有所幫助!

vb試題,分不多,麻煩會的大神幫幫忙吧!

4樓:網友

二、1 frm 2屬性 3窗體模組 4標準模組 5類模組 6區域性 7窗體 8全域性 9所有 10 0<=x and x<100

三1 設計視窗、窗體設計器視窗、工程資源管理器視窗、屬性視窗、工具箱視窗。

作用看名稱翻譯字面就行了)

2 事件是指可以由窗體或控制項識別的操作。響應事件時,事件驅動應用程式執行指定的**。

3一般步驟:a繪製窗體b設定屬性c編寫**。

4 一般來講,編譯時需要開闢記憶體的稱為靜態陣列,執行時開闢記憶體的稱為動態陣列。

5內容較多,自己查一下資料,我不寫了。

五、1、frm1_click()

歡迎光臨!"

end sub

2、dim tmpi as long

for tmpi=1 to 100

if tmpi/3=tmpi\3 then print tmpi

next tmpi

3 dim s(10) as long

dim tmpi as long,tmps1 as long,tmps2 as long

s(1)=s(2)=s(3)=

s(10)= 以上為給陣列賦值,我不寫了,後面直接寫數就行了。

for tmp1=1 to 10

print s(tmp1)

nexttmpi=1

for tmps1=10 to 1 step -1

fot tmps2=1 to tmps1-1

if s(tmps2)>s(tmps2+1) then

tmpi=s(tmps2):s(tmps2)=s(tmps2+1):s(tmps2+1)=tmpi

next tmps2

next tmps1

for tmps1 =1 to 10

print s(tmps1)

next

急!再線等,一道簡單的VB程式設計題

我來給你做啊 很簡單,但是要點時間的 hi me 程式不難.只說關鍵實現.設定字型呀,窗體那些自己弄.比如command9 標籤名為9 其點選事件為 text1.text text1.text command9.caption 這樣,就可以按順序顯示號碼了.重拔也簡單.拔完號後,用一個str儲存te...

一道有關vb程式設計的題目,一道比較簡單的VB程式題目,只需要程式碼即可

火星飛人 private sub form load show label1.autosize true label1.caption str time label1.top val form1.height 2 val label1.height 2 label1.left val form1.w...

求解一道c 程式設計題,求解一道簡單的C語言程式設計題

麼誒節奏 include using namespace std int search int p1,int n,int p2 void print int p,int n int main int arr1 10 int arr2 int count search arr1,10,arr2 pri...