1樓:abs啊
module1
type student
name as string
age as integer
birth as data
adress as string
end type
form1
text1
text2.passwordchar=*
command1_click
if text1.text="設定的賬號「 and text2.text="設定的密碼" then
form2.show
end if
form2
form load
text1.text=form3.text1.text
text2.text=form3.text2.text
text3.text=form3.text3.text
text4.text=form3.text4.text
command1.capton="下一條"
command1_click
form3.data1.recordset.movenext
text1.text=a.name
text2.text=a.age
text3.text=a.birth
text4.text=a.adress
end sub
form3
data1
text1
text2
text3
text4
dim a as student
a.name=data1.form3.data1.recordset.fields("name")
a.age=data1.form3.data1.recordset.fields("age")
a.birth=data1.form3.data1.recordset.fields("birth")
a.adress=data1.form3.data1.recordset.fields("adress")
寫了半天啊,可以追問,求採納
2樓:匿名使用者
我有vb2010的,要不?
3樓:匿名使用者
vb6.0 vb.net2005 vb.net2008 vb.net2010都有.要哪一個的.
用vb程式編寫,求奇數和或者偶數和。
4樓:匿名使用者
private sub command1_click()dim x as long, y as long, sumx as long, sumy as long
x = val(inputbox("輸入奇數範圍"))y = val(inputbox("輸入偶數範圍"))for i = 1 to x step 2sumx = sumx + i
next
for i = 2 to y step 2sumy = sumy + i
next
print "奇數和為:" & sumx
print "偶數和為:" & sumy
end sub
5樓:匿名使用者
是隨機生成的吧?這樣寫:
dim i as integer,s1 as integer,s2 as integer
randomize
for i=1 to 100『生成100個100以內的數if int(rnd*100) mod 2=0 thens2=s2+1
else
s1=s1+1
end if
print "奇數和";s1
print "偶數和";s2
6樓:
題目不說清楚怎麼弄啊?
首先資料規模是什麼,初始資料是什麼
然後程式的效能要求是什麼
全都不說
而且按照程式設計規則,能用數學解決的問題就不要用程式去解決
如何用vb編寫一個簡單的減法程式?
7樓:polaris北斗
在視窗放三個textbox控制元件,一個commandbutton控制元件,雙擊commandbutton控制元件,切換到private sub command1_click()事件**中,輸入以下**:
dim a as double, b as double
text3.text = str(val(text1.text) - val(text2.text))
8樓:匿名使用者
private sub command1_click()'文字框text3的內容等於text1的數值減去text2的數值'其中val 函式用來返回字串表示式的數值me.text3.text = val(me.
text1.text) - val(me.text2.
text)
end sub
9樓:匿名使用者
dim a as inter...text1=(你控制元件的名稱)text2=(第二個空間的名稱)text3=text1-text2end end大概就是這麼個,3年沒用vb了,肯定有錯的,將就一下吧= =
10樓:匿名使用者
先畫3個text 分別為 text1 text2 text3 private sub form1_load( )text1.text=inputbox("請輸入第一個數 ")text2.text=inputbox("請輸入第二個數 ")text3.
text=text1.text-text2.textend sub
11樓:匿名使用者
option explicitprivate sub command1_click()
text3.text = val(text1.text) - val(text2.text)
end sub
請問編寫軟體的語言程式是如何誕生的
早期的計算機軟體都是用組合語言直接編寫的,這種狀況持續了數年。當人們發現為不同型別的cpu編寫可重用軟體的開銷要明顯高於編寫編譯器時,人們發明了高階程式語言。由於早期的計算機的記憶體很少,當大家實現編譯器時,遇到了許多技術難題。大約在20世紀50年代末期,與機器無關的程式語言被首次提出。隨後,人們開...
如何用C語言編寫可以自動執行某些程式的小程式
include include pragma ment linker,subsystem windows entry maincrtstartup void main return 擴充套件資料c語言猜數字的小遊戲 include include include 時間標頭檔案。void main i...
現在的軟體一般都是用什麼語言編寫的
開發語du言有 o語言 zhi 不難學,軟體開發主要就是學習程式語言和邏輯架構,以及專案開發的實現,最主要的就是學習程式語言,一般入門都還是很簡單的,主要還是要多例項練習。現在軟體開發,一般都用什麼語言啊?主流的還是php,這個是最方便的開發語言,當然企業種類的語言也有的,具體要看你是做什麼類的 請...