【单选题】The length, cross-sectional area, constraint states and material of the two slender columns a and b are the same. Assume the cross-sections of the two columns are square and circular, respectively, wh...
【单选题】在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Com- mand1),然后编写如下程序: Private Sub Command1_Click( ) x=0 Do While x<20 x=(x+1) *(x+2) n=n+1 Loop Text1.Text=Str(n) TextText=Str(x) End Sub 程序运行后,单击命令按钮...
Private Sub Form. Load() Show Text1.Text=' ' Text2.Text=' ' Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer) Text1.Text=Chr(KeyCode-4) End Sub
B.
Private Sub Form_Load() Show Text1.Text=' ' Text2.Text=' ' Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub
C.
Private Sub Form_Load() Show Text1.Text=' ' Text2.Text=' ' Text2.SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer,Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCOde-4) End Sub
D.
Private Sub Form_Load() Show Text1.Text=' ' Text2.Text=' ' Text2.SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer,Shift As Integer) Text1.Text=Chr(KeyCode-4) End Sub