1樓：網海1書生
1、就是p=text1和q=text2就行，標準的用法是：
p = text1.text
q = text2.text
但用p=text1和q=text2也行的，因為text是文字框控制元件的預設屬性，可以省略不寫
2、判斷p和q是不是互質數的方法：
do while p <> q
if p > q then
p = p - q
else
q = q - p
end if
loop
if p = 1 then
msgbox "這兩個數是互質數"
else
msgbox "這兩個數不是互質數"
end if
3、求p除以q的餘數的方法：
msgbox p mod q
2樓：聽不清啊
p=val(text1.text)
q=val(text2.text)
if p mod q=0 then print p;"是「; q; 「的倍數，能被它整除」
其中， p mod q 就是p除以q的餘數。
如果p和q互質，那麼，p和q的最大公因數等於1。
VB在textbox中輸出陣列，VB給陣列賦值後如何在文字框Text裡輸出
private sub form load dim a 1 to 1000 as integer 在text的屬性欄設定這2個屬性 text1.scrollbars 2 vertical text1.multiline truetext1.text for i 1 to 1000 a i i tex...
Ubound在VB中怎麼用啊，vb裡的lbound和ubound的用法
假設 dim a as integerredim a 100 重定義陣列 為101個元素 保留原回有陣列資訊，新增一個元素 redim preserve a ubound a 1 至此陣列元素有102個 若不需答保留原有陣列資訊，去掉preserve關鍵字即可。ubound ubound函式 返回抄...
怎麼在VB的標籤裡實現換行,在VB中怎麼怎麼設定label自動換行
有兩種方式復 制1 編寫 實現 換行 bai label1.caption 第一行內容du vbcrlf 第二行內容 vbcrlf就是zhi一個回車符,dao實現換行 2 編輯label的屬性,實現自動換行 將autosize 設定為false,將wordwrap設定為true,此時在caption...