vb.net题目 vb语言题库
vb.net复选框及字体颜色问题 题目是图上的第十题，计算代码我会做，但是那个红字黄底的代码怎么写
TextBox1.ForeColor = Color.Red
创新互联建站专注于新城企业网站建设,成都响应式网站建设公司,商城网站制作。新城网站建设公司,为新城等地区提供建站服务。全流程定制网站制作，专业设计，全程项目跟踪，创新互联建站专业和态度为您提供的服务
TextBox1.BackColor = Color.Yellow
TextBox1.Text = 1234
如何在vb.net中实现单选题和多选题功能？
asp:RadioButton ID="RadioButton1" runat="server" Text="A." GroupName="group1"/
asp:RadioButton ID="RadioButton2" runat="server" Text="B." GroupName="group1" /
asp:RadioButton ID="RadioButton3" runat="server" Text="C." GroupName="group1" /
asp:RadioButton ID="RadioButton4" runat="server" Text="D." GroupName="group1" /
div
asp:CheckBox ID="CheckBox1" runat="server" Text ="A." /
asp:CheckBox ID="CheckBox2" runat="server" Text ="B." /
asp:CheckBox ID="CheckBox3" runat="server" Text ="C." /
asp:CheckBox ID="CheckBox4" runat="server" Text ="D." /
/div
还有两道vb.net面试题，请大家帮忙，谢谢。
我很喜欢这种题目
-------------------------------------------------------------------------
第7题，问题出在两方面
Public Function CalculateArea(ByVal SideBase As Double, ByVal Height As Double, _ Optional
ByVal AssignToArea As Boolean = False) As Double
Dim Area As Double = (SideBase * Height) / 2
中间的 _ 有问题，应该去掉
还有objShape = CType(objShape, clsTriangle) 有错误，不能转换
注释掉objShape = CType(objShape, clsTriangle)
删除_后，得到结果
true
false
-330
--------------------------------------------------------------------------
第8题，就是以acc_grp_cust_tbl表为基础，查找cust_tbl并输出
一般的话使用涉及两个表的话使用SHAPE语句（以SQL为基础的语句）
虽然两者使用时差不多，但是理论比较难懂，我这里也不讲了，我使用ADO+SQL方法
先说明一下程序中的一个细节，也是问题比较容易忽略的
1400 0 1 2
1500 3 4
1600 5
说明一个问题Cust_id1 Cust_id2 Cust_id3 Cust_id4 字段不是数值，而是类似字符的东西（因为可能是
备注）
定义rsgrp对应acc_grp_cust_tbl ，rscust对应cust_tbl
预先设置好rsgrp和rscust的连接(使用VB的方法，可以移植到VB.NET上）
do until rscust.eof
strline=rscust(0) " "
strSQL="SELECT * FROM CUST_TBL WHERE cust_id='" RSGRP(1) "' OR CUST_ID='" RSGRP(2) "' OR CUST_ID='" RSGRP(3) "' OR CUST_ID='" RSGRP(4) "'"
RSGRP.OPEN STRSQL
if rsgrp.recordcount0 then
rsgrp.movefirst
do until rsgrp.eof
strLine=strline rscust(3) " " rscust(2) "/"
rsgrp.movenext
loop
end if
rscust.close
strline=left(strline ,len(strline)-1)
'去除最后一个"/"
console.writeline(strline)
loop
VB.NET listbox 题目
For Each i In ListBox1.Items
If ListBox2.Items.Contains(i) = False Then
ListBox3.Items.Add(i)
End If
Next
网站栏目：vb.net题目 vb语言题库
本文来源：http://cdiso.cn/article/hipegc.html
