關於ACCESS窗體設計問題,製作問題列表框

2021-03-28 19:36:48 字數 1420 閱讀 8759

1樓:匿名使用者

窗體中新建1個列表框、1個文字框,一個叫l問題分類,一個叫t解決方法,其它什麼都不用做。然後窗體**如下即可實現你的要求:

private sub form_open(cancel as integer)

dim sql as string

sql = "select 問題分類 from 問題表"

me.l問題分類.rowsource = sql

end sub

private sub l問題分類_afterupdate()

dim db as database

dim rst1 as recordset

dim sqlrst1 as string

dim qst, ans as string

set db = currentdb

qst = me.l問題分類.value

sqlrst1 = "select 解決方法 from 問題表 where 問題分類 = '" & qst & "'"

set rst1 = db.openrecordset(sqlrst1)

ans = rst1(0)

me.t解決方法.value = ans

end sub

2樓:匿名使用者

庫,得到連線物件conn

2、用下面的select語句開啟表,將資料讀入recordsetset rs=conn.execute("select * from 表名")

3、用迴圈將資料讀入二維陣列arr

row=0

while not rs.eof

arr[row,0]=rs["id"]

arr[row,1]=rs["year"]arr[row,2]=rs["mon"]

arr[row,3]=rs["1"]

arr[row,4]=rs["2"]

......

...row=row+1

wend

access窗體中建立組合框控制元件或列表框下拉選取

3樓:匿名使用者

textbox4.value = iif(textbox1.vaue-textbox2.value>=0,"合格","不合格")

textbox8.value = iif(textbox5.vaue-textbox6.

value>=0 and textbox7.vaue-textbox5.value,"合格","不合格")

textbox9也可以設核取方塊,打勾.caption顯示「合格」,否則顯示「不合格」

if textbox1.value="" and ...and...then textbox?.enabled = true

else textbox?.enabled = flase

關於VB中MDI窗體的問題,關於VB中MDI窗體的一個問題

private sub menclose click picture1.print i do until i 0 exit click i i 1 要有迴圈結束條件 loop end sub 1 private sub menclose click for i forms.count 1 to 0 ...

關於做網頁設計的問題 關於網頁設計的問題,如下

你說的意思可能是這樣的 1.用ps或其他作圖軟體作出效果圖。2.切割分成小 3.用dw等網頁製作軟體做出html前臺頁面。4.新增動態 還有可能是這個意思?一個大圖 比如banner 故意切割成幾個小 來做網頁?有的整塊的 大的時候 載入的時候會很慢 就是說把這個 全部 完成後才會顯示,而把一個大點...

關於二進位制的問題,有關於二進位制的問題!

樓主記住除權逆取餘就行 2進位制,權就是2,10進位制,權就是10 比如229 除後所得 餘數229 21141 2 570 2281 2 140 27 0 231 211 2 01然後按照逆序把答案寫下來 11100101快試試吧 十進位制轉二進位制 用2輾轉相除至結果為1 將餘數和最後的1從下向...