Re: [.NET] 幫幫我吧

看板Visual_Basic作者rike (靠杯~~冷笑話滾蛋)時間19年前 (2006/04/21 16:17)推噓0(0推 0噓 0→)

留言0則, 0人參與討論串2/2 (看更多)

※ 引述《may1986515 (雙子牛牛)》之銘言： : 題一:(30分) : 請寫一程式可讓使用者輸入兩個數字，可為個位數到百位數，並使用While End While?圈 : 完成其數字差之間的乘法表，並顯示其乘法表。(hint: 例如輸入數字為2及10，則計算 : 2X2=4 2X3=6 … 2X10=20 : 3X2=6 3X3=9 … 3X10=30 : 到 : 10X2=20 10X3=30 … 10X10=100 Dim x As Integer = TextBox1.Text Dim y As Integer = TextBox2.Text Label1.Text = "" Dim a, b As Integer While a < y a += 1 b = x While b < y b += 1 Label1.Text &= a & " * " & b & " = " & a * b & " " End While Label1.Text &= vbNewLine End While : 題二:(30分) : 請寫一程式，可請使用者輸入一個數字，再以其輸入數字的數值在螢幕上以"*"繪出右上 : 三角形。例如輸入為4則顯示如下圖形(四行，每行依序遞減) : **** : *** : ** : * Dim x, y, z As Integer Label1.Text = "" x = TextBox1.Text For y = x To 1 Step -1 For z = y To x Label1.Text &= " " Next For z = y To 1 Step -1 Label1.Text &= "*" Next Label1.Text &= vbNewLine Next : 題三(40分) : 請寫一程式，可讓使用者決定所輸入的是公制還是英制，如為公制請使用者輸入公分，如 : 為英制請使用者分別輸入身高的英呎及英吋數，如輸入為公分，請顯示轉換的結果為所具 : 有的英呎及英吋，如輸入為英呎及英吋，請顯示轉換的結果為公分；計算完顯示後，再請 : 使用者輸入體重(單位:公斤)，並計算其BMI指數及顯示BMI計算結果。BMI公式：BMI = 體 : 重 / 身高2。(hint: BMI中體重單位為公斤，身高單位為公尺，1英吋=2.54公分，1英呎 : =12英吋) Label1.Text = "" If RadioButton1.Checked Then Label1.Text &= TextBox1.Text & " 英吋 =" & TextBox1.Text * 2.54 & " 公分 " & vbNewLine ElseIf RadioButton2.Checked Then Label1.Text &= TextBox1.Text & " 公分 =" & TextBox1.Text / 2.54 & " 英吋 " & vbNewLine End If If CheckBox1.Checked Then Label1.Text &= "BMI指數" & TextBox2.Text / ((TextBox1.Text / 100) ^ 2) End If 其他功能自己改這些程式碼夠用了 : 誰會這些題目~這是我期中考題目 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 說真的...期中考了這種題目不會該加點油嚕!! : 請各位鄉民幫幫忙啊~感恩不盡 -- ◣ ◢ 閃開,讓專業的來!! ▁███▁ 嗚...出來了..... ◣ ◢ ＼／ ╰ ∥ ◢ 太快了吧? ◣ □◢ ◣ ◢ ╯ ∕ ﹨ ╳ ◇◢ ╱ ││ ︵︵ β 〝 / /\/∠∟ by Cashonly -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 222.156.10.204