填空题

下列程序段运行后，a的值为______。
a=600
b=50
a=a+b
b=a-b
a=a-b

【参考答案】

50

<上一题目录下一题>

热门试题

填空题

建立一个通讯录的随机文件phonBook.txt，内容包括姓名、电话、地址和邮编，用文本框输入数据。单击“添加主记录”按钮Command1时，将文本框数据写入文件，单击“显示”按钮Command2时，将文件中所有记录内容显示在立即窗口。 Private Type PerData Name 1 As String Phon As String *11 Address As String *10 PostCd As String*6 End Type ______’定义PerData类型的变量xData Pdvate Sub Form Load() Open C: phonBook.txt For Random As 1 End Sub Private Sub Command1_Click() xData.Name1=Text1.Text xData.Phon=Text2.Text ______=Text3.Text ’地址 xData.PostCd=Text4.Text Put#1,1,xData Text1.Text= :Text2.Text= Text3.Text= :Text4.Text= End Sub Ptirate Sub Command2_Click() reno=LOF(1) Len(xData) i=1 Do While i＜=reno Get#1,i,xData Debug.Print xData.Namel, ______ ,xData.Address,xData.PostCd i=i+1 Loop End Sub

填空题

在窗体上设计两个复选框，一个显示粗体，另一个显示斜体，通过对复选框的选择，在一个文本框中显示相应效果的文本，请完成下列程序。 Private Sub Form_Load() Check1.Caption= 显示粗体 Check2.Caption= 显示斜体 Text1.Text= May you a happy day! End Sub Private Sub Check1_Click() If______=1 Then Text1.FontBold=True Else Text1.FontBold=False End If End Sub Private Sub Check2_Click() If Check2.Value=1 Then Text1.______ EIse Text1.______ End If End Sub

相关试题